HSPについて
HSP初心者ですが↓のスクリプトは暗記ゲームなんですが、同じようなことを何度も繰り返しています。省略する方法はないのでしょうか。それとinput命令で最初にある0を消してから入力しなければいけませんが、最初を空白にする方法も教えてください。
randomize
cls
*q1
cls
s=0
q+=1
a1=rnd(9)+1
mes ""+a1+""
wait 100
cls
input s,100,20,q
button "判定",*h1
a=a1
stop
*h1
cls
if a=s : wait 100 : else :mes "不正解" : wait 100 : end
*q2
cls
s=0
q+=1
a1=rnd(9)+1 : a2=rnd(9)+1
mes ""+a1+""+a2+""
wait 100
cls
input s,100,20,q
a=a1*10+a2
button "判定",*h2
stop
*h2
cls
if a=s : wait 100 : else :mes "不正解" : wait 100 : end
*q3
cls
s=0
q+=1
a1=rnd(9)+1 : a2=rnd(9)+1 : a3=rnd(9)+1
mes ""+a1+""+a2+""+a3+""
wait 100
cls
input s,100,20,q
a=a1*100+a2*10+a3
button "判定",*h3
stop
*h3
cls
if a=s : wait 100 : else :mes "不正解" : wait 100 : end
*q4
・
・
・