Home » Personal collection » Acorn DFS disks » dfs_box04_disk03b_adt.scp » SIMCITY
SIMCITY
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn DFS disks » dfs_box04_disk03b_adt.scp |
Filename: | SIMCITY |
Read OK: | ✔ |
File size: | 0AF5 bytes |
Load address: | FF0E00 |
Exec address: | FF802B |
Duplicates
There are 4 duplicate copies of this file in the archive:
- Personal collection » Acorn DFS disks » dfs_box04_disk03b_adt.scp » SIMCITY
- Personal collection » Acorn DFS disks » dfs_box04_disk03_adt.scp » SIMCITY
- Personal collection » Acorn ADFS disks » Electron » EUG_submission.ADF » Sim/SIMCITY
- Personal collection » Acorn ADFS disks » Greaseweazled » dfs_box04_disk01b_adfs_welcome_disk_interleaved.adf » Sim/SIMCITY
- Personal collection » Acorn hard disk » misc » misc3 » eug_titles/Sim/SIMCITY
File contents
10*FX211,0 20*FX213,6 30!&C0=RND(-TIME) 40*TV255,0 50MODE5:VDU23;8202;0;0;0;19,1,0;0;0;0;17,129,12:HIMEM=&4000 60*FX16,0 70*FX4,2 80*FX200,3 90FORL%=&120TO&18F:READ?L%:NEXT:IN=7000:oldv%=114:oldv2%=115 100DATA16,0,248,255,100,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 110DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 120FORL%=0TO2STEP2:P%=&900:[OPTL% 130.sync LDA&FC:PHA:TXA:PHA:TYA:PHA:LDA&FE6D:BPLP%+8:LDA&FE64:JMPd_list:.nogo LDA&FE4D:BMIgotit:.nn JMPint_out 140.gotit AND#2:BEQnn:.a1 LDA#IN MOD256:STA&FE64:.a2 LDA#IN DIV256:STA&FE65:LDX#0:.loop LDAC,X:STA&FE21:INX:CPX#12:BNEloop:.int_out PLA:TAY:PLA:TAX:PLA:STA&FC:JMP(oldv%) 150.C EQUB6:EQUB22:EQUB70:EQUB86:EQUB131:EQUB147:EQUB195:EQUB211:EQUB160:EQUB176:EQUB224:EQUB240 160EQUB6:EQUB22:EQUB70:EQUB86:EQUB129:EQUB145:EQUB193:EQUB209:EQUB164:EQUB180:EQUB228:EQUB244 170.d_list LDX#12:.loop2 LDAC,X:STA&FE21:INX:CPX#24:BNEloop2:BEQint_out:.initialise SEI:LDA&204:STAoldv%:LDA&205:STAoldv2%:LDA#sync MOD256:STA&204:LDA#sync DIV256:STA&205:LDA#255:STA&FE65:LDA#128+64:STA&FE6E:LDA#0:STA&FE6B:CLI:RTS 180]:NEXT:CALLinitialise:FORL%=0TO60STEP4:L%!&880=&0F0F0F0F:NEXT:VDU28,1,31,18,29 190RESTORE220:FORL%=0TO23:READL%?C:NEXT:GCOL0,129:CLG:*L.SIMSCR1 5800 200L%=INKEY500:IFL%>0GOTO230 ELSEGCOL0,129:CLG:FORL%=0TO23:READL%?C:NEXT:*L.SIMSCR2 5800 210L%=INKEY500:IFL%<0GOTO190 ELSERESTORE220:FORL%=0TO23:READL%?C:NEXT:GCOL0,128:CLG:*L.SIMSCR1 5800 220DATA6,22,70,86,131,147,195,211,160,176,224,240,6,22,70,86,129,145,193,209,164,180,228,244,6,22,70,86,129,145,193,209,164,180,228,244,6,22,70,86,129,145,193,209,164,180,228,244 230REM 240*L.SIM1 250RESTORE260:FORL%=0TO8:FORM%=0TO15:READM%?(&B38+L%*16):NEXT,:*FX15 260DATA255,1,255,1,255,1,255,6,255,1,255,1,255,1,255,1 270DATA255,255,0,0,255,255,0,0,255,255,0,0,255,255,0,0 280DATA255,255,255,255,0,0,0,0,255,255,255,255,0,0,0,0 290DATA255,255,255,255,255,255,255,255,1,1,1,1,1,1,1,1 300DATA0,1,0,6,0,4,0,6,1,1,3,6,2,6,6,6 310DATA16,1,1,16,2,16,16,16,4,16,16,16,16,16,16,16 320DATA16,2,4,16,8,16,16,16,8,16,16,16,16,16,16,16 330DATA00,3,4,00,5,00,00,00,5,00,00,00,00,00,00,00 340DATA00,2,2,00,3,00,00,00,4,00,00,00,00,00,00,00 350$&BC8="City Name- "+CHR$255:$&BDF=CHR$7+CHR$26+CHR$17+CHR$1+CHR$17+CHR$131+CHR$31+CHR$7+CHR$20+"ERROR!"+CHR$13:$&BEF=" "+CHR$13:FORL%=0TO2STEP2:P%=&C00:[OPTL% 360.ete% EQUS"Is the mayor doing"+CHR$250+CHR$3+CHR$20+"a good jobz"+CHR$250+CHR$4+CHR$36+"00% YES 00% NO"+CHR$250+CHR$3+CHR$56+"Problems-"+CHR$250+CHR$4+CHR$70+"00% PROBLEM 1"+CHR$250+CHR$4+CHR$80+"00% PROBLEM 2" 370EQUB250:EQUB4:EQUB90:EQUS"00% PROBLEM 3"+CHR$250+CHR$4+CHR$100+"00% PROBLEM 4"+CHR$250+CHR$24+CHR$10+"Population-"+CHR$250+CHR$25+CHR$20+"xxxxxxxxxxxx" 380EQUB250:EQUB24:EQUB35:EQUS"Value-"+CHR$250+CHR$25+CHR$45+"`xxxxxxxxxxx"+CHR$250+CHR$24+CHR$60+"Category-"+CHR$250+CHR$24+CHR$100+"Score-0000" 390EQUB250:EQUB24:EQUB85:EQUS"Grid -000%"+CHR$250+CHR$25+CHR$70+"xxxxxxxx"+CHR$255 400]:NEXT:$&680="Village Town Big TownCity Big CityCapital " 410PAGE=&3C00:HIMEM=&4000:CHAIN"SIMCIT2"
*FX211,0 *FX213,6 !&C0=�(-�) (*TV255,0 24�5:�23;8202;0;0;0;19,1,0;0;0;0;17,129,12:�=&4000 <*FX16,0 F *FX4,2 P*FX200,3 Z5�L%=&120�&18F:�?L%:�:IN=7000:oldv%=114:oldv2%=115 d��16,0,248,255,100,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 nd�0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 x�L%=0�2�2:P%=&900:[OPTL% �o.sync LDA&FC:PHA:TXA:PHA:TYA:PHA:LDA&FE6D:BPLP%+8:LDA&FE64:JMPd_list:.nogo LDA&FE4D:BMIgotit:.nn JMPint_out ��.gotit �#2:BEQnn:.a1 LDA#IN �256:STA&FE64:.a2 LDA#IN �256:STA&FE65:LDX#0:.loop LDAC,X:STA&FE21:INX:CPX#12:BNEloop:.int_out PLA:TAY:PLA:TAX:PLA:STA&FC:JMP(oldv%) �a.C EQUB6:EQUB22:EQUB70:EQUB86:EQUB131:EQUB147:EQUB195:EQUB211:EQUB160:EQUB176:EQUB224:EQUB240 �^EQUB6:EQUB22:EQUB70:EQUB86:EQUB129:EQUB145:EQUB193:EQUB209:EQUB164:EQUB180:EQUB228:EQUB244 ��.d_list LDX#12:.loop2 LDAC,X:STA&FE21:INX:CPX#24:BNEloop2:BEQint_out:.initialise SEI:LDA&204:STAoldv%:LDA&205:STAoldv2%:LDA#sync �256:STA&204:LDA#sync �256:STA&205:LDA#255:STA&FE65:LDA#128+64:STA&FE6E:LDA#0:STA&FE6B:CLI:RTS �A]:�:�initialise:�L%=0�60�4:L%!&880=&0F0F0F0F:�:�28,1,31,18,29 �3��d\@:�L%=0�23:�L%?C:�:�0,129:�:*L.SIMSCR1 5800 �AL%=�500:�L%>0�df@ ��0,129:�:�L%=0�23:�L%?C:�:*L.SIMSCR2 5800 �GL%=�500:�L%<0�t~@ ���d\@:�L%=0�23:�L%?C:�:�0,128:�:*L.SIMSCR1 5800 ܰ�6,22,70,86,131,147,195,211,160,176,224,240,6,22,70,86,129,145,193,209,164,180,228,244,6,22,70,86,129,145,193,209,164,180,228,244,6,22,70,86,129,145,193,209,164,180,228,244 �� �*L.SIM1 �4��TDA:�L%=0�8:�M%=0�15:�M%?(&B38+L%*16):�,:*FX15 4�255,1,255,1,255,1,255,6,255,1,255,1,255,1,255,1 4�255,255,0,0,255,255,0,0,255,255,0,0,255,255,0,0 4�255,255,255,255,0,0,0,0,255,255,255,255,0,0,0,0 "4�255,255,255,255,255,255,255,255,1,1,1,1,1,1,1,1 ,$�0,1,0,6,0,4,0,6,1,1,3,6,2,6,6,6 60�16,1,1,16,2,16,16,16,4,16,16,16,16,16,16,16 @0�16,2,4,16,8,16,16,16,8,16,16,16,16,16,16,16 J0�00,3,4,00,5,00,00,00,5,00,00,00,00,00,00,00 T0�00,2,2,00,3,00,00,00,4,00,00,00,00,00,00,00 ^�$&BC8="City Name- "+�255:$&BDF=�7+�26+�17+�1+�17+�131+�31+�7+�20+"ERROR!"+�13:$&BEF=" "+�13:�L%=0�2�2:P%=&C00:[OPTL% h�.ete% EQUS"Is the mayor doing"+�250+�3+�20+"a good jobz"+�250+�4+�36+"00% YES 00% NO"+�250+�3+�56+"Problems-"+�250+�4+�70+"00% PROBLEM 1"+�250+�4+�80+"00% PROBLEM 2" r�EQUB250:EQUB4:EQUB90:EQUS"00% PROBLEM 3"+�250+�4+�100+"00% PROBLEM 4"+�250+�24+�10+"Population-"+�250+�25+�20+"xxxxxxxxxxxx" |vEQUB250:EQUB24:EQUB35:EQUS"Value-"+�250+�25+�45+"`xxxxxxxxxxx"+�250+�24+�60+"Category-"+�250+�24+�100+"Score-0000" �GEQUB250:EQUB24:EQUB85:EQUS"Grid -000%"+�250+�25+�70+"xxxxxxxx"+�255 �@]:�:$&680="Village Town Big TownCity Big CityCapital " ��=&3C00:�=&4000:�"SIMCIT2" �
00000000 0d 00 0a 0c 2a 46 58 32 31 31 2c 30 0d 00 14 0c |....*FX211,0....| 00000010 2a 46 58 32 31 33 2c 36 0d 00 1e 0e 21 26 43 30 |*FX213,6....!&C0| 00000020 3d b3 28 2d 91 29 0d 00 28 0c 2a 54 56 32 35 35 |=.(-.)..(.*TV255| 00000030 2c 30 0d 00 32 34 eb 35 3a ef 32 33 3b 38 32 30 |,0..24.5:.23;820| 00000040 32 3b 30 3b 30 3b 30 3b 31 39 2c 31 2c 30 3b 30 |2;0;0;0;19,1,0;0| 00000050 3b 30 3b 30 3b 31 37 2c 31 32 39 2c 31 32 3a d3 |;0;0;17,129,12:.| 00000060 3d 26 34 30 30 30 0d 00 3c 0b 2a 46 58 31 36 2c |=&4000..<.*FX16,| 00000070 30 0d 00 46 0a 2a 46 58 34 2c 32 0d 00 50 0c 2a |0..F.*FX4,2..P.*| 00000080 46 58 32 30 30 2c 33 0d 00 5a 35 e3 4c 25 3d 26 |FX200,3..Z5.L%=&| 00000090 31 32 30 b8 26 31 38 46 3a f3 3f 4c 25 3a ed 3a |120.&18F:.?L%:.:| 000000a0 49 4e 3d 37 30 30 30 3a 6f 6c 64 76 25 3d 31 31 |IN=7000:oldv%=11| 000000b0 34 3a 6f 6c 64 76 32 25 3d 31 31 35 0d 00 64 8b |4:oldv2%=115..d.| 000000c0 dc 31 36 2c 30 2c 32 34 38 2c 32 35 35 2c 31 30 |.16,0,248,255,10| 000000d0 30 2c 30 2c 31 2c 30 2c 30 2c 30 2c 30 2c 30 2c |0,0,1,0,0,0,0,0,| 000000e0 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |0,0,0,0,0,0,0,0,| * 00000140 30 2c 30 2c 30 2c 30 0d 00 6e 64 dc 30 2c 30 2c |0,0,0,0..nd.0,0,| 00000150 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |0,0,0,0,0,0,0,0,| * 000001a0 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d 00 78 1c e3 |0,0,0,0,0,0..x..| 000001b0 4c 25 3d 30 b8 32 88 32 3a 50 25 3d 26 39 30 30 |L%=0.2.2:P%=&900| 000001c0 3a 5b 4f 50 54 4c 25 0d 00 82 6f 2e 73 79 6e 63 |:[OPTL%...o.sync| 000001d0 20 4c 44 41 26 46 43 3a 50 48 41 3a 54 58 41 3a | LDA&FC:PHA:TXA:| 000001e0 50 48 41 3a 54 59 41 3a 50 48 41 3a 4c 44 41 26 |PHA:TYA:PHA:LDA&| 000001f0 46 45 36 44 3a 42 50 4c 50 25 2b 38 3a 4c 44 41 |FE6D:BPLP%+8:LDA| 00000200 26 46 45 36 34 3a 4a 4d 50 64 5f 6c 69 73 74 3a |&FE64:JMPd_list:| 00000210 2e 6e 6f 67 6f 20 4c 44 41 26 46 45 34 44 3a 42 |.nogo LDA&FE4D:B| 00000220 4d 49 67 6f 74 69 74 3a 2e 6e 6e 20 4a 4d 50 69 |MIgotit:.nn JMPi| 00000230 6e 74 5f 6f 75 74 0d 00 8c a4 2e 67 6f 74 69 74 |nt_out.....gotit| 00000240 20 80 23 32 3a 42 45 51 6e 6e 3a 2e 61 31 20 4c | .#2:BEQnn:.a1 L| 00000250 44 41 23 49 4e 20 83 32 35 36 3a 53 54 41 26 46 |DA#IN .256:STA&F| 00000260 45 36 34 3a 2e 61 32 20 4c 44 41 23 49 4e 20 81 |E64:.a2 LDA#IN .| 00000270 32 35 36 3a 53 54 41 26 46 45 36 35 3a 4c 44 58 |256:STA&FE65:LDX| 00000280 23 30 3a 2e 6c 6f 6f 70 20 4c 44 41 43 2c 58 3a |#0:.loop LDAC,X:| 00000290 53 54 41 26 46 45 32 31 3a 49 4e 58 3a 43 50 58 |STA&FE21:INX:CPX| 000002a0 23 31 32 3a 42 4e 45 6c 6f 6f 70 3a 2e 69 6e 74 |#12:BNEloop:.int| 000002b0 5f 6f 75 74 20 50 4c 41 3a 54 41 59 3a 50 4c 41 |_out PLA:TAY:PLA| 000002c0 3a 54 41 58 3a 50 4c 41 3a 53 54 41 26 46 43 3a |:TAX:PLA:STA&FC:| 000002d0 4a 4d 50 28 6f 6c 64 76 25 29 0d 00 96 61 2e 43 |JMP(oldv%)...a.C| 000002e0 20 45 51 55 42 36 3a 45 51 55 42 32 32 3a 45 51 | EQUB6:EQUB22:EQ| 000002f0 55 42 37 30 3a 45 51 55 42 38 36 3a 45 51 55 42 |UB70:EQUB86:EQUB| 00000300 31 33 31 3a 45 51 55 42 31 34 37 3a 45 51 55 42 |131:EQUB147:EQUB| 00000310 31 39 35 3a 45 51 55 42 32 31 31 3a 45 51 55 42 |195:EQUB211:EQUB| 00000320 31 36 30 3a 45 51 55 42 31 37 36 3a 45 51 55 42 |160:EQUB176:EQUB| 00000330 32 32 34 3a 45 51 55 42 32 34 30 0d 00 a0 5e 45 |224:EQUB240...^E| 00000340 51 55 42 36 3a 45 51 55 42 32 32 3a 45 51 55 42 |QUB6:EQUB22:EQUB| 00000350 37 30 3a 45 51 55 42 38 36 3a 45 51 55 42 31 32 |70:EQUB86:EQUB12| 00000360 39 3a 45 51 55 42 31 34 35 3a 45 51 55 42 31 39 |9:EQUB145:EQUB19| 00000370 33 3a 45 51 55 42 32 30 39 3a 45 51 55 42 31 36 |3:EQUB209:EQUB16| 00000380 34 3a 45 51 55 42 31 38 30 3a 45 51 55 42 32 32 |4:EQUB180:EQUB22| 00000390 38 3a 45 51 55 42 32 34 34 0d 00 aa e3 2e 64 5f |8:EQUB244.....d_| 000003a0 6c 69 73 74 20 4c 44 58 23 31 32 3a 2e 6c 6f 6f |list LDX#12:.loo| 000003b0 70 32 20 4c 44 41 43 2c 58 3a 53 54 41 26 46 45 |p2 LDAC,X:STA&FE| 000003c0 32 31 3a 49 4e 58 3a 43 50 58 23 32 34 3a 42 4e |21:INX:CPX#24:BN| 000003d0 45 6c 6f 6f 70 32 3a 42 45 51 69 6e 74 5f 6f 75 |Eloop2:BEQint_ou| 000003e0 74 3a 2e 69 6e 69 74 69 61 6c 69 73 65 20 53 45 |t:.initialise SE| 000003f0 49 3a 4c 44 41 26 32 30 34 3a 53 54 41 6f 6c 64 |I:LDA&204:STAold| 00000400 76 25 3a 4c 44 41 26 32 30 35 3a 53 54 41 6f 6c |v%:LDA&205:STAol| 00000410 64 76 32 25 3a 4c 44 41 23 73 79 6e 63 20 83 32 |dv2%:LDA#sync .2| 00000420 35 36 3a 53 54 41 26 32 30 34 3a 4c 44 41 23 73 |56:STA&204:LDA#s| 00000430 79 6e 63 20 81 32 35 36 3a 53 54 41 26 32 30 35 |ync .256:STA&205| 00000440 3a 4c 44 41 23 32 35 35 3a 53 54 41 26 46 45 36 |:LDA#255:STA&FE6| 00000450 35 3a 4c 44 41 23 31 32 38 2b 36 34 3a 53 54 41 |5:LDA#128+64:STA| 00000460 26 46 45 36 45 3a 4c 44 41 23 30 3a 53 54 41 26 |&FE6E:LDA#0:STA&| 00000470 46 45 36 42 3a 43 4c 49 3a 52 54 53 0d 00 b4 41 |FE6B:CLI:RTS...A| 00000480 5d 3a ed 3a d6 69 6e 69 74 69 61 6c 69 73 65 3a |]:.:.initialise:| 00000490 e3 4c 25 3d 30 b8 36 30 88 34 3a 4c 25 21 26 38 |.L%=0.60.4:L%!&8| 000004a0 38 30 3d 26 30 46 30 46 30 46 30 46 3a ed 3a ef |80=&0F0F0F0F:.:.| 000004b0 32 38 2c 31 2c 33 31 2c 31 38 2c 32 39 0d 00 be |28,1,31,18,29...| 000004c0 33 f7 8d 64 5c 40 3a e3 4c 25 3d 30 b8 32 33 3a |3..d\@:.L%=0.23:| 000004d0 f3 4c 25 3f 43 3a ed 3a e6 30 2c 31 32 39 3a da |.L%?C:.:.0,129:.| 000004e0 3a 2a 4c 2e 53 49 4d 53 43 52 31 20 35 38 30 30 |:*L.SIMSCR1 5800| 000004f0 0d 00 c8 41 4c 25 3d a6 35 30 30 3a e7 4c 25 3e |...AL%=.500:.L%>| 00000500 30 e5 8d 64 66 40 20 8b e6 30 2c 31 32 39 3a da |0..df@ ..0,129:.| 00000510 3a e3 4c 25 3d 30 b8 32 33 3a f3 4c 25 3f 43 3a |:.L%=0.23:.L%?C:| 00000520 ed 3a 2a 4c 2e 53 49 4d 53 43 52 32 20 35 38 30 |.:*L.SIMSCR2 580| 00000530 30 0d 00 d2 47 4c 25 3d a6 35 30 30 3a e7 4c 25 |0...GL%=.500:.L%| 00000540 3c 30 e5 8d 74 7e 40 20 8b f7 8d 64 5c 40 3a e3 |<0..t~@ ...d\@:.| 00000550 4c 25 3d 30 b8 32 33 3a f3 4c 25 3f 43 3a ed 3a |L%=0.23:.L%?C:.:| 00000560 e6 30 2c 31 32 38 3a da 3a 2a 4c 2e 53 49 4d 53 |.0,128:.:*L.SIMS| 00000570 43 52 31 20 35 38 30 30 0d 00 dc b0 dc 36 2c 32 |CR1 5800.....6,2| 00000580 32 2c 37 30 2c 38 36 2c 31 33 31 2c 31 34 37 2c |2,70,86,131,147,| 00000590 31 39 35 2c 32 31 31 2c 31 36 30 2c 31 37 36 2c |195,211,160,176,| 000005a0 32 32 34 2c 32 34 30 2c 36 2c 32 32 2c 37 30 2c |224,240,6,22,70,| 000005b0 38 36 2c 31 32 39 2c 31 34 35 2c 31 39 33 2c 32 |86,129,145,193,2| 000005c0 30 39 2c 31 36 34 2c 31 38 30 2c 32 32 38 2c 32 |09,164,180,228,2| 000005d0 34 34 2c 36 2c 32 32 2c 37 30 2c 38 36 2c 31 32 |44,6,22,70,86,12| 000005e0 39 2c 31 34 35 2c 31 39 33 2c 32 30 39 2c 31 36 |9,145,193,209,16| 000005f0 34 2c 31 38 30 2c 32 32 38 2c 32 34 34 2c 36 2c |4,180,228,244,6,| 00000600 32 32 2c 37 30 2c 38 36 2c 31 32 39 2c 31 34 35 |22,70,86,129,145| 00000610 2c 31 39 33 2c 32 30 39 2c 31 36 34 2c 31 38 30 |,193,209,164,180| 00000620 2c 32 32 38 2c 32 34 34 0d 00 e6 05 f4 0d 00 f0 |,228,244........| 00000630 0b 2a 4c 2e 53 49 4d 31 0d 00 fa 34 f7 8d 54 44 |.*L.SIM1...4..TD| 00000640 41 3a e3 4c 25 3d 30 b8 38 3a e3 4d 25 3d 30 b8 |A:.L%=0.8:.M%=0.| 00000650 31 35 3a f3 4d 25 3f 28 26 42 33 38 2b 4c 25 2a |15:.M%?(&B38+L%*| 00000660 31 36 29 3a ed 2c 3a 2a 46 58 31 35 0d 01 04 34 |16):.,:*FX15...4| 00000670 dc 32 35 35 2c 31 2c 32 35 35 2c 31 2c 32 35 35 |.255,1,255,1,255| 00000680 2c 31 2c 32 35 35 2c 36 2c 32 35 35 2c 31 2c 32 |,1,255,6,255,1,2| 00000690 35 35 2c 31 2c 32 35 35 2c 31 2c 32 35 35 2c 31 |55,1,255,1,255,1| 000006a0 0d 01 0e 34 dc 32 35 35 2c 32 35 35 2c 30 2c 30 |...4.255,255,0,0| 000006b0 2c 32 35 35 2c 32 35 35 2c 30 2c 30 2c 32 35 35 |,255,255,0,0,255| 000006c0 2c 32 35 35 2c 30 2c 30 2c 32 35 35 2c 32 35 35 |,255,0,0,255,255| 000006d0 2c 30 2c 30 0d 01 18 34 dc 32 35 35 2c 32 35 35 |,0,0...4.255,255| 000006e0 2c 32 35 35 2c 32 35 35 2c 30 2c 30 2c 30 2c 30 |,255,255,0,0,0,0| 000006f0 2c 32 35 35 2c 32 35 35 2c 32 35 35 2c 32 35 35 |,255,255,255,255| 00000700 2c 30 2c 30 2c 30 2c 30 0d 01 22 34 dc 32 35 35 |,0,0,0,0.."4.255| 00000710 2c 32 35 35 2c 32 35 35 2c 32 35 35 2c 32 35 35 |,255,255,255,255| 00000720 2c 32 35 35 2c 32 35 35 2c 32 35 35 2c 31 2c 31 |,255,255,255,1,1| 00000730 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 0d 01 2c 24 |,1,1,1,1,1,1..,$| 00000740 dc 30 2c 31 2c 30 2c 36 2c 30 2c 34 2c 30 2c 36 |.0,1,0,6,0,4,0,6| 00000750 2c 31 2c 31 2c 33 2c 36 2c 32 2c 36 2c 36 2c 36 |,1,1,3,6,2,6,6,6| 00000760 0d 01 36 30 dc 31 36 2c 31 2c 31 2c 31 36 2c 32 |..60.16,1,1,16,2| 00000770 2c 31 36 2c 31 36 2c 31 36 2c 34 2c 31 36 2c 31 |,16,16,16,4,16,1| 00000780 36 2c 31 36 2c 31 36 2c 31 36 2c 31 36 2c 31 36 |6,16,16,16,16,16| 00000790 0d 01 40 30 dc 31 36 2c 32 2c 34 2c 31 36 2c 38 |..@0.16,2,4,16,8| 000007a0 2c 31 36 2c 31 36 2c 31 36 2c 38 2c 31 36 2c 31 |,16,16,16,8,16,1| 000007b0 36 2c 31 36 2c 31 36 2c 31 36 2c 31 36 2c 31 36 |6,16,16,16,16,16| 000007c0 0d 01 4a 30 dc 30 30 2c 33 2c 34 2c 30 30 2c 35 |..J0.00,3,4,00,5| 000007d0 2c 30 30 2c 30 30 2c 30 30 2c 35 2c 30 30 2c 30 |,00,00,00,5,00,0| 000007e0 30 2c 30 30 2c 30 30 2c 30 30 2c 30 30 2c 30 30 |0,00,00,00,00,00| 000007f0 0d 01 54 30 dc 30 30 2c 32 2c 32 2c 30 30 2c 33 |..T0.00,2,2,00,3| 00000800 2c 30 30 2c 30 30 2c 30 30 2c 34 2c 30 30 2c 30 |,00,00,00,4,00,0| 00000810 30 2c 30 30 2c 30 30 2c 30 30 2c 30 30 2c 30 30 |0,00,00,00,00,00| 00000820 0d 01 5e 8e 24 26 42 43 38 3d 22 43 69 74 79 20 |..^.$&BC8="City | 00000830 4e 61 6d 65 2d 20 20 20 20 20 20 20 20 20 20 20 |Name- | 00000840 20 22 2b bd 32 35 35 3a 24 26 42 44 46 3d bd 37 | "+.255:$&BDF=.7| 00000850 2b bd 32 36 2b bd 31 37 2b bd 31 2b bd 31 37 2b |+.26+.17+.1+.17+| 00000860 bd 31 33 31 2b bd 33 31 2b bd 37 2b bd 32 30 2b |.131+.31+.7+.20+| 00000870 22 45 52 52 4f 52 21 22 2b bd 31 33 3a 24 26 42 |"ERROR!"+.13:$&B| 00000880 45 46 3d 22 20 20 20 20 20 20 20 20 20 20 20 20 |EF=" | 00000890 22 2b bd 31 33 3a e3 4c 25 3d 30 b8 32 88 32 3a |"+.13:.L%=0.2.2:| 000008a0 50 25 3d 26 43 30 30 3a 5b 4f 50 54 4c 25 0d 01 |P%=&C00:[OPTL%..| 000008b0 68 aa 2e 65 74 65 25 20 45 51 55 53 22 49 73 20 |h..ete% EQUS"Is | 000008c0 74 68 65 20 6d 61 79 6f 72 20 64 6f 69 6e 67 22 |the mayor doing"| 000008d0 2b bd 32 35 30 2b bd 33 2b bd 32 30 2b 22 61 20 |+.250+.3+.20+"a | 000008e0 67 6f 6f 64 20 6a 6f 62 7a 22 2b bd 32 35 30 2b |good jobz"+.250+| 000008f0 bd 34 2b bd 33 36 2b 22 30 30 25 20 59 45 53 20 |.4+.36+"00% YES | 00000900 20 30 30 25 20 4e 4f 22 2b bd 32 35 30 2b bd 33 | 00% NO"+.250+.3| 00000910 2b bd 35 36 2b 22 50 72 6f 62 6c 65 6d 73 2d 22 |+.56+"Problems-"| 00000920 2b bd 32 35 30 2b bd 34 2b bd 37 30 2b 22 30 30 |+.250+.4+.70+"00| 00000930 25 20 50 52 4f 42 4c 45 4d 20 31 22 2b bd 32 35 |% PROBLEM 1"+.25| 00000940 30 2b bd 34 2b bd 38 30 2b 22 30 30 25 20 50 52 |0+.4+.80+"00% PR| 00000950 4f 42 4c 45 4d 20 32 22 0d 01 72 80 45 51 55 42 |OBLEM 2"..r.EQUB| 00000960 32 35 30 3a 45 51 55 42 34 3a 45 51 55 42 39 30 |250:EQUB4:EQUB90| 00000970 3a 45 51 55 53 22 30 30 25 20 50 52 4f 42 4c 45 |:EQUS"00% PROBLE| 00000980 4d 20 33 22 2b bd 32 35 30 2b bd 34 2b bd 31 30 |M 3"+.250+.4+.10| 00000990 30 2b 22 30 30 25 20 50 52 4f 42 4c 45 4d 20 34 |0+"00% PROBLEM 4| 000009a0 22 2b bd 32 35 30 2b bd 32 34 2b bd 31 30 2b 22 |"+.250+.24+.10+"| 000009b0 50 6f 70 75 6c 61 74 69 6f 6e 2d 22 2b bd 32 35 |Population-"+.25| 000009c0 30 2b bd 32 35 2b bd 32 30 2b 22 78 78 78 78 78 |0+.25+.20+"xxxxx| 000009d0 78 78 78 78 78 78 78 22 0d 01 7c 76 45 51 55 42 |xxxxxxx"..|vEQUB| 000009e0 32 35 30 3a 45 51 55 42 32 34 3a 45 51 55 42 33 |250:EQUB24:EQUB3| 000009f0 35 3a 45 51 55 53 22 56 61 6c 75 65 2d 22 2b bd |5:EQUS"Value-"+.| 00000a00 32 35 30 2b bd 32 35 2b bd 34 35 2b 22 60 78 78 |250+.25+.45+"`xx| 00000a10 78 78 78 78 78 78 78 78 78 22 2b bd 32 35 30 2b |xxxxxxxxx"+.250+| 00000a20 bd 32 34 2b bd 36 30 2b 22 43 61 74 65 67 6f 72 |.24+.60+"Categor| 00000a30 79 2d 22 2b bd 32 35 30 2b bd 32 34 2b bd 31 30 |y-"+.250+.24+.10| 00000a40 30 2b 22 53 63 6f 72 65 2d 30 30 30 30 22 0d 01 |0+"Score-0000"..| 00000a50 86 47 45 51 55 42 32 35 30 3a 45 51 55 42 32 34 |.GEQUB250:EQUB24| 00000a60 3a 45 51 55 42 38 35 3a 45 51 55 53 22 47 72 69 |:EQUB85:EQUS"Gri| 00000a70 64 20 2d 30 30 30 25 22 2b bd 32 35 30 2b bd 32 |d -000%"+.250+.2| 00000a80 35 2b bd 37 30 2b 22 78 78 78 78 78 78 78 78 22 |5+.70+"xxxxxxxx"| 00000a90 2b bd 32 35 35 0d 01 90 40 5d 3a ed 3a 24 26 36 |+.255...@]:.:$&6| 00000aa0 38 30 3d 22 56 69 6c 6c 61 67 65 20 54 6f 77 6e |80="Village Town| 00000ab0 20 20 20 20 42 69 67 20 54 6f 77 6e 43 69 74 79 | Big TownCity| 00000ac0 20 20 20 20 42 69 67 20 43 69 74 79 43 61 70 69 | Big CityCapi| 00000ad0 74 61 6c 20 22 0d 01 9a 1e d0 3d 26 33 43 30 30 |tal ".....=&3C00| 00000ae0 3a d3 3d 26 34 30 30 30 3a d7 22 53 49 4d 43 49 |:.=&4000:."SIMCI| 00000af0 54 32 22 0d ff |T2"..| 00000af5