Skip to content

Instantly share code, notes, and snippets.

connect 'ktbbs.hanzou.jp:11111 /ssh /auth=password /user=ユーザー名 /passwd=パスワード'
callmenu 54010
callmenu 54110
connect 'サーバー名:23 /nossh /T=1'
callmenu 54010
callmenu 54110
wait '='
sendln 'ユーザー名'
wait '='
sendln 'パスワード'
' 3 minute timer balloon | MSX-BASIC
' Copyright (c) 2024 BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2024
100 DEFINT A-Z
110 M=3
120 SCREEN 2
130 TIME=0
140 SOUND 6,3
150 SOUND 7,135
160 SOUND 8,5
@fu-sen
fu-sen / piboot.bas
Last active April 19, 2025 02:16
Pi Boot (Rainbow colored screen like Raspberry Pi boot) | MSX-BASIC version 3+ 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/
' Pi Boot (Rainbow colored screen like Raspberry Pi boot) | MSX-BASIC version 3+
' 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 CLS
150 FOR X=32 TO 223 STEP 4
160 K=(X-32)*64/192-32
' 1 minute timer balloon | MSX-BASIC
' Copyright (c) 2024 BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2024
100 SCREEN 3
110 SOUND 6,3
120 SOUND 7,135
130 SOUND 8,5
140 FOR S=0 TO 160 STEP 2
150 CIRCLE(128,96),S,8
160 NEXT S
' 3 minute timer | MSX-BASIC
' Copyright (c) 2024 BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2024
100 DEFINT A-Z
110 T=3
120 SCREEN 3
130 OPEN"GRP:"AS #1
140 T=T*60*60
150 TIME=0
160 N=TIME
@fu-sen
fu-sen / BALLOONS.BAS
Last active April 19, 2025 02:17
風船 balloons - SHARP POCKET COMPUTER PC-G850 series BASIC - https://poke-com.jimdofree.com/basic-%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/
1 ' Balloons | SHARP POCKET COMPUTER PC-G850 series BASIC
2 ' Copyright (c) 2024-2025 BALLOON | FU-SEN
3 ' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2024-2025
100 CLS
110 X= RND 137-1
120 GCURSOR (X,47)
130 GPRINT "1C3E7FFF7D3A1C"
140 WAIT 3
150 LOCATE 0,0
160 PRINT " "
@fu-sen
fu-sen / balloons.c
Last active April 19, 2025 02:17
Balloons | z88dk monochrome sprites functions
/*
Balloons | z88dk monochrome sprites functions
Copyright (c) 2024-2025 BALLOON | FU-SEN
The MIT License (MIT) - https://mit.balloon.net.eu.org/#2024-2025
Colecovision:
zcc +coleco -create-app -bn balloons balloons.c (generate balloons.rom)
MSX (-pragma-define:CLIB_DEFAULT_SCREEN_MODE=3 also works, after nightly build 20241218):
zcc +msx -pragma-define:CLIB_DEFAULT_SCREEN_MODE=2 -create-app -bn balloons balloons.c (Cassette tape image, generate balloons.cas)
4 COLOR15,0,0
10 SH=5
20 SCREEN,,0:KEYOFF
30 '
40 REM BLASTAR BY E.R.MUSK
50 '
60 SCREEN3
61 OPEN"GRP:"AS#1
65 DRAW"BM20,64"
70 PRINT#1,"BLASTAR"
' Clock | MSX-BASIC
' Copyright (c) 2024 BALLOON | FU-SEN
' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2024
100 SCREEN 3
110 OPEN"GRP:"AS #1
120 O$=""
130 GET TIME T$
140 T$=LEFT$(T$,5)
150 IF T$=O$ GOTO 130
160 CLS