MZ2K_CP ; an applet
グラフィックの練習として昔のプログラムを移植してみました。

元々のソース：　 使用機種：MZ-2000
使用言語：MZ-2Z002 (S-BASIC)
プログラム名："カラーハ゜ターン" ←本当は全部半角

10 CONSOLE GH,M:COLOR,07,W0:GRAPH C:CCOLOR,0:PRINT CHR$(6):C=1
15 FOR I=500 TO 10 STEP -10
20 FOR H=0.05 TO 1 STEP 0.075
30 CIRCLE[C] 320,100,I,H
40 C=C+1:IF C=8 THEN C=1
50 NEXT H
60 NEXT I
70 END

第２期のソース：　 使用機種：PC-9801 VM2
使用言語：N88-日本語BASIC(86) V3.1 (N-BASIC)

10 CONSOLE 0,25,0,1:SCREEN 3,0:CLS 3:C=1
20 FOR I=500 TO 10 STEP -10
30 FOR H=0.05 TO 1 STEP 0.075
40 CIRCLE (320,200),I,H,,,C
50 C=C+1:IF C=8 THEN C=1
60 NEXT H
70 NEXT I
80 END

第３期のソース：　 開発機種：PC-9821 Xa7e/S15
開発言語：JDK 1.1.5 (Java applet/JDK 1.1 base)

/* トテモ　オ見セ　出来マセン */
/* 何分　自己流　ナ　モン　デ */

使用例：　 <APPLET APPLET CODE="ColorPattern" WIDTH=640 HEIGHT=400>
Here is an applet. Try a Java-enabled browser!!
</APPLET>

結果：

Here is an applet. Try a Java-enabled browser!!

back to the Top of "Java Room"