Last active
April 19, 2025 02:15
-
-
Save fu-sen/fb2d07dee3a8d7ce3392bddf3a8af53f to your computer and use it in GitHub Desktop.
RANDOM screen - SHARP POCKET COMPUTER PC-E200/G series BASIC https://poke-com.jimdofree.com/basic-%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| 1 ' RANDOM screen | SHARP POCKET COMPUTER PC-E200 / G series BASIC | |
| 2 ' Copyright (c) 2025 BALLOON | FU-SEN | |
| 3 ' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
| 100 CLS | |
| 110 RANDOMIZE | |
| 120 X= RND 24-1 | |
| 130 Y= RND 4-1 | |
| 140 C= RND 2 | |
| 150 LOCATE X,Y | |
| 160 IF C=1 PRINT CHR$ (32); | |
| 170 IF C=2 PRINT CHR$ (142); | |
| 180 GOTO 120 |
Author
fu-sen
commented
Jan 23, 2025
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment