CASIO 5800P 計(jì)算器游戲--猜數(shù)字游戲原代碼

我編的計(jì)算器小游戲--猜數(shù)字游戲

LbI I↙ "xxGUESS NUMBERxx xPROGRAMMER:JCHx ---------------- START>>>>>>>[EXE]"◢ LbI Q↙ "xxxDIFFICULTYxxx [1EASY][2MIDDLE][3HARD]"?→N: N=1=>GOTO N:N=2=>GOTO O: N=3=>GOTO P:GOTO Q↙LbI P:5→N:GOTO G↙ LbI O:10→N:GOTO G↙ LbI N:20→N: LbI G↙RanInt#(1,9)→A↙ LbI C:RanInt#(0,9)→B: B=A=>GOTO C↙ LbI D:RanInt#(0,9)→C:C=A Or C=B=>GOTO D↙ LbI E:RanInt#(0,9)→D: D=A Or D=B Or D=C=>GOTO E↙ N→MLbI 9↙ "PLEASE INPUT A FOOR PLACE NUMBER"↙ LbI 1:"THOUSAND"?→G:G= 482129314=>GOTO L:G=413921284 =>GOTO M:LbI Y:1≤G And G≤9 =>GOTO 2:"WRONG!":GOTO 1↙LbI 2↙ LbI 3:"HUNDRED"?→H: 0≤H And H≤9 And H≠G=> GOTO 4:"WRONG!":GOTO 3: LbI 4↙LbI 5:"TEN"?→I:0≤I And I≤9 And I≠G And I≠H=>GOTO 6: "WRONG!":GOTO 5:LbI 6↙LbI 7:"INGIVIDUAL"?→J: 0≤J And J≤9 And J≠G And J≠H And J≠I=>GOTO 8: "WRONG!":GOTO 7:LbI 8↙"YOU CHOOSE NUMBER IS":1000G+100H+10I+J◢0→K:0→L↙ G=A=>Isz K:G=B=>Isz L:G=C =>Isz L:G=D=>Isz L↙H=B=>Isz K:H=A=>Isz L:H=C =>Isz L:H=D=>Isz L↙I=C=>Isz K:I=A=>Isz L:I=B =>Isz L:I=D=>Isz L↙J=D=>Isz K:J=A=>Isz L:J=B =>Isz L:J=C=>Isz L↙CLS↙ Locate 1,2,"A="↙ Locate 3,2,K↙ Locate 6,2,"B="↙ Locate 8,2,L↙ Locate 10,2,"FREE="↙ Locate 15,2,M-1↙ Locate 1,1,"NUMBER="↙ Locate 13,1,1000G+100H+10I+J◢CLS↙ Dsz M=GOTO A↙ "TRUE ANSWER:"↙ 1000A+100B+10C+D◢ LbI M↙"xxxxxxxxxxxxxxxx xxxxGAME OVERxxx xxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxx"◢GOTO H↙ LbI A:K=4=>GOTO B:GOTO 9: LbI B:LbI L↙"xxxxxxxxxxxxxxxx xxxxxYOU WIN!xxxx xxxxxxxxxxxxxxxx"◢GOTO H:LbI H:LbI K↙"xxxPLAY AGAIN?xxx xxxxxxxxxxxxxxxxxx[1YES] [2NO]"?→O: O=1=>GOTO I:O=2=>GOTO J: GOTO K:LbI J:"GOOD BEY!": STOP↙

?? 因?yàn)槲业?5800P丟了,所以以后只能看這個(gè)來回憶我的計(jì)算器了,我還寫了幾個(gè)其他的游戲,但都不是太好玩就不打上來了,不過我還寫過一個(gè)秒表的程序,這個(gè)秒表很小,大概也就60行左右,但我耗費(fèi)的經(jīng)歷和時(shí)間一點(diǎn)也不比這個(gè)猜數(shù)游戲少,所以改天我再把秒表程序發(fā)上來了。

? 其實(shí)我也并不指望誰來看，有時(shí)間自己看看就行了，只是想記錄下來我曾經(jīng)做過的東西，因?yàn)閷懙奖旧显缤頃?huì)弄的不知道到哪去，所以寫到這里就不會(huì)丟了吧。

——原文發(fā)表于2008年3月26日

轉(zhuǎn)載于:https://www.cnblogs.com/xxcanghai/p/4613254.html

總結(jié)

以上是生活随笔為你收集整理的CASIO 5800P计算器游戏--猜数字游戏的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。