2013年6月24日投稿 投稿者:イン /タグ : 投稿プログラム 簡単プログラム
初投稿です。自分は小5なので、皆様を見習って頑張っていきたいと思います。
現在4つ
このプログラムは、1と11以上の数字を入力すると、線を描くことができて、2~9の数字を入力すると、「エラー」と表示されます。少し改変しました。10を入力すると・・・・
- @B
- INPUT”1オシテ”;A
- ON A GOTO @O,@S,@O,@O,@O,@O,@O,@O,@O,@O,@U
- @S
- IF P==1 THEN GLINE X1,Y1,TCH X,TCHY,15:P=1
- IF TCHST==1 THEN X1=TCHX:Y1=TCHY:VSYNC 1:P=1
- GOTO @S
- @O
- PRINT”エラー”
- GOTO @B
- @U
- BEEP 1
- BEEP 2
- GOTO @U
例外処理をつけました。1.1と分けた理由は、内容がかなり変わってしまったからです。6月26日、更新しました。10をおすと・・・・・・
- @B
- INPUT”スウシ゛オシテ”;A
- D=0
- IF A<10 THEN D=1
- IF A==10 THEN D=2
- ON D GOTO @0,@S,@P
- @S
- IF P==1 THEN GLINE X1,Y1,TCH X,TCHY,15:P=1
- IF TCHST==1 THEN X1=TCHX:Y1=TCHY:VSYNC 1:P=1
- GOTO@S
- @O
- PRINT”エラー”
- BEEP 13
- GOTO@B
- @P
- INPUT”スウシ゛オシテミテ”;B
- IF B>10 THEN COLOR 9
- IF B<10 THEN COLOR 5
- GOTO@B
配列変数を使っています。もうそろそろ、ちょっとしたプログラムを作れるかも!!
- MKN(1)=34
- MKN(2)
- MKN(3)
- MKN(4)
- MKN(5)
- MKN(6)
- MKN(7)
- MKN(8)
- MKN(9)
- @A
- INPUT”ホ゛タンオシテ”;D
- IF D>9 THEN GOTO@S
- PRINT D”ニチメミカン”;MKN(D); コ
- GOTO@A
- @S
- BEEP 4
- COLOR 7
- PRINT”エラー”
- COLOR 0
- GOTO@A
数字を入力することで、入力した数字の効果音が鳴ります。225~260くらいまで効果音はあります。番号当てゲームもできたりします。
- @A
- INPUT”スウシ゛オシテ”;A
- IF A>260 THEN GOTO@A
- BEEP A
- GOTO@A
この作品に対するコメントがあれば一言どうぞ。
超初心者の俺にアドバイスがある方はここにどうぞ。
表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.136 秒 | このページの最終更新 : 2022/09/20 (火) 12:44:16 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30