home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Games / DAM (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  9.6 KB  |  284 lines
  1. 9 REM          SET UP
  2. 10 POKE56,60:POKE52,60:CLR:DIMG%(3),L$(8):S=54272:C=53280:POKEC,6
  3. 15 S$="":T$=""
  4. 20 B$(0)="[221]":B$(1)="[211]":A$=S$+""
  5. 25 FORX=1TO24:READM$:POKES+X-1,0:NEXT
  6. 30 POKES+6,240:POKES+13,240:POKE788,52
  7. 32 POKES+24,15:POKES+4,17:POKES+11,17:POKES+19,204
  8. 34 FORX=0TO8:READL$(X):NEXT:FG=1
  9. 36 FORX=0TO50:READP:POKEX+50228,P:NEXT:GOSUB900:H=50
  10. 38 FORX=15936TO16383:READP:POKEX,P:Y=Y+1:IFY>10THENY=0:H=H+1:GOSUB690
  11. 40 NEXT
  12. 42 V=53248:POKEV+39,0:POKEV+1,0:POKE2040,250:POKEV,248:POKEV+21,5:POKEV+16,2
  13. 44 POKEV+3,229:POKEV+23,5:POKEV+28,3:POKEV+37,1
  14. 46 POKEV+40,10:POKE2041,255:POKE2042,249:POKEV+41,4:POKEV+5,57
  15. 49 REM     SET UP NEW GAME
  16. 50 MP=120:FP=MP:FT=0:MT=0:SP=H:FG=250:SC=0:G=0:FS=0:IFMTHENGOSUB900:GOSUB680
  17. 60 PRINTLEFT$(S$,19)"[152]                     ":PRINT"                   "
  18. 65 POKE789,196:POKEV+4,0:POKES+20,252:PRINTS$"    [146]INSTRUCTIONS (Y/N)?
  19. 70 [161]G$:[141]1800:[129]D[178]1[164]33:[130]:[139]G$[179][177]"Y"[175]G$[179][177]"N"[175][194](56320)[178]127[167]70
  20. 80 [151]789,234:[151]V[170]21,1:[151]V[170]2,PM:[139]G$[178]"Y"[167][141]1000:[137]90
  21. 90 [140]:[141]900:[141]600:[141]780:H[178]90
  22. 99 [143]  **** MONTHLY LOOP ****
  23. 100 [129]M[178]1[164]12:[135]M$,DM
  24. 101 SC[178]3333
  25. 110 CT[178][181]([187](8)[172]8)[171]4[170]FT:CP[178][181]([187](8)[172]40)[171]20[170]FP:[139]CP[179]0[167]CP[178]0
  26. 120 SN[178][181]((8[171]CT)[172]CP[173]10):[139]SN[179]0[167]SN[178]0
  27. 130 [139]SN[177]CP[167]SN[178]CP
  28. 140 RN[178]CP[171]SN:SM[178][181](CT[172]SP[173]50):[139]SM[179]0[167]SM[178]0
  29. 150 SP[178]SP[170]SN[171]SM:FI[178][181]((RN[170]SM)[172].5[170]5)[172]10:P[178]50[170][182](5[172](CT[171]12)):[141]730
  30. 160 MT[178]MT[170]4:MP[178]MP[171]20:[139]M[177]6[167]MT[178]MT[171]8:MP[178]MP[170]40
  31. 170 FT[178][181]([187](8)[172]8)[171]4[170]MT:FP[178][181]([187](8)[172]40)[171]20[170]MP:[139]FP[179]0[167]FP[178]0
  32. 180 [141]1600
  33. 199 [143]  **** DAILY LOOP ****
  34. 200 [129]DA[178]1[164]DM:[153]S$"POKE"DA:FD[178][181](P[172]200[173]H):[139]H[177]101[167]500
  35. 210 [139]DA[178]15[167][153]""[166]70)"FORECASTPOKE"[166]36)FT"CMD ":[153][166]34)"    CMDCMDCMDCMD"FP
  36. 220 TF[178]FS[170]FG:[139]TF[177]999[167][153]A$"ON      CMDCMDCMDCMDCMDCMDFLOOD":[137]550
  37. 230 [139]TF[177]500[167]SC[178]SC[171][181](TF[173]300):[153]A$"ON HIGH CMDCMDCMDCMDCMDCMDWATER ":[141]1900
  38. 240 [139]FD[179].8[172]FG[167][153]A$"ON OVER CMDCMDCMDCMDCMDCMD HEAT ":[141]1900
  39. 250 [139]H[179]50[176]2[172]FG[179]FD[167][141]850:[137]300
  40. 260 [151]C[170]1,3:[139]FG[179].75[172]FD[167][153]A$"ON BROWNCMDCMDCMDCMDCMDCMD  OUT ":[141]1900
  41. 299 [143]   *** INNER TIME LOOP ***
  42. 300 [129]T[178]1[164]8:H[178]H[170](FI[171]FG[171]FS)[173]4000:[153][200](S$,9)[166]33)"STOPWAIT"[181](H)"CMD "
  43. 330 [141]690
  44. 340 [139]T[178]4[167][141]880
  45. 350 [139][194](198)[178]0[175][194](56320)[178]127[167]470
  46. 355 [141]885
  47. 360 [161]G$:[151]197,64:J[178][194](56320)[175]19
  48. 370 [139]G$[178]"INPUT"[176]J[178]2[167]FS[178]FS[170]10
  49. 380 [139](G$[178]"DIM"[176]J[178]1)[175]FS[167]FS[178]FS[171]10
  50. 390 [139]G$[178]"READ"[176]J[178]18[167]FG[178]FG[171]10[172](FG[179]299)
  51. 400 [139](G$[178]"LET"[176]J[178]17)[175]FG[167]FG[178]FG[171]10
  52. 410 [139]G$[178]"P"[167][141]700
  53. 420 [139]G$[178]"Q"[176]G$[178]""[167]550
  54. 430 [139]G$[178]"H"[167][141]1000:[141]900:[141]600:[141]730:[141]780
  55. 440 [139]FG[178]0[167][141]860:[137]350
  56. 450 [141]780:[139]G$[179][177]""[176]J[179]19[167]360
  57. 460 [139]G[179][177]FS[167][141]800
  58. 470 [141]1800:[130]T
  59. 480 :SC[178]SC[170]6[170][181](49[173](10[170][182](FD[171]FG))):[153]S$[166]53)"VERIFYSCORE:"SC:[130]DA
  60. 490 [141]1600:[130]M:[137]550
  61. 499 [143] *** END ***
  62. 500 [151]S[170]18,129:[153][200](S$,13),"OPEN ONON"
  63. 510 [129]X[178]1[164]7:[151]S[170]15,X[172]7:[153],"OPEN         ONON":[129]D[178]1[164]99:[130]:[130]
  64. 520 [153],"OVERCMDCMDCMDCMDFLOW":[151]S[170]18,128
  65. 550 [153]"CONT"[166]200):[129]X[178]1[164]5:[153]"ON                           ON":[130]
  66. 555 [151]S[170]18,128:[153]"","CMDGAME OVER":[139]SC[177]HS[167]HS[178]SC
  67. 560 [153]"FINAL SCORE:"SC:[153]"HIGH  SCORE:"HS:[139][194](V[170]2)[167][141]1600
  68. 570 [139]SC[173]M[179]180[176]H[177]100[176]TF[177]999[167][141]1750:[137]590
  69. 580 SC[178]SC[171]1800:[139]SC[167][141]1850
  70. 590 [141]700:[151]V[170]21,1:[151]V[170]16,2:[151]V[170]3,229:H[178]50:[137]50
  71. 599 [172][172][172] [153] PANELS [172][172][172]
  72. 600 [153]"RETURN"[166]29):Y[178]4:[141]650:[153]"TEMPCMDCMDCMDCMDPRCPCMDCMDCMDCMDSNOW"
  73. 610 [153][166]69):Y[178]11:[141]650:[153]"HEAD"[166]34)"FT:
  74. 620 PRINTSPC(72)"FLOW"SPC(34)"IN:"SPC(37)"SP:"SPC(37)"GN:"SPC(40)"(CFS)
  75. 630 [153][166]71)"DEMAND"[166]33)"MW:":[153][166]71)"ALARM"[166]33):Y[178]2:[141]650
  76. 640 [153]S$;:Y[178]1:[141]650
  77. 645 [153]S$[166]11):[141]650:[153]S$[166]16):[141]650:[153]"ONCMDTANCMD CMDTAN";:[142]
  78. 650 [153]"(null)TANTANTANTANTANTANTANTANRIGHT$CMDCMDCMDCMDCMDCMDCMDCMDCMDCMD";
  79. 660 [129]X[178]1[164]Y:[153]"(null)        (null)CMDCMDCMDCMDCMDCMDCMDCMDCMDCMD";:[130]:[153]"MID$TANTANTANTANTANTANTANTAN(null)CMDCMDCMDCMDCMDCMDCMDCMDCMD";
  80. 670 [129]X[178]1[164]Y:[153]"ON";:[130]:[142]
  81. 679 :      WATER LEVEL
  82. 680 H[178]H[170][180](90[171]H):[141]690:[139][181](H)[179][177]90[167]680
  83. 682 [142]
  84. 690 [153][200](S$,16[171]H[173]10)"CONTWAIT"L$([181](8[171](H[173]10[171][181](H[173]10))[172]8)):[153]"     ":[142]
  85. 699 [172][172][172] [161] [172][172][172]
  86. 700 [151]S[170]1,0:[151]S[170]8,0:[151]S[170]15,0:[151]198,0:[151]789,234
  87. 708 [153]S$,"PRESS ANY KEY":X[178]0
  88. 710 [161]G$:J[178][194](56320):[141]1800:[129]D[178]1[164]99:[130]:X[178]X[170]1:[139]G$[179][177]""[176]J[179][177]127[167]718
  89. 712 [139]X[178]3[167][141]720
  90. 714 [139]X[178]6[167]708
  91. 716 [137]710
  92. 718 [151]V[170]4,0:[139]G$[178]""[167][151]V[170]4,0:[151]V[170]21,0:[153]"STOP    ":[151]788,49:[128]
  93. 720 [153]S$,"             ":[142]
  94. 729 [172][172][172] [153] M[145]THLY [131] ***
  95. 730 [153][200](S$,18)[166]33)"STOP"P"CMD "
  96. 740 [153]""[166]70)"WEATHER STOP"[166]36)CT"CMD ":[153][166]34)"    CMDCMDCMDCMD"CP
  97. 750 [153][166]34)"    CMDCMDCMDCMD"SP
  98. 760 [153][200](S$,12)[166]37[171][195]([196](FI)))"STOP"FI
  99. 770 [153]S$"POKE"M$"   ":[142]
  100. 779 [172][172][172] [153] GN GATE GN & SP [172][172][172]
  101. 780 [153][200](S$,16[171]FG[173]100),"CMDCMDPRINT# CMD"[200](L$([181](8[171](FG[173]100[171][181](FG[173]100))[172]8)),2)
  102. 790 [153][200](S$,13)[166]37[171][195]([196](FS)))"STOP"FS
  103. 795 [153][166]37[171][195]([196](FG)))FG:[142]
  104. 799 [172][172][172] SPILLWAY [172][172][172]
  105. 800 G[178]FS[173]50[170]1.9:[151]S[170]15,400[173]G:[151]S[170]18,128[171](FS[177]0)
  106. 805 [153][200](S$,7),,[200]("STOPFREFREFREFREFREFREFRE",G)[200]("       ",(G[171]10)[172](G[178][179]10))
  107. 810 [129]X[178]1[164]5
  108. 820 [153],,[200]("SPC(SPC(SPC(SPC(SPC(SPC(SPC(",G)[200]("STOPSPC(SPC(SPC(SPC(SPC(SPC(SPC(",(G[171]10)[172](G[178][179]10))
  109. 830 [130]
  110. 840 [142]
  111. 849 [172][172][172] BLACK OUT [172][172][172]
  112. 850 SC[178]SC[171]4:[151]S[170]8,0:[151]C[170]1,0:[151]789,234:[139]FS[167]FS[178]0:[141]800
  113. 860 FG[178]0:[153]A$"ON BLACKCMDCMDCMDCMDCMDCMD  OUT ":[141]1900
  114. 870 [153]T$[166]62)"WAIT "[166]13)"PRINT# CMD CMD CMD ":[129]D[178]1[164]99:[130]:[142]
  115. 879 [143]  TURN ON GEN
  116. 880 [153]A$"ONSTOP      CMDCMDCMDCMDCMDCMD      "
  117. 885 [139]FG[167][151]789,196
  118. 890 [151]S[170]1,[171]4[172](FG[177]0):[151]S[170]8,[171]5[172](FG[177]0):[142]
  119. 899 [172][172][172] [153] DAM [172][172][172]
  120. 900 [151]C[170]1,3:[153]"LOADRETURNCONT";:[129]X[178]1[164]5:[153]"                           ":[130]
  121. 905 [153]"PRINT#"[166]27)" ";:[129]X[178]1[164]24:[153]"CMD ";:[130]
  122. 910 [153]"CONT","CMDCMD (null)(null)(null)CMDCMDCMDCMD(null)(null)(null)WAIT  (null)STEP (null) (null)STEP "
  123. 920 [153][166]7)"SPC(CMDSPC(CMDSPC(ONONCONT(null)(null)WAIT   POSWAIT  (null)STEPWAIT "
  124. 925 [153],"CMDCMDCONT(null)WAIT  STEPWAIT    "
  125. 930 [153]"CONT     PRINT#               PRINT#       "
  126. 940 [129]X[178]1[164]6:[153]"CONT     PRINT#     LIST         PRINT# ":[130]
  127. 950 [153],"LISTONONONONTOTOTOTOTOCMD(null)CMD CMDCMDCMDCHR$CHR$CHR$CHR$CHR$ON":[153][166]5)"PRINT#(null)(null)       PRINT#WAIT(null)     "
  128. 960 [153],"CMDCMD WAIT    PRINT#(null) WAITSTEP    ":[153][166]14)"(null)     "
  129. 970 [153]"     (null)WAIT       STEPWAIT(null)(null)WAIT    "
  130. 980 [153]"PRINT#              WAIT      ":[153]"              WAIT (null)   WAITSTEP"
  131. 985 [153]"              (null)
  132. 990 PRINT"               [223][146]    [169]  "
  133. 995 FORX=1TO2:PRINT"                       ":NEXT
  134. 996 PRINTLEFT$(S$,12);:FORX=1TOH/10-3:PRINT"     [145][145]":NEXT
  135. 998 PRINT""SPC(250)"[158]     [156]  [145][157][157][184][184][158]  ":GOSUB800:RETURN
  136. 1000 POKE789,234:POKEC+1,15:IFSCTHEN1100
  137. 1005 PRINT"[147][144][196][193][205] IS A COMPUTER SIMULATION OF THE
  138. 1010 [153]"OPERATION OF A HYDRO-ELECTRIC PLANT.
  139. 1020 PRINT"[217]OU CONTROL THE DAM FOR ONE YEAR BY
  140. 1030 [153]"CONTROLLING THE SPILL RATE AND FLOW
  141. 1040 PRINT"THROUGH THE GENERATING TURBINE.
  142. 1050 [153]"(null)OU MUST ADJUST THE GATE FOR THE
  143. 1060 PRINT"TURBINE TO MEET THE POWER DEMAND.
  144. 1070 [153]"(null)OU MUST ADJUST THE THE SPILLWAY GATE
  145. 1080 PRINT"TO AVOID FLOODING AND CONSERVE WATER FORPOWER GENERATION.
  146. 1090 [141]700
  147. 1100 [153]"LOAD":[141]600:[153]""," DISPLAY PANELS "
  148. 1110 [153][166]30)"STOPWEATHER
  149. 1120 PRINT"TEMPERATURE (CELSIUS).      _
  150. 1130 [153]"MONTHLY PRECIPITATION (MM)  _
  151. 1140 PRINT"CURRENT SNOWPACK (CM)       _
  152. 1150 [153]"WATER LEVEL ABOVE DAM       _
  153. 1160 PRINT"FLOW INTO RESERVOIR         _
  154. 1170 [153]"FLOW OVER SPILLWAY          _
  155. 1180 PRINT"FLOW THROUGH TURBINE        _
  156. 1190 [153]" (FLOW IS IN CUBIC FEET/SEC.)
  157. 1200 PRINT"POWER DEMAND IN MEGAWATTS   _
  158. 1210 [153]"ALARMS:
  159. 1220 PRINT" BROWNOUT:  GN < 75% OPTIMUM
  160. 1230 [153]" BLACKOUT:  GN < 50% OPTIMUM
  161. 1240 PRINT" OVERHEAT:  GN 25% > OPTIMUM":PRINT"DATE":GOSUB700
  162. 1250 PRINT"[147][144][195][207][206][212][210][207][204][211]:
  163. 1252 [153][166]26)"OR (null)AISE F1WAIT"[166]16)"(null)PILLWAY GATE:(null)"[166]39)"/ (null)OWER F3
  164. 1254 PRINTSPC(66)"[176] [210]AISE F5[146]"SPC(16)"[212]URBINE  GATE:[221]"SPC(39)"[173] [204]OWER F7
  165. 1256 [153]" (null)WAIT = (null)AUSE     LEFT$WAIT = LEFT$ELP     (null)WAIT = (null)UIT
  166. 1260 PRINT"[213]SE THIS FORMULA TO CALCULATE THE FLOW  FOR THE GENERATOR ([199][206]):
  167. 1270 [153]"          200 (null) (null)OWER STR$EMAND
  168. 1280 PRINT"     [199][206] = [192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"SPC(28)"[200]EAD"
  169. 1282 IFSCTHEN:GOSUB700:RETURN
  170. 1284 GOSUB700
  171. 1290 PRINT"[147][144][212]O GET THE BEST SCORE, KEEP [199][206] AT THE
  172. 1292 [153]"CORRECT LEVEL. (null)OU LOSE POINTS EACH TIMEAN ALARM SOUNDS.
  173. 1294 PRINT"[193] TOTAL OUTFLOW ABOVE 500 [195][198][211] TRIGGERS
  174. 1296 [153]"THE LEFT$RIGHT$CLOSE(null)ATN(null)VAL(null) ALARM. ATN TOTAL OVER 1000   LENASC(null) IS FATAL.
  175. 1300 PRINT"[212]HE WEATHER PANEL DISPLAYS THE CURRENT
  176. 1310 [153]"WEATHER FOR EACH MONTH.  ATNFTER THE 15TH
  177. 1320 PRINT"OF THE MONTH, IT DISPLAYS THE FORECAST
  178. 1330 [153]"FOR THE NEXT MONTH.
  179. 1340 PRINT"[212]HE WEATHER CONDITIONS DETERMINE THE
  180. 1350 [153]"RIGHT$(null) FLOW FOR EACH MONTH.
  181. 1400 PRINT"[207]NE FINAL WARNING:
  182. 1410 [153]"     STR$(null)(null)'(null)CLOSE(null)VAL(null)CLOSE(null)LEFT$VALCLOSESTR$ATN(null)CLOSE(null)(null)VAL(null)ASC(null)(null)(null)!"
  183. 1420 [153]"CHR$(null)(null)STR$CLOSE(null)(null)LEN(null)!":[153]"(null)O BEGIN,":[141]700:[142]
  184. 1499 [143]    *** SPRITES  ***                        ELEVATOR SOUND
  185. 1500 [129]X[178]1[164]9[169].2:[151]S[170]1,X:[130]:[142]
  186. 1510 [129]X[178]9[164]0[169][171].2:[151]S[170]1,X:[130]:[142]
  187. 1519 :    WALK SOUND
  188. 1520 [151]S[170]1,22:[151]S[170]1,0:[129]D[178]1[164]99:[130]:[142]
  189. 1599 [172][172][172]  ELEVA[164]R DOWN [172][172][172]
  190. 1600 [151]S[171]1,0:[151]S[170]8,0:R[178][187](8)[172]7[170]205:[141]1500
  191. 1610 [129]X[178]1[164]R[169].5:[151]V[170]1,X:[130]
  192. 1620 [129]Y[178]1[164]2:[141]1510:[129]D[178]1[164]333:[130]:[151]V[170]1,208:[130]
  193. 1630 [139][194](V[170]2)[167]1660
  194. 1635 [151]V[170]2,0:[151]V[170]21,3:[151]V[170]38,M[170]4
  195. 1640 [129]X[178]0[164]48[169]4:MN[178]1[171]MN:[151]2041,254[170]MN:[151]V[170]2,X:[141]1520:[130]
  196. 1650 [151]2041,251:[137]1700
  197. 1660 [129]X[178]48[164]0[169][171]4:MN[178]1[171]MN:[151]2041,252[170]MN:[151]V[170]2,X:[141]1520:[130]
  198. 1670 [151]V[170]21,5
  199. 1699 [143] ELEVATOR UP
  200. 1700 [141]1500:[129]X[178]208[164] 1 [169][171].5:[151]V[170]1,X:[130]:[141]1510
  201. 1720 [142]
  202. 1749 :   QUICK TRIP D[145]W
  203. 1750 [141]1500:[151]S[170]1,11:[129]X[178]0[164]255[169]2:[151]V[170]1,X:[130]:[141]1510:[142]
  204. 1799 :   DANCE
  205. 1800 [151]2041,253[170]([181]([187](8)[172]3)[171]1)[172]2:[142]
  206. 1849 :      WALK [164] BOAT
  207. 1850 [141]680:[141]1500:[129]X[178]1[164]50[169].5:[151]V[170]1,X:[130]:[141]1510:[151]S[170]20,44
  208. 1855 [151]S[170]18,129:[129]X[178]1[164]39:[151]V[170]4,X:[129]D[178]1[164]22:[130]:[130]
  209. 1860 [151]V[170]3,70:[151]V[170]16,0:[151]V[170]2,248:[151]V[170]21,7:SC[178]255[171]SC[173]7:[139]SC[179]55[167]SC[178]39
  210. 1870 [129]X[178]248[164]SC[169][171]4:MN[178]1[171]MN:[151]2041,252[170]MN:[151]V[170]2,X:[141]1520:[130]
  211. 1875 [139]SC[177]39[167]1890
  212. 1880 [129]X[178]33[164]0[169][171].2:[151]V[170]4,X:[151]V[170]2,X:[130]:[151]S[170]18,128
  213. 1890 [141]680:[141]1500:[129]X[178]50[164]0[169][171].5:[151]V[170]1,X:[130]:[141]1510:[142]
  214. 1899 :       JUMP MAN
  215. 1900 [151]V[170]3,225:[151]S[170]1,33[171](FG[178]0)[172]11:[129]D[178]1[164]44:[130]:SC[178]SC[171]2:[151]V[170]3,229:[142]
  216. 1999 [143]      DATA
  217. 2000 [131]JAN.,31,FEB.,28,MAR.,31,APR.,31,"MAY ",31,JUNE,30
  218. 2010 [131]JULY,31,AUG.,31,SEPT,30,OCT.,31,NOV.,30,DEC.,31
  219. 2030 [131]"WAITTAB(TAB(TAB(TAB(TAB(","WAITUSRUSRUSRUSRUSR","WAITFREFREFREFREFRE","NEWNEWNEWNEWNEW","POSPOSPOSPOSPOS","ANDANDANDANDAND","TOTOTOTOTO"
  220. 2040 [131]"     ","WAIT     "
  221. 2049 :     ML [129] GENERA[164]R
  222. 2050 [131]166,2,189,96,196,232,134,2,160,0,153,196,5,200,192,5,208
  223. 2060 [131]248,224,7,240,3,76,52,234,169,0,133,2,169,83,205,102
  224. 2070 [131]6,208,2,169,93,141,102,6,76,52,234,229,212,199,194,200,217,234
  225. 2199 :       SPRITES
  226. 2200 [131]2,,,3,,,3,128
  227. 2201 [131],3,192,,3,224,,3
  228. 2202 [131]240,,3,248,,3,252,
  229. 2203 [131]3,254,,3,255,,3,255
  230. 2204 [131]128,3,255,192,3,255,240,3
  231. 2205 [131]255,252,3,255,255,3,128,
  232. 2206 [131]003,128,,255,255,255,63,255
  233. 2207 [131]255,15,255,254,3,255,254,
  234. 2211 :      ELEVA[164]R
  235. 2212 [131],,,,,,,
  236. 2213 [131],10,160,,10,160,,74
  237. 2214 [131]160,,85,85,85,85,85,85
  238. 2215 [131]106,150,169,106,150,169,106,150
  239. 2216 [131]169,106,150,169,106,150,169,85
  240. 2217 [131]85,85,85,85,85,106,150,169
  241. 2218 [131]106,150,169,106,150,169,106,150
  242. 2219 [131]169,106,150,169,85,85,85,255
  243. 2220 [143]  OPERATORS
  244. 2221 [131],016,,,084,,,084
  245. 2222 [131],,168,,,168,,
  246. 2223 [131]168,,,252,,3,255,192
  247. 2224 [131]15,255,192,15,255,192,15,255
  248. 2225 [131]192,15,255,192,11,255,128,11
  249. 2226 [131]255,128,3,207,,3,207,
  250. 2227 [131]3,207,,3,207,,2,138
  251. 2228 [131],1,69,,1,69,,
  252. 2229 [131],4,,,21,,,21
  253. 2230 [131],,42,,,170,,
  254. 2231 [131]42,,,63,,,255,192
  255. 2232 [131]3,255,192,3,255,192,3,191
  256. 2233 [131]192,3,191,192,,255,,15
  257. 2234 [131]255,,15,255,,10,15,
  258. 2235 [131]21,15,,21,15,,,10
  259. 2236 [131],,21,,,21,,
  260. 2237 [131],4,,,21,,,21
  261. 2238 [131],,42,,,170,,
  262. 2239 [131]42,,,63,,,255,192
  263. 2240 [131]3,255,192,3,255,192,3,251
  264. 2241 [131]192,3,251,192,,255,,
  265. 2242 [131]63,,,60,,,62,64
  266. 2243 [131],62,64,,62,64,,40
  267. 2244 [131]64,,84,,,84,,
  268. 2245 [131],16,,,84,,,84
  269. 2246 [131],,168,,,170,,
  270. 2247 [131]168,,,252,,3,255,
  271. 2248 [131]3,255,192,3,255,192,3,254
  272. 2249 [131]192,3,254,192,,255,,
  273. 2250 [131]255,240,,255,240,,240,160
  274. 2251 [131],240,084,,240,084,,160
  275. 2252 [131],,84,,,84,,
  276. 2253 [131],16,,,084,,,84
  277. 2254 [131],,168,,,170,,
  278. 2255 [131]168,,,252,,3,255,
  279. 2256 [131]3,255,192,3,255,192,3,239
  280. 2257 [131]192,3,239,192,,255,,
  281. 2258 [131]252,,,060,,1,188,
  282. 2259 [131]1,188,,1,188,,1,40
  283. 2260 [131],,21,,,21,,
  284.