Skip to content

Instantly share code, notes, and snippets.

View fu-sen's full-sized avatar
🎈
🎈😍

BALLOON | FU-SEN fu-sen

🎈
🎈😍
57 followers · 5 following
View GitHub Profile
@fu-sen
fu-sen / main-changepcg.c
Last active April 19, 2025 02:37
フォント変更 C 言語ソース | C language for IchigoJam (c4ij, IchigoJam BASIC 1.3.2b13～) https://github.com/IchigoJam/c4ij https://15jamrecipe.jimdofree.com/basic/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/%E3%83%95%E3%82%A9%E3%83%B3%E3%83%88%E5%A4%89%E6%9B%B4/
// Change to font #A0-#DF | C language for IchigoJam (c4ij, IchigoJam BASIC 1.3.2b13+)
// Original https://github.com/IchigoJam/c4ij/blob/master/src/main-exkbd.c
// Copyright (c) 2019 Taisuke Fukuno / BALLOON | FU-SEN
// The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019
#include <std15.h>
__attribute__ ((section(".main")))
int main(int param, int ram, int rom, int (*divfunc)()) {
int res;
@fu-sen
fu-sen / changepcg-kana.bas
Last active April 19, 2025 02:25
IchigoJam BASIC 1.3.2b13～ #A0～#DF(カナ部分)を変更 ※ このまま実行すると初期状態のカナに戻せます。 https://15jamrecipe.jimdofree.com/basic/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/%E3%83%95%E3%82%A9%E3%83%B3%E3%83%88%E5%A4%89%E6%9B%B4/
' Change to IchigoJam kana font (Direct) | 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 Command
' Copyright (c) 2019 Taisuke Fukuno / BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019
'
' 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 / pcg-a0-df.bas
Last active April 19, 2025 02:22
キャラクターパターン #A0～#DF を #E00～#FFF への POKE で表示 | IchigoJam BASIC
' Output of IchigoJam Character #A0-#DF | IchigoJam BASIC
' Copyright (c) 2019 BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019
10 A=#E00
20 FOR C=#A0 TO #DF STEP 2
30 IF C%2 GOTO 60
50 ?"POKE#";HEX$(A);:A=A+16
60 FOR D=0 TO 15
70 ?",";PEEK(C*8+D);
80 NEXT
@fu-sen
fu-sen / main-balloons.c
Last active April 19, 2025 02:22
風船 Balloons | C language for IchigoJam (c4ij, IchigoJam BASIC 1.3.2b12+) https://15jamrecipe.jimdofree.com/basic/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/%E9%A2%A8%E8%88%B9/
// Balloons | C language for IchigoJam (c4ij, IchigoJam BASIC 1.3.2b12+)
// Copyright (c) 2019 BALLOON | FU-SEN
// The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019
#include <std15.h>
__attribute__ ((section(".main")))
int main(int param, int ram, int rom, int (*divfunc)()) {
cls();
@fu-sen
fu-sen / yjkcolor.bas
Last active April 19, 2025 02:22
MSX2+ YJK Colors | MSX-BASIC 3.0+ (MSX2+/turbo R) https://msxjpn.jimdofree.com/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/yjk-%E8%A1%A8%E7%A4%BA/
' MSX2+ YJK colors | MSX-BASIC
' Copyright (c) 2019-2024 BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019-2024
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.bas
Last active April 19, 2025 02:21
風船 Balloons | MSX-BASIC https://msxjpn.jimdofree.com/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/%E9%A2%A8%E8%88%B9/
' Balloons | MSX-BASIC
' Copyright (c) 2019 BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019
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.c
Last active April 19, 2025 02:21
MSX2+ YJK Colors | MSX-BASIC 3.0+ (MSX2+/turbo R) / z88dk https://msxjpn.jimdofree.com/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/yjk-%E8%A1%A8%E7%A4%BA/
/*
MSX2+ YJK colors | MSX2+ / z88dk
Copyright (c) 2019-2024 BALLOON | FU-SEN
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019-2024
zcc +msx -lndos -create-app -subtype=disk -bn yjkcolor yjkcolor.c
--> BLOAD"YJKCOLOR.MSX",R
*/
void ldirvm(int addr, int vaddr, int size)
@fu-sen
fu-sen / balloons.c
Last active April 19, 2025 02:21
風船 Balloons version 2 | MSX-BASIC 2.0+ (MSX2/MSX2+/turbo R) / z88dk https://msxjpn.jimdofree.com/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/%E9%A2%A8%E8%88%B9/
/*
Balloons version 2 | MSX2 / z88dk
Copyright (c) 2019-2025 BALLOON | FU-SEN
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019-2025
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 / balloons-dos.c
Last active April 19, 2025 02:21
風船 Balloons version 2 MSX-DOS .com version | MSX-DOS / MSX2 / z88dk | download: https://msx.surge.sh/balloons.com | https://msxjpn.jimdofree.com/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/%E9%A2%A8%E8%88%B9/
/*
Balloons version 2 MSX-DOS .com version | MSX-DOS / MSX2 / z88dk
Copyright (c) 2019-2025 BALLOON | FU-SEN
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019-2025
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 / balldemo.c
Last active April 19, 2025 02:21
風船デモ Balloons Demo | MSX / z88dk https://msxjpn.jimdofree.com/%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/%E9%A2%A8%E8%88%B9%E3%83%87%E3%83%A2/
/*
Balloons Demo | MSX / z88dk
Copyright (c) 2019-2025 BALLOON | FU-SEN
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2019-2025
zcc +msx -lndos -create-app -subtype=disk -bn balldemo balldemo.c
--> BLOAD"BALLDEMO.MSX",R
zcc +msx -lndos -create-app -bn balldemo balldemo.c
--> BLOAD"CAS:",R (BALLDEMO.CAS)
zcc +msx -lndos -create-app -subtype=wav -bn balldemo balldemo.c