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 / a-z-type.bas
Last active Sep 18, 2019
A~Z 素早くタイプ A to Z quick type | IchigoJam BASIC 1.2.2+ https://15jamrecipe.jimdo.com/
View a-z-type.bas
' A to Z quick type | IchigoJam BASIC
' Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
10 'A to Z quick type
20 VIDEO 7:CLS:CLT
30 FOR A=65 TO 90
40 LC 2,1:? CHR$(A)
50 IF INKEY()!=A CONT
60 NEXT:T=TICK():CLS
70 ? T/60;".";T%60/6;"s";
@fu-sen
fu-sen / reiwa-cake.bas
Last active Sep 12, 2019
令和 reiwa | IchigoCake BASIC https://15jamrecipe.jimdo.com/
View reiwa-cake.bas
NEW
POKE #104A,#88
POKE #1069,#88,#8F,#85
POKE #1089,#8F,#8F,#85
POKE #1095,#88,#8C
POKE #10A8,#8A,#8F,#8F,#85
POKE #10B5,#8E,#8F,#8F,#8C,#8E,#84
POKE #10C8,#8E,#8F,#8F,#81
POKE #10D4,#8A,#8F,#8F,#8F,#8F,#8F,#85
View balloons.rb
# Balloons | ruby4ij
# Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
# The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
cls
while inkey()==-1
x=rnd 31
lc x,23
p 232
@fu-sen
fu-sen / changeja.bas
Last active Aug 17, 2019
Change to IchigoJam ja kana(カナ) v1.2-1.3 font | IchigoJam BASIC 1.3.2b13+
View changeja.bas
' Change to IchigoJam ja kana font | IchigoJam BASIC 1.3.2b13+
'
' Source(#D00-#DFF) https://gist.github.com/fu-sen/21400660612ad674f660b056fb07ece3
' Original https://github.com/IchigoJam/c4ij/blob/master/src/main-exkbd.c
' and BASIC Program
' Copyright (c) 2019 Taisuke Fukuno / Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
'
' IchigoJam Font(#E00-#FFF) https://fukuno.jig.jp/app/IchigoJam/charmap-v12.html
' CC BY IchigoJam https://ichigojam.net/ Licensed by jig.jp https://jig.jp/
@fu-sen
fu-sen / changeja.bas
Created Aug 17, 2019
Change to IchigoJam ja kana(カナ) v1.4 font | IchigoJam BASIC 1.3.2b13+
View changeja.bas
' Change to IchigoJam ja kana font | IchigoJam BASIC 1.3.2b13+
'
' Source(#D00-#DFF) https://gist.github.com/fu-sen/21400660612ad674f660b056fb07ece3
' Original https://github.com/IchigoJam/c4ij/blob/master/src/main-exkbd.c
' and BASIC Program
' Copyright (c) 2019 Taisuke Fukuno / Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
'
' IchigoJam Font(#E00-#FFF) https://fukuno.jig.jp/app/IchigoJam/charmap-v12.html
' CC BY IchigoJam https://ichigojam.net/ Licensed by jig.jp https://jig.jp/
@fu-sen
fu-sen / sin.c
Last active Jul 29, 2019
Sine curve | z88dk mono graphics https://balloon.gq/categories/z88dk/
View sin.c
/*
Sine curve | z88dk mono graphics
Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
MSX (MSX turbo R has the tape feature removed!):
zcc +msx -lm -lmsxbios -create-app -bn sin sin.c (Cassette tape image, generate sin.cas)
--> BLOAD"CAS:",R
zcc +msx -lm -lmsxbios -create-app -subtype=disk -bn sin sin.c (BASIC BLOAD file, generate sin.msx)
--> BLOAD"SIN.MSX",R
@fu-sen
fu-sen / text.h
Last active Jul 23, 2019
text sample | z88dk
View text.h
#include <stdio.h>
void main() {
for (int y=1; y<=6; y++) {
for (int x=1; x<=24; x++) {
printf("%c[%u;%uH ", 27, y, x);
}
}
printf("%c[%u;%uH",27,2,2); // locate
@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)
You can’t perform that action at this time.