第１回昔のＰＣ板杯ﾌﾟﾛｸﾞﾗﾑｺﾝﾃｽﾄ

33 ：名無しさん＠Ｒ８００：01/12/22 13:48.net

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

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