したらばTOP ■掲示板に戻る■ 全部 1-100 最新50 | |

プチコン総合スレッド

393：お茶犬：2012/04/02(月) 11:13:32 ID:TgouNn8w
>>352
LBL$="TXTDT0"
GOSUB@PRTTEXT
END

@PRTTEXT
RESTORE "@"+LBL$
FOR Z=0 TO 2
READ TXT$
READ CL$
FOR I=0 TO LEN(TXT$)-1
WAIT 2
FOR CLI=0TO 15
IF MID$(CL$,I,1)==HEX$(CLI)THEN CL=CLI
NEXT CLI
COLOR CL
PRINT MID$(TXT$,I,1);
NEXT I:PRINT:WAIT 2
NEXT Z
RETURN

@TXTDT0
DATA"ﾃｽﾄﾀﾞﾖ-ﾝ","01234567"
DATA"ｱ-ｱ-ﾃｽﾄﾃｽﾄ","89ABCDEF01"
DATA"ﾃｽﾀﾏﾝ!?","2345678"

@TXTDE1
DATA"ｱ-ｱ-ﾏｲｸﾃｽﾄﾁｭｳ•••","0123456789ABCDEF"
DATA"ｼﾊﾞﾗｸｵﾏﾁｸﾀﾞｻｲ","0123456789ABC"
DATA"\(^o^)/" ,"DEF0123"
新着レスの表示

名前： E-mail（省略可）：

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）
掲示板管理者へ連絡 無料レンタル掲示板