home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1986 January / Ahoy_Magazine_86-01_1986_Double_L.d64 / microsim (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  9KB  |  264 lines

  1. 10 rem micro flight simulator
  2. 15 rem by tim gerchmez
  3. 20 ifpeek(49152)=169andpeek(49158)=69then30
  4. 25 fort=49152to49152+36:reada:poket,a:next
  5. 30 poke53265,27:poke56333,127:poke788,0:poke789,192:poke53274,129
  6. 35 poke53281,0:poke646,1:poke650,128:poke49169,2:poke49167,255:poke49160,11
  7. 40 printchr$(147)chr$(9)chr$(15)chr$(8)"";:r1$="":lf$="[157][157][157][157][157][157][157]"
  8. 45 l6$="[157][157][157][157][157][157]":dn$=""
  9. 46 dimj(127):j(109)=45:j(126)=85:j(125)=68:j(123)=44:j(119)=46:j(110)=43
  10. 47 jy=56320:kb=631:kj=198
  11. 50 print"[192][192][192][192][192][192][192][177][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][192][192][192][192][192][192][192][192][145][145]";
  12. 55 print"[194]micro flight simulator[194][213][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][201]"
  13. 60 print"[159][213][195][195][195][195][195][195][201]":print"[194]      [194]":print"[202][195][195][195][195][195][195][203]":print"[158]time[159]"
  14. 65 print"[213][195][195][195][195][195][195][195][201]":print"[194]       [194]":print"[202][195][195][195][195][195][195][195][203]":print"[158]erpm[159]"
  15. 70 print"[213][195][195][195][195][195][195][195][195][201]":print"[194]        [194]":print"[202][195][195][195][195][195][195][195][195][203]":print"[158]airspeed"
  16. 75 print"kts[159]":print"[213][195][195][195][195][195][195][195][195][195][195][195][201]":print"[194]           [194]":print"[202][195][195][195][195][195][195][195][195][195][195][195][203]"
  17. 80 print"[158]groundspeed":print"mph"
  18. 85 print"[159]"r1$"[213][195][195][195][195][195][195][195][195][195][201]":printr1$"[194]         [194]":printr1$"[202][195][195][195][195][195][195][195][195][195][203]"
  19. 90 printr1$"[129]altimeter[159]"
  20. 95 printr1$"[213][195][195][195][195][195][195][201]":printr1$"[194]      [194]":printr1$"[202][195][195][195][195][195][195][203]"
  21. 100 printr1$"[150]rudder[159][145][145][145][213][195][195][195][195][195][201]"lf$"[194]     [194]"lf$"[202][195][195][195][195][195][203]"l6$"elev."
  22. 105 printr1$"[213][195][195][195][195][195][195][195][201]":printr1$"[194]       [194]"
  23. 110 printr1$"[202][195][195][195][195][195][195][195][203]":printr1$"heading[159]"
  24. 115 r2$=""
  25. 120 r1$="":printr1$"[213][195][195][195][195][201][145][145][157][157][157][157][157]bi>[159]":printr1$"[194]fuel[194]"
  26. 125 printr1$"[194][195][195][195][195][194]":printr1$"[194]f[159]   [194]":printr1$"[194]    [194]":printr1$"[194]    [194]"
  27. 130 printr1$"[194]e[159]   [194]":printr1$"[202][195][195][195][195][203]"
  28. 135 print"[145][145][209]":print"[155]stalloil temp[145]"lf$"[157][157][159][202][195][195][195][195][195][195][195][195][203]";
  29. 140 print"[145]"lf$"[157][157][157][194]c      h[159][194][145]"lf$"[157][157][157][213][195][195][195][195][195][195][195][195][201]";
  30. 145 print"[145][145][157][157][157][157][157][202][195][203][157][157]p[145][145][157][157][194] [146][159][194][145][157][157][157][213][195][201]"
  31. 150 printdn$""r1$"[158]flaps"
  32. 155 print"[159]"r1$"[213][195][195][195][201]"l6$"[194]   [159][146][194]"l6$"[202][195][195][195][203]";
  33. 160 print""l6$"cwi"
  34. 165 gosub255
  35. 170 poke198,0
  36. 175 geta$:ifa$<>""then180
  37. 176 pokekj,1:pokekb,j(peek(jy)):geta$:ifa$=""thengosub450:goto245
  38. 180 ifa$="o"thenifgd=1andgs=0then935
  39. 185 ifa$="x"thengosub605  :goto245
  40. 190 ifa$="h"thengosub635  :goto245
  41. 195 ifa$="+"ora$="-"thengosub680  :goto245
  42. 200 ifa$="r"thenfp=1:goto245
  43. 205 ifa$="l"thenfp=0:goto245
  44. 210 ifa$="<"ora$=","thenru=ru+(ru>-45):printru$;ru;s$
  45. 215 ifa$=">"ora$="."thenru=ru-(ru<45):printru$;ru;s$
  46. 220 ifa$="u"thenel=el-(el<45):printel$;el;s$:goto245
  47. 225 ifa$="d"thenel=el+(el>-45):printel$;el;s$:goto245
  48. 226 ifa$>"0"anda$<"8"thengosub1200
  49. 228 ifa$="0"thengosub251
  50. 230 ifru=0thenprintp8$
  51. 235 ifru<0thenprintp7$
  52. 240 ifru>0thenprintp9$
  53. 245 ifdothenreturn
  54. 250 goto175
  55. 251 fy=fy+6:iffy>6thenfy=0
  56. 252 iffy=0 then printdn$rx$"night":poke49160,0:goto254
  57. 253 printdn$rx$"day  ":poke49160,11
  58. 254 printrx$"flying":return
  59. 255 rem define variables + set up
  60. 260 mj$="":tm$="":er$=""+mj$+"":as$=dn$+""
  61. 265 gs$=dn$+"":at$=""+r2$
  62. 270 cl$=""+r1$+""
  63. 275 el$=""+r1$+""
  64. 280 fp$=dn$+""+r1$+"":fp=1
  65. 285 p7$=fp$+"   [157][145][206][157][157][209][157][157][206]":p8$=fp$+"   [157][157][157]   [145][157][157][157][195][209][195]"
  66. 290 p9$=fp$+"   [145][157][157][157][205][209][205]"
  67. 295 ifq0>120oras>120thenas=120:q0=120
  68. 300 ru$=""+mj$+r2$:he$=dn$+""+r2$:s$="[157]  "
  69. 305 pr$=dn$+""+r2$+""
  70. 306 a$="":b$="":i1$=dn$+a$+b$:i2$=dn$+""+a$+b$
  71. 307 i3$=dn$+""+a$+b$:i4$=dn$+""+a$+b$
  72. 308 in$="[218]":printi1$""in$"1"i2$""in$"2"i3$in$"3"i4$""in$"4"
  73. 310 dimfl$(2):fl$(1)=dn$+mj$+""+r1$+"":fl$(2)=fl$(1)
  74. 315 ot$=dn$+mj$+""+r2$+""
  75. 320 er=800:as=90:gs=as:at=gs:ru=at:he=ru:el=he:f1=235:f2=2:f3=0:f4=6:w=2
  76. 325 sw=56180:si=f3:gd=1:q0=0:dg=q0:do=0:ml=0:i1=1:i2=1:i3=0:i4=1:bo=49169
  77. 327 i5=0:i6=0:i7=0:kx=0:fy=6
  78. 330 s=54272:fort=stos+24:poket,0:next:pokes+6,240:pokes,f1:pokes+1,f2
  79. 335 pokes+4,33:pokes+24,15:pokes+13,240:pokes+7,f3:pokes+8,f4:pokes+11,17
  80. 340 print""tm$;ti$:printp8$""
  81. 345 forx=90to1step-w:pokesw,2
  82. 350 printer$;er;s$;as$;as;s$;gs$;gs;s$;at$;at;s$;ru$;ru;s$;he$;he;s$;fl$(1)"_"
  83. 355 printel$;el;s$:el=el-w
  84. 360 printot$"^";:ifx/18=int(x/18)thenprintot$" ";:ot$=left$(ot$,len(ot$)-1)
  85. 365 er=er-w:as=as-w:gs=gs-w:at=at-w:ru=ru-w:he=he+w:f1=f1-.5:pokes,f1:pokesw,1
  86. 370 f2=f2-.021:pokes+1,f2
  87. 372 ifx=30orx=60orx=90thenprintfl$(1)" ":fl$(1)=fl$(1)+"[145]":fl$(2)=fl$(2)+"[145]"
  88. 375 next:ti$="000000":printtm$;ti$;fp$;"[158]up  "
  89. 380 pokes+15,75:pokes+20,240:pokes+18,17:fort=1to300:next
  90. 385 pokes+15,50:forx=1to300:next:pokes+18,16
  91. 390 rx$=r1$+""
  92. 392 printdn$rx$"[157][145][145][172]":printdn$rx$"[157][145][172]":printdn$rx$"[157][172]"
  93. 395 print""rx$"[178]";:fort=1to22:print"[157][194]";:next
  94. 400 rx$=rx$+"":print""rx$;"+ - engine":printrx$"< > rudder"
  95. 405 printrx$"u d elevator":printrx$"[145]r l flaps":printrx$"h hear atis"
  96. 410 printrx$"x refuel":printrx$"o demo"
  97. 415 printrx$"[157][171][195][195][195][195][195][195][195][195][195][195][195]";:poke1463,67:poke1463+s,2
  98. 420 printrx$"cabin":printrx$"pressure":printrx$"on":printpr$" [146]"
  99. 425 pokes+15,255:pokes+18,16:pokes+18,129
  100. 430 printtm$;ti$:ifti$<>"000016"then430  "
  101. 435 [153]dn$;rx$;"     "
  102. 440 [153]rx$"        ":[153]rx$"  ":[151]s[170]18,128: [151]s[170]15,90:[151]s[170]18,17
  103. 445 [153]pr$" wait"
  104. 446 t[178][181](8000[172][187](1))[170]1000:u[178][181](300[172][187](1))[170]200:y1[178]t[170]u:y2[178]t[171]u:[141]875
  105. 448 [142]
  106. 450 [153]""el$;el;s$;tm$;ti$;er$;er;s$;as$;as;s$;gs$;gs;s$;at$;at;s$
  107. 465 [153]ru$;ru;s$;he$;he;s$;:pc[178][187](1)
  108. 470 [139]at[177]31000[167][151]s[170]4,32:[141]895:[141]845:[137]820
  109. 475 [139]as[177]100[167][139]el[177]30[167][141]900:[141]845:[137]820
  110. 480 [139]pc[177].997[167][139][195](ot$)[179]38[167][153]ot$" ":ot$[178]ot$[170]"":[153]ot$"^"
  111. 485 [139]f2[179]1[167]gs[178]0
  112. 487 kx[178]kx[170]1:kx[178]kx[171].2[172](i5[178]1)[171].5[172](i6[178]1)[171].5[172](i7[178]1)
  113. 490 [139]pc[177].98[175]dg[178]0[175]at[177]5000[167][153]cl$"   wait":dg[178]1:d3[178]he:d8[178]0:[141]890
  114. 495 [139]dg[178]1[167]d8[178]d8[170]1:[141]910
  115. 500 [139]gs[177]1[176]as[177]1[167][139]pc[177].88[167]gs[178]gs[171]1:q0[178]q0[171]2:f1[178]f1[171]10:er[178]er[170]20[172](er[177]0)
  116. 505 [139]f1[179]0[167]f1[178]255:f2[178]f2[171]1:[139]f2[179]0[167]f2[178]0
  117. 510 [151]s,f1:[151]s[170]1,f2
  118. 515 [139]si[167][151]sw,2:[151]s[170]18,17:[151]s[170]15,50:at[178]at[170]d9[172](at[177]0):d9[178]d9[170]24:[137]525
  119. 520 [151]sw,1:[151]s[170]18,16:d9[178]15:[137]530
  120. 525 [151]s[170]1,d9 [175]3
  121. 530 [139]gd[178]0[167][141]745:[139]gd[178]0[167]si[178][171](as[179]10):[139]as[179]30[167][139]el[177]20[167]si[178]1
  122. 535 [139]gd[178]0[175]er[179]300[167][151]s[170]4,32:[141]895 :[141]845:[137]820
  123. 540 [139]at[179][178]0[175]gd[178]0[167]820
  124. 545 [139]as[179]q0[167]as[178]q0
  125. 550 [139]el[177]40[175]gd[178]0[167]si[178]1
  126. 555 [139]fp[167][153]fp$"sysup  ":[137]565
  127. 560 [153]fp$"sysdown":
  128. 565 [139]gd[178]0[167]gs[178]0:[139]at[179][178]10[167]at[178]10
  129. 570 [139]el[179][178]40[175]as[177][178]10[167]si[178]0
  130. 575 [139]gd[178]1[167][139]fp[178]0[167][139]el[177]20[167][139]gs[177]60[167]gd[178]0:at[178]30:as[178]gs:gs[178]0:[141]602
  131. 580 [139]at[179][178]0[167]at[178]0
  132. 585 [139]kx[177]300[167]kx[178]0:[141]800
  133. 590 [139]gd[178]0[167]as[178]as[171]1:[139]pc[177].7[167]as[178]as[170]1:[139]pc[177].8[167]as[178]as[170]1
  134. 595 [139]gd[178]0[167][139]as[177]120[167]as[178]120
  135. 600 [142]
  136. 602 q0[178]as:ti$[178]"000000":[151]bo,fy:co[178]0:mx[178]0:[142]
  137. 605 [139]gd[179][177]1[167]625
  138. 610 [153]fl$(i4)" ";
  139. 615 [139][195](fl$(1))[179]49[167]fl$(1)[178]fl$(1)[170]"on":[137]615
  140. 620 fl$(2)[178]fl$(1):[153]fl$(i4)"_";:[142]
  141. 625 [153]dn$""r2$"ground only";
  142. 630 [129]x[178]1[164]1000:[130]:[153]"cmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmd           ";:[142]
  143. 635 [153]dn$rx$"systerminal":[153]rx$"information":[153]rx$"service"
  144. 640 t1[178]65:[129]x[178]1[164]10:t1[178]t1[170]([187](1)[177].5):[130]:[153]rx$"temp:"t1
  145. 645 [153]rx$"alt:29.95":t1[178][181](15[172][187](1))[170]10:[153]rx$"vis:"t1
  146. 646 [153]rx$"tnmt:"ml
  147. 650 [139][187](1)[177].5[167]a$[178]"alpha...":[137]665
  148. 655 [139][187](1)[177].5[167]a$[178]"bravo...":[137]665  
  149. 660 a$[178]"charley..."
  150. 665 [153]rx$"systhis":[153]rx$"is":[153]rx$;a$:z0[178][194](161)[170]2
  151. 670 [153]""tm$;ti$;:[145][171]([194](161)[179][177]z0)[137]670:[153]dn$;
  152. 675 [129]x[178]1[164]12:[153]rx$"           ":[130]:[139]do[167][141]1030
  153. 677 [142]
  154. 680 [139]a$[178]"-"[167]715  
  155. 685 [139]f2[177][178]5[167][142]
  156. 690 f1[178]f1[170]10:[139]f1[177]255[167]f1[178]0:f2[178]f2[170]1
  157. 695 [139]gd[167]gs[178]gs[170]1:q0[178]0:[137]710
  158. 700 q0[178]q0[170]3:[139]q0[177]120[167]q0[178]120
  159. 705 [139]q0[177][178]as[167]as[178]q0
  160. 710 er[178]er[170]20:[137]740
  161. 715 [139]f2[179][178].25[167]740
  162. 720 [139]f2[178].25 [175]f1[179][178]235[167]740
  163. 725 [139]gd[178]1[167]gs[178]gs[171]1:as[178]0:q0[178]0:[139]gs[179]0[167]gs[178]0
  164. 730 [139]gd[178]0[167]q0[178]q0[171]3:[139]q0[179]0[167]q0[178]0
  165. 735 f1[178]f1[171]10:er[178]er[171]20:[139]f1[179]0[167]f1[178]255:f2[178]f2[171]1
  166. 740 [151]s,f1:[151]s[170]1,f2:[153]""as$;as;s$;gs$;gs;s$;er$;er;s$:[142]
  167. 745 [139]((el[177][171]4[175]el[179]5)[175](as[179]80))[167][139](at[179]20[175]fp[178]1)[175](i1[178]1)[167]790
  168. 747 z7[178]at
  169. 750 at[178]at[170]([180](el)[172](.1[172]as)[170]2.5[172]el)[170]2[172]pc:[139]at[177]32000[167]at[178]32000
  170. 760 at[178]at[171]2[172](fp[178]0):at[178]at[170]2[172](ru[179][171]30 [176] ru[177]30):[139]el[178][171]1[167]at[178]z7:at[178]at[171][181](2[172]pc)
  171. 762 [139]as[179]40[175]el[177]30[167][141]845:[137]820
  172. 763 [139](ru[177]40[176]ru[179][171]40)[175]as[177]50[167][141]866:[141]845:[137]820
  173. 765 [139]el[178]0[167]at[178]z7:t[178][181](pc[172]5):at[178]at[170](t[172](as[179]40)):at[178]at[171](t[172](as[177]95))
  174. 766 [139]at[179]y1[175]at[177]y2[167][151]bo,1:[137]770
  175. 767 [151]bo,fy
  176. 770 he[178]he[170]((as[173]100)[172]ru):he[178][181](he):[139]he[179]0[167]he[178]359
  177. 775 [139]he[177]359[167]he[178]0
  178. 780 [139]as[179]30[175]el[178]0[167]zz[178]30[171]as:at[178]at[171]zz
  179. 785 co[178]co[170]1:mx[178]as[172](ti[173]60[173]60[173]60):mt[178]mt[170]mx[173]co:ml[178][181](mt):at[178][181](at):[142]
  180. 790 gd[178]1:gs[178]as:as[178]0:q0[178]0:[139][182](ru)[177]15[167]820
  181. 795 [151]bo,2:at[178]0:[141]875:[142]
  182. 800 [153]fl$(i4)" ";:[139]gd[178]0[167]fl$(i4)[178][200](fl$(i4),[195](fl$(i4))[171]1)
  183. 810 [139][195](fl$(i4))[179]46[167][141]845:[137]820
  184. 815 m2[178]m1:[153]fl$(i4)"_":[142]
  185. 820 [153]""rx$"crash!!":[151]54290,16:[151]54276,32
  186. 825 [139][195](fl$(i4))[179]46[167][153]rx$"fuel gone!"
  187. 830 [151]54287,5
  188. 835 [151]54290,129
  189. 840 [129]x[178]1[164]5000:[130]:[138]
  190. 845 as[178]300:at[178][181](at):[129]x[178]5[164]0[169][171]1:[151]s[170]1,x:[129]y[178]255[164]0[169][171]5:[151]s,y
  191. 850 [139]at[179][178]0[167][142]
  192. 855 at[178]at[171]100:[153]tm$;ti$;at$;at;s$;as$;as;s$
  193. 860 [130]:[139]x[178]3[167][141]870
  194. 865 [130]:[142]
  195. 866 [151]s[170]1,f2[170]1:[129]t[178]1[164]600:[130]:[151]s[170]1,f2[170]2:[129]t[178]1[164]600:[130]:[151]s[170]1,f2[170]3
  196. 867 [129]t[178]1[164]600:[130]:[142]
  197. 870 [151]s[170]18,129:[151]s[170]15,200:[142]
  198. 875 [141]880:[129]x[178]1[164]500:[130]:[137]880 
  199. 880 [129]x[178]20[164]1[169][171]1:[151]s[170]1,x:[130]:[151]s[170]4,32:[151]s[170]4,129:[129]x[178]1[164]500:[130]
  200. 885 [151]s[170]4,128:[151]s[170]4,33:[142]
  201. 890 l4[178][181](50[172][187](1))[170]16:v[178][181](10[172][187](1))[170]1:v1[178]d3[170]v:v2[178]d3[171]v:[142]
  202. 895 [129]t[178]1[164]2000:[130]
  203. 900 [153]""rx$"engine":[153]rx$"failure":[151]s[170]18,33
  204. 905 [129]x[178]1[164]2000:[130]:[151]s[170]4,33:[142]
  205. 910 [139]he[177]v1[176]he[179]v2[167]dg[178]0:[153]cl$"   wait":[142]
  206. 915 [139]d8[179]120[171]as[167][142]
  207. 920 [153]dn$""rx$"collision!":[141]845:[137]820
  208. 925 [131]169,1,141,25,208,162,69,160,11,173,18,208,48,4,162,255,160,2,142,18
  209. 930 [131]208,140,32,208,173,13,220,41,1,240,3,76,49,234,76,188,254
  210. 935 [141]1030:do[178]1
  211. 940 [151]kj,1:[151]kb,[198]("+"):[141]175:[139]gs[179]65[167]940
  212. 950 [151]kj,1:[151]kb,[198]("u"):[141]175:[139]el[179]29[167]950
  213. 955 [151]kj,1:[151]kb,[198]("l"):[141]175:[141]450:[141]450:[141]450
  214. 960 [151]kj,1:[151]kb,[198]("1"):[141]175
  215. 965 [151]kj,1:[151]kb,[198]("d"):[141]175:[139]el[177]4[167]965
  216. 970 d5[178]0:px[178]0
  217. 975 [141]175
  218. 980 [139]as[179]60[167][151]kj,1:[151]kb,[198]("+"):[141]175:[137]980
  219. 985 [139]dg[178]1[167]rn[178][181](10[172][187](1)):ru[178]ru[170]rn:[141]450:ru[178]ru[171]rn
  220. 990 [139]d5[178]100[167]px[178]1:[151]kj,1:[151]kb,[198]("d"):[141]175:[139]el[179][177][171]6[167]990
  221. 995 [139]el[177]6 [167] el[178]el[171]1:[141]450:[137]995
  222. 1000 d5[178]d5[170]1:[139]px[178]0[167]975
  223. 1002 [141]175:[139]as[179]40[167][151]kj,1:[151]kb,[198]("+"):[141]175:[137]1002
  224. 1003 [139]at[177]200[167]1002
  225. 1005 [151]kj,1:[151]kb,[198]("u"):[141]175:[139]el[179][171]2[167]1005
  226. 1007 [151]kj,1: [151]kb,[198]("1"):[141]175
  227. 1010 [151]kj,1:[151]kb,[198]("r")
  228. 1015 [141]175:[139]gd[179][177]1[167]1015
  229. 1020 [141]175:[151]kj,1:[151]kb,[198]("-"):[139]gs[177]0[167]1020
  230. 1025 ru[178]0:[141]1035:[153]rx$"onon    ":do[178]0:el[178]0:[137]175
  231. 1030 [153]dn$""rx$"demo":[153]rx$"flight":[142]
  232. 1035 [153]dn$""rx$"      ":[142]
  233. 1200 [139]a$[177]"4"[167]1400
  234. 1202 [139]a$[178]"1"[167]i1[178]1[171]i1:[141]1300:[141]1220:[142]
  235. 1205 [139]a$[178]"2"[167]i2[178]1[171]i2:[141]1230:[142]
  236. 1210 [139]a$[178]"3"[167]i3[178]1[171]i3:[141]1240:[142]
  237. 1217 [139]a$[178]"4"[167][141]1350:[141]1260:[142]
  238. 1220 [139]i1[178]1[167][153]i1$"(NULL)":[142]
  239. 1225 [153]i1$"(NULL)":[139]gd[178]1[167]820
  240. 1227 [142]
  241. 1230 [139]i2[178]1[167][153]i2$"(NULL)":[142]
  242. 1235 [153]i2$"(NULL)":[142]
  243. 1240 [139]i3[178]1[167][153]i3$"(NULL)":[141]1310:[142]
  244. 1250 [153]i3$"(NULL)":[141]1330:[142]
  245. 1260 [139]i4[178]1[167][153]i4$"(NULL)":[142]
  246. 1270 [153]i4$"(NULL)":[142]
  247. 1300 [151]s[170]11,33:[151]s[170]8,4:[129]u[178]1[164]2000:[130]:[151]s[170]11,32
  248. 1305 [151]s[170]7,f3:[151]s[170]8,f4:[151]s[170]11,17:[142]
  249. 1310 f1[178]f1[171]40:er[178]er[170]80[172](er[177]0):[139]f1[179]0[167]f1[178]255:f2[178]f2[171]1:[139]f2[179]0[167]f2[178]0
  250. 1320 [151]s,f1:[151]s[170]1,f2:[142]
  251. 1330 f1[178]f1[170]40:er[178]er[170]80:[139]f1[177]255[167]f1[178]0:f2[178]f2[170]1
  252. 1335 [137]1320
  253. 1350 [153]fl$(i4)" ":i4[178]i4[170]1:[139]i4[178]3[167]i4[178]1
  254. 1355 [153]fl$(i4)"_":[142]
  255. 1400 [139]a$[178]"5"[167]i5[178]1[171]i5
  256. 1402 [139]a$[178]"6"[167]i6[178]1[171]i6
  257. 1404 [139]a$[178]"7"[167]i7[178]1[171]i7
  258. 1406 [139] i5[178]1 [167] [153]dn$rx$"ononcmdcmd*":[137]1410
  259. 1408 [153]dn$rx$"cmdcmdonon*"
  260. 1410 [139]i6[178]1[167][153]dn$rx$"cmdcmdon*":[137]1414
  261. 1412 [153]dn$rx$"cmdcmdon*"
  262. 1414 [139]i7[178]1[167] [153]dn$rx$"cmdcmd*":[142]
  263. 1416 [153]dn$rx$"cmdcmd*":[142]
  264.