5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

第1回昔のPC板杯プログラムコンテスト

33 :名無しさん@R800:01/12/22 13:48
N88互換BASIC
www.vector.co.jp/soft/win95/prog/se055956.html

5 randomize:cls:color 3,0
10 x=rnd(1):y=int(x*255)
11 if y > 240 then 13
12 print"オマエモナー ";:h=0:goto 15
13 print"オレガナー ";:h=1
15 for i=0 to 255:for j=0 to 255:next j:if h=0 and inkey$="2" then 20 else if h=1 and inkey$="2" then 21:next i
18 if h=0 then 10
20 color 4:print"イッテヨシ!":end
21 color 7:print"マンセー!!":end

”オマエモナー”に混ざって”オマエガナー”が出て来ますので
タイミング良く「2」を押して下さい。(ザカリテゲーム)
難易度は適当にjのループ数を変更して下さい。(藁

73 KB
■ このスレッドは過去ログ倉庫に格納されています

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)