検索
AND検索
OR検索
トップ
|
リロード
|
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
NO_455 をテンプレートにして作成
メニュー
簡易掲示板
LINK集
y.tackの公式BBSブックマーク
practice room
?
最新の20件
2022-10-09
多角形の内外判定
2021-05-19
RecentDeleted
2018-08-01
FrontPage
文字列型変数管理サブルーチン
GAME作成システム
2018-07-31
double型変数管理サブルーチン
int型変数管理サブルーチン
2018-07-21
GUIとメイン分割処理。たたき台2
2018-07-11
memo
NO_579_sample
GUIとメイン分割処理。たたき台
2018-06-28
NO_714
NO_712
NO_706
NO_705
NO_704
NO_703
NO_702
2018-06-23
Shift_JIS
モートン番号テーブル化 / 八分木
total
0
today
0
yesterday
0
now
1
Menu
Total:0/Today:0
開始行:
[[簡単言語_NO454toNO463]]
**NO_455 [#zce126f4]
命令をサブルーチン化
dim one_code,256
x=0
// ボタンによって選択される選択肢のID
selected_btnext="a"
my_pc=1
*sw_begin
await 1
switch my_pc
case 1:my_pc++: gosub *c_cls0:goto *sw_begin
case 2:my_pc++: cp1=120:cp2=24:gosub *c_objsize:goto *s...
case 3:my_pc++: cp1="X足す1":bt_pc_1=8:gosub *c_butto...
case 4:my_pc++: cp1="X引く1":bt_pc_2=9:gosub *c_butto...
case 5:my_pc++: cp1=150:cp2=0:gosub *c_pos:goto *sw_begin
case 6:my_pc++: cp1="ボタンを押してください":gosub *c_m...
case 7:my_pc++: goto *c_stop:goto *sw_begin
case 8: x+=1:my_pc=10:goto *sw_begin
case 9: x-=1:my_pc=10:goto *sw_begin
//ax
case 10:my_pc++: gosub *c_cls0:goto *sw_begin
case 11:my_pc++: cp1=120:cp2=24:gosub *c_objsize:goto *s...
case 12:my_pc++: cp1="NEXT":bt_pc_1=1:gosub *c_button_A:...
case 13:my_pc++: cp1=150:cp2=0:gosub *c_pos:goto *sw_begin
case 14:my_pc++: cp1="Xの値は"+x+"です":gosub *c_mes:go...
case 15:my_pc++: goto *c_stop:goto *sw_begin
swend
*bt_hoge_1
my_pc=bt_pc_1
goto *sw_begin
*bt_hoge_2
my_pc=bt_pc_2
goto *sw_begin
*sw_end
stop
*c_button_A
button cp1,*bt_hoge_1
return
*c_button_B
button cp1,*bt_hoge_2
return
*c_cls0
cls 0
return
*c_objsize
objsize cp1,cp2
return
*c_pos
pos cp1,cp2
return
*c_mes
mes ""+cp1
return
*c_stop
stop
終了行:
[[簡単言語_NO454toNO463]]
**NO_455 [#zce126f4]
命令をサブルーチン化
dim one_code,256
x=0
// ボタンによって選択される選択肢のID
selected_btnext="a"
my_pc=1
*sw_begin
await 1
switch my_pc
case 1:my_pc++: gosub *c_cls0:goto *sw_begin
case 2:my_pc++: cp1=120:cp2=24:gosub *c_objsize:goto *s...
case 3:my_pc++: cp1="X足す1":bt_pc_1=8:gosub *c_butto...
case 4:my_pc++: cp1="X引く1":bt_pc_2=9:gosub *c_butto...
case 5:my_pc++: cp1=150:cp2=0:gosub *c_pos:goto *sw_begin
case 6:my_pc++: cp1="ボタンを押してください":gosub *c_m...
case 7:my_pc++: goto *c_stop:goto *sw_begin
case 8: x+=1:my_pc=10:goto *sw_begin
case 9: x-=1:my_pc=10:goto *sw_begin
//ax
case 10:my_pc++: gosub *c_cls0:goto *sw_begin
case 11:my_pc++: cp1=120:cp2=24:gosub *c_objsize:goto *s...
case 12:my_pc++: cp1="NEXT":bt_pc_1=1:gosub *c_button_A:...
case 13:my_pc++: cp1=150:cp2=0:gosub *c_pos:goto *sw_begin
case 14:my_pc++: cp1="Xの値は"+x+"です":gosub *c_mes:go...
case 15:my_pc++: goto *c_stop:goto *sw_begin
swend
*bt_hoge_1
my_pc=bt_pc_1
goto *sw_begin
*bt_hoge_2
my_pc=bt_pc_2
goto *sw_begin
*sw_end
stop
*c_button_A
button cp1,*bt_hoge_1
return
*c_button_B
button cp1,*bt_hoge_2
return
*c_cls0
cls 0
return
*c_objsize
objsize cp1,cp2
return
*c_pos
pos cp1,cp2
return
*c_mes
mes ""+cp1
return
*c_stop
stop
ページ名: