aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
Download patch file Download diff file Expand all files Collapse all files

53
Task/Forest-fire/Applesoft-BASIC/forest-fire.basic
View file

@ -1,19 +1,34 @@
100 FOR I = 17239 TO 17493
110 READ B
120 POKE I,B
130 NEXT
140 CALL 17239
150 END
160 DATA162,23,138,32,71,248,165,38,157,60,3,165,39,157,84,3,202,16,239,162,96
170 DATA134,249,134,1,160,0,132,0,152,145,0,200,208,251,232,134,1,224,128,208
180 DATA244,44,86,192,44,82,192,44,84,192,44,80,192,32,50,248,162,0,134,0,169
190 DATA41,133,2,133,254,169,83,133,4,165,249,133,1,133,3,133,5,73,16,133,255
200 DATA133,249,138,134,45,74,168,169,15,144,2,105,224,133,46,185,60,3,133,38
210 DATA185,84,3,133,39,160,1,132,44,177,2,145,254,240,79,16,93,169,0,164,44
220 DATA145,254,136,81,38,37,46,81,38,145,38,164,44,200,192,41,208,224,165,2
230 DATA133,0,165,3,133,1,165,4,133,2,133,254,24,105,42,133,4,165,5,73,16
240 DATA133,255,73,16,133,3,105,0,133,5,166,45,232,224,48,208,159,44,0,192
250 DATA48,3,76,144,67,44,16,192,44,81,192,96,198,8,208,190,169,101,133,8,169
260 DATA68,208,169,169,153,208,165,198,6,208,14,198,7,208,10,169,23,133,6,169
270 DATA39,133,7,208,234,177,0,17,4,136,17,0,17,2,17,4,200,200,17,0,17,2,17,4
280 DATA48,213,16,137,41
100 FOR I = 17239 TO 17812
110 READ B
120 POKE I,B
130 NEXT
140 CALL 17239
150 END
160DATA32,166,68,133,44,169,76,133,40,162,0,138,32,40,0,165,38,157,0,80,165,39
170DATA157,25,80,160,0,152,145,38,200,192,40,208,249,232,228,44,208,227,32,82
180DATA68,32,91,68,162,96,134,47,134,49,160,0,132,48,152,145,48,200,208,251,232
190DATA134,49,224,128,208,244,162,0,134,48,169,41,133,50,133,54,169,83,133,52
200DATA165,47,133,49,133,51,133,53,73,16,133,55,133,47,138,134,44,74,168,169,15
210DATA144,2,105,224,133,45,185,0,80,133,38,185,25,80,133,39,160,1,132,43,177
220DATA50,145,54,240,70,16,83,169,0,164,43,145,54,136,81,38,37,45,81,38,145,38
230DATA164,43,200,192,41,208,224,165,50,133,48,165,51,133,49,165,52,133,50,133
240DATA54,24,105,42,133,52,165,53,73,16,133,55,73,16,133,51,105,0,133,53,166,44
250DATA232,224,48,208,159,32,133,68,76,156,67,198,40,208,199,32,91,68,169,68
260DATA208,179,169,153,208,175,198,41,208,9,198,42,208,5,32,82,68,208,239,177
270DATA48,17,52,136,17,48,17,50,17,52,200,200,17,48,17,50,17,52,48,218,16,152
280DATA169,23,133,41,169,39,133,42,96,169,101,133,40,96,169,107,133,41,169,68
290DATA133,42,169,25,96,160,0,132,39,10,10,10,133,38,10,38,39,10,38,39,101,38
300DATA133,38,165,39,105,4,133,39,96,173,0,224,201,76,208,68,44,0,192,16,20,44
310DATA16,192,44,81,192,104,104,162,38,189,0,81,149,0,232,224,56,208,246,96,162
320DATA38,181,0,157,0,81,232,224,56,208,246,173,0,224,201,76,208,50,44,86,192
330DATA44,82,192,44,84,192,44,80,192,169,71,133,41,169,248,133,42,169,24,96,201
340DATA133,208,209,165,198,240,205,169,0,133,198,173,22,208,41,239,141,22,208
350DATA169,21,141,24,208,208,172,201,133,240,3,76,96,68,169,0,141,32,208,169,0
360DATA141,33,208,169,5,141,34,208,169,8,141,35,208,173,22,208,9,16,141,22,208
370DATA169,48,133,55,74,74,133,45,173,24,208,41,240,5,45,141,24,208,169,0,133
380DATA54,170,32,131,69,169,32,133,54,169,85,32,131,69,169,72,133,54,169,170,32
390DATA131,69,165,55,24,105,2,133,55,162,0,134,54,169,0,162,85,32,131,69,169,32
400DATA133,54,138,32,131,69,169,72,133,54,169,170,32,131,69,165,55,24,105,2,133
410DATA55,169,128,133,54,169,0,162,170,32,131,69,169,160,133,54,169,85,32,131
420DATA69,169,200,133,54,138,32,131,69,76,96,68,160,0,145,54,200,192,4,208,249
430DATA138,145,54,200,192,8,208,249,96