ã“ã©ã‚‚ã®é ƒã®æ€ã„出。ãŠè²·ã„物ã«ã¤ã„ã¦è¡Œã楽ã—ã¿ã€ã‚²ãƒ¼ãƒ コーナーã®ãƒ¡ãƒ€ãƒ«ã‚²ãƒ¼ãƒ 。メダルを入れã¦ã€Œã‚¸ãƒ£ãƒ³ã‚±ãƒ³ã€ã€Œãƒãƒ³ã€ã€Œãƒ•ã‚£ãƒ¼ãƒãƒ¼ã€ã¨ã—ゃã¹ã‚‹ã‚²ãƒ¼ãƒ ãŒå¥½ãã§ã—ãŸã€‚
今回ã¯é›°å›²æ°—ã‹ã‚‰å…¥ã‚ã†ã¨ãƒ‰ãƒƒãƒˆçµµã§ã€ãーã€ã¡ã‚‡ãã€ã±ãƒ¼ã‚’作æˆã€‚
今回ã¯é›°å›²æ°—ã‹ã‚‰å…¥ã‚ã†ã¨ãƒ‰ãƒƒãƒˆçµµã§ã€ãーã€ã¡ã‚‡ãã€ã±ãƒ¼ã‚’作æˆã€‚
10 POKE#700,0,0,0,124,170,129,66,60 20 POKE#708,108,84,84,84,130,129,66,60 30 POKE#710,60,34,225,161,129,129,66,60 40 ?CHR$(224),CHR$(225),CHR$(226)
表示ã—ã¦ã¿ã¾ã—ãŸã€‚ãªã‹ãªã‹ã‹ã‚ã„ãã§ãã¾ã—ãŸã€‚8x8ã®ãƒ‰ãƒƒãƒˆçµµã€ä¸‹3è¡Œã€129,66,60ã¯å…¨éƒ¨å…±é€šã§ã™ã€‚
ã¾ãšã¯ã‚·ãƒ³ãƒ—ルã«ã‚¸ãƒ£ãƒ³ã‚±ãƒ³ã‚²ãƒ¼ãƒ ã«ã—ã¾ã™ã€‚作æˆã—ãŸãƒ‘ターンã«ç¶šã‘ã¾ã™ã€‚
40 INPUT"JANKEN(0-2)?",Y 50 C=RND(3) 60 ?"PON! YOU:";CHR$(224+Y),"COM:";CHR$(224+C) 70 IF Y=C INPUT"AIKODE(0-2)?",Y:GOTO50 80 IF (Y-C+3)%3=2 ?"WON!" ELSE ?"LOST..."
0ã€1ã€2ã§ã‚¸ãƒ£ãƒ³ã‚±ãƒ³ã®æ‰‹ã‚’決ã‚ã¦å‹è² ï¼
続ã„ã¦ã€æ‰€æŒã‚³ã‚¤ãƒ³ã‚’10æžšã‹ã‚‰åˆã‚ã¦ã€è²·ã£ãŸã‚‰å€ã«ãªã‚‹ã‚²ãƒ¼ãƒ ã«æ”¹é€ ã—ã¦ã¿ã¾ã™ã€‚
35 M=10 36 ?:?"COIN:";M 37 INPUT"BET?",N:IF N=0 OR N>M CONT ELSE M=M-N 80 IF (Y-C+3)%3=2 ?"WON!":M=M+N*2 ELSE ?"LOST..." 90 IF M=0 ?"GAMEOVER":END ELSE GOTO 36
変数MãŒæ‰€æŒã‚³ã‚¤ãƒ³æ•°ã€‚80è¡Œã®å‹ã£ãŸã¨ã処ç†ãŒãƒã‚¤ãƒ³ãƒˆã§ã™ï¼
æ‡ã‹ã—ã„ï¼éŸ³å£°åˆæˆãƒœãƒ¼ãƒ‰ã‚’åŠ ãˆã¦ã€ã—ゃã¹ã‚‹ã‚ˆã†ãªæ”¹é€ も良ã„ã§ã™ãï¼
æ›´ã«ç¶šã„ã¦ã€è²·ã£ãŸã‚‰ã€ãƒ•ã‚£ãƒ¼ãƒãƒ¼ãƒ¢ãƒ¼ãƒ‰ã«ãªã£ã¦ã€0å€ã‹ã‚‰3å€ã«ãƒ©ãƒ³ãƒ€ãƒ ã«ãªã‚‹ã‚²ãƒ¼ãƒ ã«æ”¹é€ ï¼
80 IF (Y-C+3)%3=2 ?"WON!":GSB100 ELSE ?"LOST..." 100 ?"FEVER! ...";:WAIT30 110 R=RND(4):?R 120 ?N*R;" COIN GET!":M=M+N*R 130 RTN
ã‚„ã‚„ã“ã—ã„処ç†ã‚’è¿½åŠ ã™ã‚‹ã¨ãã«ã¯ã€GOSOB(ゴーサブã€çŸç¸®å½¢GSB)/RETURN(リターンã€çŸç¸®å½¢RTN)ãŒä¾¿åˆ©ã§ã™ã€‚
今回ã¯ãƒ—ãƒã‚°ãƒ©ãƒ ã§ã‚ºãƒ«ã‚’ã—ã¦ã„ã¾ã›ã‚“。ã©ã†ã™ã‚‹ã¨æ¥½ã—ããªã‚‹ã‹ã€ã„ã‚ã„ã‚試行錯誤ã—ã¦ã¿ã‚‹ã®ã‚‚楽ã—ã„ã§ã™ã‚ˆï¼
ã˜ã‚ƒã‚“ã‘んゲームã€å…¨ãƒ—ãƒã‚°ãƒ©ãƒ
10 POKE#700,0,0,0,124,170,129,66,60 20 POKE#708,108,84,84,84,130,129,66,60 30 POKE#710,60,34,225,161,129,129,66,60 35 M=10 36 ?:?"COIN:";M 37 INPUT"BET?",N:IF N=0 OR N>M CONT ELSE M=M-N 40 INPUT"JANKEN(0-2)?",Y 50 C=RND(3) 60 ?"PON! YOU:";CHR$(224+Y),"COM:";CHR$(224+C) 70 IF Y=C INPUT"AIKODE(0-2)?",Y:GOTO50 80 IF (Y-C+3)%3=2 ?"WON!":GSB100 ELSE ?"LOST..." 90 IF M=0 ?"GAMEOVER":END ELSE GOTO 36 100 ?"FEVER! ...";:WAIT30 110 R=RND(4):?R 120 ?N*R;" COIN GET!":M=M+N*R 130 RTN
cimgxGhttps://img.sabae.cc/data/2049/59119570-96b3-42a4-83df-092c01270deb.jpg