Home » Personal collection » Acorn hard disk » misc » misc3 » eug_titles/Sim/SIMCITY

eug_titles/Sim/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 hard disk » misc » misc3
Filename: eug_titles/Sim/SIMCITY
Read OK:
File size: 0AF5 bytes
Load address: 0000
Exec address: 0000
Duplicates

There are 4 duplicate copies of this file in the archive:

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