3 分タイマー風船 (3 minute timer balloon) - 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/

3minball.bas

1 ' 3 minute timer balloon | SHARP POCKET COMPUTER PC-E200 / G series BASIC
2 ' Copyright (c) 2025 BALLOON | FU-SEN
3 ' The MIT License (MIT) - https://mit.balloon.net.eu.org/#2025
100 CLS
110 FOR C=1 TO 76
120 CIRCLE (71,24),C
130 CIRCLE (72,24),C
140 NEXT C
150 CLS
160 FOR B=10 TO 150 STEP 20
170 BEEP 1,B,5
180 OUT &H40,&HA7
190 BEEP 1,B+10,5
200 OUT &H40,&HA6
210 NEXT B