■電卓の初歩の機能
1.数値ボタンを押したら、表示エリアに数値を表示
2.表示の際、数値エリアに既に数字があれば、その数値を入力した数値の前部分に足す
1についてどうやら「objprm」命令で出来そうなことがわかった
ではどのようにするか?
ボタン一つ一つに処理を割り振ってみよう?
そこで、ボタン1とボタン2を表示させてみる
3/12のソースプログラムからボタン1と2だけにするために、他の部分はコメントにする
ボタン1の処理を*_1、ボタン2の処理を*_2にして追加する
inputオブジェクトのオブジェクトIDを変数に取得してそれぞれの処理で表示させる
これのプログラムが次だ(コメント部分は除いた)
#const Wind_main 0
#const gyo1X 10
#const gyo2X 80
#const gyo3X 150
#const hoseiY 20
#const gyo0Y 0
#const gyo1Y 10+hoseiY
#const gyo2Y 35+hoseiY
#const gyo3Y 60+hoseiY
#const gyo4Y 85+hoseiY
screen Wind_main,300,200
pos gyo1X,gyo3Y
button "1" ,*_1
pos gyo2X,gyo3Y
button "2" ,*_2
pos gyo1X,gyo0Y // 表示枠
sdim siki,200
input siki,200
inputNo = Stat
stop
*_1
objprm inputNo,1
stop
*_2
objprm inputNo,2
stop
さて、このままボタンを増やしてよいものか???
PR