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 / Caddy shortcut (startup)
Last active Jan 19, 2020
Caddy v2+php-cgi on Windows
View Caddy shortcut (startup)
C:\carry\caddy.exe run
View use-search.net.eu.org-script.html
<script type="text/javascript" src="https://search.net.eu.org/js/s.js"></script>
View use-search.net.eu.org-iframe.html
<iframe src="https://search.net.eu.org/search/" width="400" height="85" scrolling="no"></iframe>
@fu-sen
fu-sen / mog.gs
Created Jan 16, 2020
(・~・)mog 関数 - Google Apps Script
View mog.gs
function mog(num){
var str="";
for (var i=0; i<num; i++) {
str = str + "(・~・)mog ";
}
str = str.slice(0, -1);
return str;
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";
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/
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
View sin.bas
' Sine curve | MSX-BASIC
' Copyright (c) 2019 Keiichi SHIGA (BALLOON a.k.a. Fu-sen.)
' The MIT License (MIT) - https://gist.github.com/fu-sen/7e55ee56a67e07d804db9379178e3cb5
10 COLOR 15,4,7:SCREEN 2
20 LINE(0,96)-(255,96),14
30 FOR X=0 TO 255
40 Y=96*(1-3.1415927*2*X/192)
50 PSET(X,Y),15
60 NEXT X
70 I$=INPUT$(1)
@fu-sen
fu-sen / sin.c
Last active Nov 19, 2019
Sine curve | z88dk mono graphics https://blog.balloon.im/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
You can’t perform that action at this time.