Forest fire: Difference between revisions
m
→{{header|Applesoft BASIC}}
(Applesoft BASIC) |
|||
Line 1,131:
=={{header|BASIC}}==
==={{header|Applesoft BASIC}}===
{{trans|6502 Assembly}}
<lang gwbasic> 100 FOR I = 17239 TO 17493
110 READ B
Line 1,150:
260 DATA 39,133,7,208,234,177,0,17,4,136,17,0,17,2,17,4,200,200,17,0,17,2,17,4
270 DATA 48,213,16,137,41</lang>
==={{header|BASIC256}}===
[[File:Forest fire BASIC-256.gif|right|thumb|Forest fire animation: p=0.03, p/f=1000]]
|