Skip to content

Instantly share code, notes, and snippets.

🎈
🎈😍

BALLOON a.k.a. Fu-sen. fu-sen

🎈
🎈😍
Block or report user

Report or block fu-sen

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@fu-sen
fu-sen / balloon.c
Created Jul 1, 2019
z88dk sprite sample 8x8
View balloon.c
char sprite[] = { 8, 8,
0x0e /* ....###. */,
0x1d /* ...###.# */,
0x1f /* ...##### */,
0x1f /* ...##### */,
0x0e /* ....###. */,
0x08 /* ....#... */,
0x10 /* ...#.... */,
0xe0 /* ###..... */
};
@fu-sen
fu-sen / balldemo.c
Last active Jul 21, 2019
風船デモ Balloons Demo | MSX-BASIC / z88dk https://msxjpn.jimdo.com/
View balldemo.c
/*
Balloons Demo | MSX-BASIC / z88dk
Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
zcc +msx -lndos -create-app -subtype=disk -bn balldemo balldemo.c
--> BLOAD"BALLDEMO.MSX",R
or
zcc +msx -lndos -create-app -bn balldemo balldemo.c
--> BLOAD"CAS:",R (BALLDEMO.CAS)
@fu-sen
fu-sen / balloons-dos.c
Last active Jul 12, 2019
風船 Balloons version 2 MSX-DOS .com version | MSX-DOS / MSX2 / z88dk https://msxjpn.jimdo.com/ https://msx.surge.sh/balloons.com
View balloons-dos.c
/*
Balloons version 2 MSX-DOS .com version | MSX-DOS / MSX2 / z88dk
Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
zcc +msx -subtype=msxdos -bn balloons.com balloons-dos.c
(MSX-DOS 2.30+ set the following: SET EXPERT ON )
--> BALLOONS
*/
@fu-sen
fu-sen / balloons.c
Last active Jul 12, 2019
風船 Balloons version 2 | MSX-BASIC 2.0+ (MSX2/MSX2+/turbo R) / z88dk https://msxjpn.jimdo.com/
View balloons.c
/*
Balloons version 2 | MSX-BASIC 2.0+ / z88dk
Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
zcc +msx -lndos -create-app -subtype=disk -bn balloons balloons.c
--> BLOAD"BALLOONS.MSX",R
*/
void wrtvdp(char reg, char data)
@fu-sen
fu-sen / yjkcolor.c
Last active Jul 5, 2019
MSX2+ YJK Colors | MSX-BASIC 3.0+ (MSX2+/turbo R) / z88dk https://msxjpn.jimdo.com/
View yjkcolor.c
/*
MSX2+ YJK colors | MSX-BASIC 3.0+ / z88dk
Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
zcc +msx -lndos -create-app -subtype=disk -bn yjkcolor yjkcolor.c
--> BLOAD"YJKCOLOR.MSX",R
*/
void chgclr(char forclr, char bakclr, char bdrclr)
@fu-sen
fu-sen / enlarge2.bas
Created Jun 15, 2019
拡大文字 2 Enlarged character 2 | IchigoJam BASIC 1.3.2b19~(1.4.0~) https://15jamrecipe.jimdo.com/
View enlarge2.bas
' Enlarged character 2 | IchigoJam BASIC 1.3.2b19+
' Copyright (c) 2015-2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/c0611b12b5ce41773d48282a21e9c215
10 'カクダイ モジ 2
20 CLS:CLV
30 [0]="
40 [1]="
50 [2]="Ichigo
60 [3]=" Jam
70 [4]="
@fu-sen
fu-sen / random2-1.4.bas
Created Jun 15, 2019
ランダム画面 2 Random Screen 2 | IchigoJam BASIC 1.3.2b19~(1.4.0~) https;//15jamrecipe.jimdo.com/basic/
View random2-1.4.bas
' Random Screen 2 | IchigoCake BASIC 1.3.2b19+
' Copyright (c) 2015-2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/c0611b12b5ce41773d48282a21e9c215
10 'Random Screen 2
20 CLS
30 DRAW RND(64),RND(48),2
40 GOTO 30
@fu-sen
fu-sen / balloons.bas
Last active Jun 6, 2019
風船 Balloons (MSX JAPAN▉ top page program 6 Jun, 2019) | MSX-BASIC https://msxjpn.jimdo.com/
View balloons.bas
' Balloons (MSX JAPAN top page program 6 Jun, 2019) | MSX-BASIC
' Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
100 DEFINT A-Z:DIM B(15)
110 COLOR 15,1,1:SCREEN 1
120 KEY OFF:WIDTH 32
130 FOR L=0 TO 15
140 READ B(L):NEXT L
150 FOR C=2 TO 15
160 FOR L=0 TO 7
@fu-sen
fu-sen / yjkcolor.bas
Last active Jun 3, 2019
MSX2+ YJK Colors (MSX JAPAN▉ top page program 3 Jun, 2019) | MSX-BASIC 3.0+ (MSX2+/turbo R) https://msxjpn.jimdo.com/
View yjkcolor.bas
' MSX2+ YJK colors (MSX JAPAN top page program 3 Jun, 2019) | MSX-BASIC
' Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
100 DEFINT A-Z
110 C=15*8:'Y*8
120 SCREEN 12
130 COLOR 255,0,0
140 FOR J=-32 TO 31
150 X=128+J*256/64
160 LINE(X+2,0)-(X+2,211),C+(J AND 7)
@fu-sen
fu-sen / balloons-c.bas
Last active Jun 3, 2019
風船 Balloons C 言語版 C-Language version | IchigoJam BASIC 1.3.2b12~ https://15jamrecipe.jimdo.com/
View balloons-c.bas
' Balloons | IchigoJam BASIC 1.3.2b12+
' Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
10 'Balloons C-Language
20 POKE #800,248,181,204,35,27,136,152,71,192,39,206,38,59,136,31,32
30 POKE #810,152,71,196,36,23,33,51,136,5,0,152,71,35,136,232,32
40 POKE #820,152,71,35,136,10,32,152,71,202,35,27,136,152,71,67,28
50 POKE #830,11,209,214,35,8,48,27,136,152,71,51,136,40,0,23,33
60 POKE #840,152,71,35,136,242,32,152,71,224,231,0,32,248,189
70 CLP:U=USR(#800,0)
You can’t perform that action at this time.