1 GR
2 FOR I=1 TO 15:COLOR=I:HLIN 14,16 AT 11:VLIN 12,13 AT 13:VLIN 12,13 AT 17:HLIN 14,16 AT 14:VLIN 15,16 AT 13:VLIN 15,16 AT 17:HLIN 14,16 AT 17:HLIN 20,22 AT 11:VLIN 12,13 AT 19:VLIN 12,15 AT 23:HLIN 20,23 AT 14:PLOT 22,16:HLIN 19,21 AT 17:HLIN 15,17 AT 20:PLOT 14,21:VLIN 22,25 AT 13:HLIN 13,17 AT 23:VLIN 24,25 AT 17:HLIN 14,16 AT 26:PLOT 21,21:PLOT 20,22:PLOT 19,23:HLIN 19,23 AT 24:VLIN 20,26 AT 22:NEXT I:GOTO 2
复制上面的代码,粘贴到下面这个在线模拟器,然后点击 “Run” 按钮,看看画出来的是什么。 http://www.calormen.com/applesoft/
看看我在 Virtual ][ 上的运行结果。
- Wikipedia: http://en.wikipedia.org/wiki/Applesoft_BASIC
- Reference: http://www.landsnail.com/a2ref.htm