5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

第1回昔のPC板杯プログラムコンテスト

86 :X1F:01/12/26 09:01
X1用 Hu-BASCI (V1 or V2)
10 J=0:GOTO 1000
999 END
1000 CLS:FOR I=10 to 100 STEP 10:PRINT J+I;" PRINT ";CHR$(32);"オマエモナー";CHR$(32):NEXT
1010 J=J+1:if(J=10) then PRINT "RUN" else "GOTO 1000"
1020 KEY 0,STRING$(10,11)

動作確認していないので、動くかどうか不安ですが。

73 KB
■ このスレッドは過去ログ倉庫に格納されています

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)