十一歩目　これは？

〜高度なプログラム？〜
　　　　　まあ　１０歩目と同じ内容なのね
　　　　　ココでは　繰り返しと　if　を使ったプログラムを
　　　　　思いついただけ書いてみました

	
	screen 0,200,150
	repeat 25
	cls
	color 0,cnt*10,0
	mes cnt
	if cnt=10:mes "１０回繰り返した"	
	if cnt=20:mes "２０回繰り返した"
	wait 10
	loop
	stop

　　　　　おお！　　もうこれは分かるだろう
　　　　　まず　画面が大きいので　screen　で　小さくして
　　　　　で　repeat　と　cls　は　もうおなじみだな
　　　　　color　もやったよね　でも一応説明
　　　　　　一番左と右の０は変わらない
　　　　　　で　繰り返した回数が自動入力される　cnt　があるから　
　　　　　　繰り返すたびに　だんだん数字が大きくなってくけれど
　　　　　　１ずつ増えていくのでは　あまりにも変わらないので
　　　　　　10倍してくのさ　でもcolorは　２５５が限界なので
　　　　　　repeat　の右に　２５と書いた　そうすれば　２５回しか繰り返せない　つまりcntは最大２５までしかならないと言うことだ
　　　　　　２５の１０倍だから　最大２５０　これでいいでしょ？
　　　　　それから　繰り返した回数が１０になったら
　　　　　「１０回繰り返した」　を表示して
　　　　　２０回繰り返したら　「２０回繰り返した」　を表示する（一瞬だけだけどね）
　　　　　まあということね
　　　　　

戻る　コウザへ　ホームへ　次へ