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
/* | |
zcc +g800 -create-app -bn ledg800 ledg800.c | |
*/ | |
/* | |
gprint data | |
PC-E200/G series other than PC-G815 and PC-G850 have 1 character = 5x7 dots, | |
so 1 character is 5 bytes, and there is no data between characters. | |
and 0x80 is not drawn. |
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 ' Calendar | SHARP POCKET COMPUTER PC-G815 BASIC | |
2 ' Copyright (c) 2025 BALLOON | FU-SEN | |
3 ' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
100 CLS :RESTORE :DIM P(19):PX=1:PY=4:C=0 | |
110 LINE (56,0)-(87,31),S,BF | |
120 LINE (59,0)-(84,30),R,BF | |
130 LINE (66,31)-(77,31),R | |
140 FOR I=0 TO 19:READ P(I) | |
150 Y=INT(I/4):X=I-Y*4 | |
160 BL=P(I):GOSUB 520:NEXT I |
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
/* | |
Balloons | PC-E200 / G series | z88dk C language | |
Copyright (c) 2025 BALLOON | FU-SEN | |
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
zcc +g800 -create-app -bn balloons balloons.c | |
--> MON | |
R | |
G100 | |
*/ |
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
/* | |
Nyan Cat | PC-G815 (PC-E200 / G series) | z88dk C language | |
Copyright (c) 2025 BALLOON | FU-SEN | |
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
zcc +g800 -create-app -bn nyancat nyancat.c | |
--> MON | |
R | |
G100 | |
*/ |
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
/* | |
Nyan Cat | PC-G850 series | z88dk C language | |
Copyright (c) 2025 BALLOON | FU-SEN | |
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
zcc +g800 -create-app -bn nyancat nyancat.c | |
--> MON | |
R | |
G100 | |
*/ |
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
/* | |
POKE COM logo | PC-E200 / G series | z88dk C language | |
Copyright (c) 2025 BALLOON | FU-SEN | |
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
zcc +g800 -create-app -bn logo logo.c | |
--> MON | |
R | |
G100 | |
*/ |
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 ' Sine Curve | SHARP POCKET COMPUTER PC-G815 BASIC | |
2 ' Copyright (c) 2025 BALLOON | FU-SEN | |
3 ' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
100 DEGREE | |
110 CLS | |
120 FOR X=0 TO 143 STEP 2 | |
130 PSET (X,16) | |
140 NEXT X | |
150 O=16 | |
160 FOR X=1 TO 143 |
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
/* | |
Nyan Cat | z88dk monochrome sprites functions | |
Copyright (c) 2025 BALLOON | FU-SEN | |
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
Colecovision: | |
zcc +coleco -create-app -bn nyancat nyancat.c (generate nyancat.rom) | |
MSX: | |
zcc +msx -pragma-define:CLIB_DEFAULT_SCREEN_MODE=3 -create-app -bn nyancat nyancat.c (Cassette tape image, generate nyancat.cas) |
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 ' Calendar | SHARP POCKET COMPUTER PC-G850 series BASIC | |
2 ' Copyright (c) 2025 BALLOON | FU-SEN | |
3 ' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
100 RANDOMIZE :M=15:S=0:DIM P(15):CLS | |
110 FOR I=0 TO 14 | |
120 LINE ((I MOD 4)*12+49, INT (I/4)*12+1)-((I MOD 4)*12+58, INT (I/4)*12+10),S,B | |
130 GCURSOR ((I MOD 4)*12+50, INT (I/4)*12+9) | |
140 P=I+1:GOSUB 490 | |
150 P(I)=I+1:NEXT I | |
160 P(15)=16 |
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
' Klotski | MSX-BASIC | |
' Copyright (c) 2025 BALLOON | FU-SEN | |
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025 | |
100 R=RND(-TIME) | |
110 DEFINT A-Z | |
120 M=16 | |
130 S=0 | |
140 SCREEN 1,3 | |
150 KEY OFF | |
160 DIM S$(16),P(16) |