拡大文字 2 (BASIC 1.3.2b19～)/Kidspod;

: Kidspod is a post site which supports young programmers.

First step to join us.

2019/06/15 11:42:51

MixJuice GET URL : kidspod.club/mj/864

GOOD!1
PLAY!1
VIEW896

: ふうせん FU-SEN

拡大文字 2 (BASIC 1.3.2b19～)

詳細はイチゴジャムレシピで公開しています。
「プログラムをみる」を参照して下さい。

CLS:'

NEW

10 'Enlarged character 2
20 CLS:CLV
30 [0]="
40 [1]="
50 [2]="Ichigo
60 [3]="     Jam
70 [4]="
80 [5]="
90 FOR D=0 TO 5
100 FOR I=0 TO LEN([D])
110 FOR Y=0 TO 7
120 A=PEEK(PEEK([D]+I)*8+Y)
130 FOR X=0 TO 7
140 DRAW I*8+X,D*8+Y,A>>(7-X)&1
150 NEXT:NEXT:NEXT:NEXT
160 IF !INKEY() CONT

'OK

: Kidspod運営チーム2019/07/04 16:27:33
早くも1.3.2b19に対応したプログラム！　大きな文字を表示できるというのは、色々な応用が利きそうですね。その第一歩！