 |
| FOR X = 0 TO 1 STEP 0.001 FOR Y = 0 TO 1 STEP 0.001 SET COLOR MOD (SIN(X * 2 * 3.1416) * 10000 + SIN(Y * 2 * 3.1416) * 10000,255) + 1 PLOT X ,Y NEXT Y NEXT X END |
|
| FOR X = 0 TO 1 STEP 0.001 FOR Y = 0 TO 1 STEP 0.001 SET COLOR MOD (SIN(X * 2 * 3.1416) * 10000 + SIN(Y * 2 * 3.1416) * 10000,255) + 1 PLOT X ,Y NEXT Y NEXT X END |
| 参照 | （仮称）十進BASICのホームページ 「やさしいコンピュータ CGワンダーランド」（日本放送協会） |
