Publication 3/Publication_03_1996_High-Tech_de_Side_A.d64/game-manager_009

Commodore BASIC | 2023-02-26 | 13KB | 214 lines

0 poke775,.:print"[147]":ifa=0thena=1:load"game-manager/002",8,1
1 poke56578,peek(56578)or3:poke56576,148:poke648,204:poke53272,57
2 poke53280,6:poke53281,6:print"[147]":gosub3:goto4
3 print"          game-manager editor           ":return
4 print"[158]   written in 1993 by sascha herbrig
[153]             daten einlesen
           daten abspeichern
             top-15 editor
            spieleart editor
          programmierer editor
            grafiker editor
5 [153]"           soundmacher editor
             werbung editor
             kapital editor
          highscores einlesen
         highscores abspeichern
           highscores l:schen
            programm beenden
":d[178]1:xx[178]14:[141]10
6 [139][194](56320)[178]125[167][153]"onon":[141]11:[141]10:d[178]d[170]1
7 [139][194](56320)[178]126[167][153]"onon":[141]11:[153]"ononon":[141]10:d[178]d[171]1
8 [139][194](56320)[178]111[167]17
9 [137]14
10 [151]646,xx:[153]"     tantantan___":[142]
11 [153]"           ":[142]
12 [151]646,xx:[153]"___ tantantan":[142]
13 [153]"       ":[142]
14 [139]d[178]0[167][153]"onon":[141]11:[153]"":[141]10:d[178]13
15 [139]d[178]14[167][153]"onon":[141]11:[153]"ononononononononononononononon":[141]10:d[178]1
16 [137]6
17 [139]d[178]1[167]35
18 [139]d[178]2[167]30
19 [139]d[178]3[167]44
20 [139]d[178]4[167]75
21 [139]d[178]5[167]99
22 [139]d[178]6[167]124
23 [139]d[178]7[167]149
24 [139]d[178]8[167]179
25 [139]d[178]9[167]194
26 [139]d[178]10[167]195
27 [139]d[178]11[167]197
28 [139]d[178]12[167]198
29 [139]d[178]13[167]40
30 [159]1,8,15,"s:game-manager/008":[159]2,8,2,"game-manager/008,s,w":[152]2,zy:[152]2,d:[152]2,ka:[152]2,kb:[152]2,da:[152]2,ks$:[152]2,kt$:[152]2,ku$:[152]2,kv$:[152]2,kw$:[152]2,kx$:[152]2,bg:[152]2,bh:[152]2,sa$:[152]2,sb$:[152]2,sc$:[152]2,sd$:[152]2,se$:[152]2,sf$:[152]2,sg$:[152]2,sh$:[152]2,si$:[152]2,sj$:[152]2,sk$:[152]2,sl$:[152]2,sm$:[152]2,sn$
31 [152]2,so$:[152]2,sq$:[152]2,sa:[152]2,sb:[152]2,sc:[152]2,sd:[152]2,se:[152]2,sf:[152]2,sg:[152]2,sh:[152]2,si:[152]2,sj:[152]2,sk:[152]2,sl:[152]2,sm:[152]2,sn:[152]2,so:[152]2,sq:[152]2,ga$:[152]2,gb$:[152]2,gc$:[152]2,gd$:[152]2,ge$:[152]2,gf$:[152]2,gg$:[152]2,gh$:[152]2,gi$:[152]2,gj$:[152]2,gk$:[152]2,gl$:[152]2,ga:[152]2,gb:[152]2,gc:[152]2,gd:[152]2,ge:[152]2,gf:[152]2,gg
32 [152]2,gh:[152]2,gi:[152]2,gj:[152]2,gk:[152]2,gl:[152]2,hb$:[152]2,hc$:[152]2,hd$:[152]2,he$:[152]2,hf$:[152]2,hg$:[152]2,hh$:[152]2,hi$:[152]2,hj$:[152]2,hk$:[152]2,hl$:[152]2,ha:[152]2,hb:[152]2,hc:[152]2,hd:[152]2,he:[152]2,hf:[152]2,hg:[152]2,hh:[152]2,hi:[152]2,hj:[152]2,hk:[152]2,hl:[152]2,kc$:[152]2,ke$:[152]2,kf$:[152]2,kd$:[152]2,kg$:[152]2,kc:[152]2,kd:[152]2,ke:[152]2,kf
33 [152]2,zi:[152]2,zl:[152]2,pa$:[152]2,pb$:[152]2,pc$:[152]2,pd$:[152]2,pe$:[152]2,pf$:[152]2,pg$:[152]2,ph$:[152]2,pi$:[152]2,pj$:[152]2,pk$:[152]2,pl$:[152]2,pm$:[152]2,pn$:[152]2,po$:[129]p[178]1[164]9:[152]2,pa(p):[130]p:[129]p[178]1[164]6:[152]2,pb(p):[130]p:[129]p[178]1[164]9:[152]2,na(p):[130]p:[129]p[178]1[164]6:[152]2,nb(p):[130]p:[152]2,na$:[152]2,nb$:[152]2,nc$:[152]2,nd$:[152]2,ne$:[152]2,nf$
34 [152]2,ng$:[152]2,nh$:[152]2,ni$:[152]2,nj$:[152]2,nk$:[152]2,nl$:[152]2,nn$:[152]2,nm$:[152]2,no$:[152]2,wa$:[152]2,wb$:[152]2,wc$:[152]2,wa:[152]2,wb:[152]2,wc:[152]2,ha$:[152]2,za$:[152]2,zb$:[152]2,zc$:[152]2,zd$:[152]2,ze$:[152]2,zf$:[152]2,zg$:[152]2,zh$:[152]2,zi$:[152]2,zj$:[152]2,zk$:[152]2,zl$:[160]1:[160]2:[137]2
35 [159]1,8,15:[159]2,8,2,"game-manager/008,s,r":[132]1,xx,xy$,xy,xz:[139]xx[179][177]0[167][160]1:[160]2:[137]2
36 [132]2,zy,d,ka,kb,da,ks$,kt$,ku$,kv$,kw$,kx$,bg,bh,sa$,sb$,sc$,sd$,se$:[132]2,sf$,sg$,sh$,si$,sj$,sk$,sl$,sm$,sn$,so$,sq$,sa,sb,sc,sd,se,sf,sg:[132]2,sh,si,sj,sk,sl,sm,sn,so,sq,ga$,gb$,gc$,gd$,ge$,gf$,gg$,gh$,gi$,gj$
37 [132]2,gk$,gl$,ga,gb,gc,gd,ge,gf,gg,gh,gi,gj,gk,gl,hb$,hc$,hd$,he$,hf$,hg$:[132]2,hh$,hi$,hj$,hk$,hl$,ha,hb,hc,hd,he,hf,hg,hh,hi,hj,hk,hl,kc$,ke$:[132]2,kf$,kd$,kg$,kc,kd,ke,kf,zi,zl,pa$,pb$,pc$,pd$,pe$,pf$,pg$,ph$,pi$
38 [132]2,pj$,pk$,pl$,pm$,pn$,po$:[129]p[178]1[164]9:[132]2,pa(p):[130]p:[129]p[178]1[164]6:[132]2,pb(p):[130]p:[129]p[178]1[164]9:[132]2,na(p):[130]p:[129]p[178]1[164]6:[132]2,nb(p):[130]p:[132]2,na$,nb$,nc$,nd$,ne$,nf$,ng$,nh$,ni$:[132]2,nj$,nk$,nl$,nn$,nm$,no$,wa$,wb$,wc$,wa,wb,wc,ha$
39 [132]2,za$,zb$,zc$,zd$,ze$,zf$,zg$,zh$,zi$,zj$,zk$,zl$:[160]1:[160]2:[137]2
40 [153]"load":[141]3:[153]"sys            programm beenden
contwollen sie wirklich schlu\ machen (j/n)?
41 geta$:ifa$=""then41
42 ifa$="j"thensys64738
43 goto2
44 poke53280,10:poke53281,10:print"[147]":gosub3:print"[158]             top-15 editor
[153]  welchen platz wollen sie ver;ndern ?
"pa$:printpb$:printpc$:printpd$:printpe$:printpf$:printpg$:printph$:printpi$:printpj$:printpk$:printpl$:printpm$:printpn$:printpo$:print"[145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145]":forp=1to9
45 print""pa(p):nextp:forp=1to6:print""pb(p):nextp:print"":d=1:xx=0:gosub12
46 ifpeek(56320)=125thenprint"[145][145]":gosub13:gosub12:d=d+1
47 ifpeek(56320)=126thenprint"[145][145]":gosub13:print"[145][145][145]":gosub12:d=d-1
48 ifpeek(56320)=111then70
49 ifd=0thenprint"[145][145]":gosub13:print"":gosub12:d=15
50 ifd=16thenprint"[145][145]":gosub13:print"[145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145]":gosub12:d=1
51 goto46
52 ifd=1thengosub68:gosub205:pa$=i$:gosub69:pa(1)=i
53 ifd=2thengosub68:gosub205:pb$=i$:gosub69:pa(2)=i
54 ifd=3thengosub68:gosub205:pc$=i$:gosub69:pa(3)=i
55 ifd=4thengosub68:gosub205:pd$=i$:gosub69:pa(4)=i
56 ifd=5thengosub68:gosub205:pe$=i$:gosub69:pa(5)=i
57 ifd=6thengosub68:gosub205:pf$=i$:gosub69:pa(6)=i
58 ifd=7thengosub68:gosub205:pg$=i$:gosub69:pa(7)=i
59 ifd=8thengosub68:gosub205:ph$=i$:gosub69:pa(8)=i
60 ifd=9thengosub68:gosub205:pi$=i$:gosub69:pa(9)=i
61 ifd=10thengosub68:gosub205:pj$=i$:gosub69:pb(1)=i
62 ifd=11thengosub68:gosub205:pk$=i$:gosub69:pb(2)=i
63 ifd=12thengosub68:gosub205:pl$=i$:gosub69:pb(3)=i
64 ifd=13thengosub68:gosub205:pm$=i$:gosub69:pb(4)=i
65 ifd=14thengosub68:gosub205:pn$=i$:gosub69:pb(5)=i
66 ifd=15thengosub68:gosub205:po$=i$:gosub69:pb(6)=i
67 goto71
68 print"[144]    wie soll der neue name lauten ?":te$="":x=7:y=7:le=20:by=1:return
69 print:print"[144]    wie soll der neue wert lauten ?":input"";i:return
70 print"[147]":gosub3:print"[158]          spieleverkaufscharts          ":goto52
71 print" noch einen eintrag der top-15 ;ndern ?
72 [161]a$:[139]a$[178]""[167]72
73 [139]a$[178]"j"[167]44
74 [137]2
75 [151]53280,6:[151]53281,6:[153]"load":[141]3:[153]"sys            spieleart editor
printwelche spieleart wollen sie ver;ndern ?
sys        "za$:[153]"        "zb$:[153]"        "zc$:[153]"        "zd$:[153]"        "ze$:[153]"        "zf$
76 [153]"        "zg$:[153]"        "zh$:[153]"        "zi$:[153]"        "zj$:[153]"        "zk$:[153]"        "zl$:[153]"":d[178]1:xx[178]14:[141]10
77 [139][194](56320)[178]125[167][153]"onon":[141]11:[141]10:d[178]d[170]1
78 [139][194](56320)[178]126[167][153]"onon":[141]11:[153]"ononon":[141]10:d[178]d[171]1
79 [139][194](56320)[178]111[167]83
80 [139]d[178]0[167][153]"onon":[141]11:[153]"":[141]10:d[178]12
81 [139]d[178]13[167][153]"onon":[141]11:[153]"onononononononononononononon":[141]10:d[178]1
82 [137]77
83 [153]"load":[141]3:[153]"sys            spieleart editor            ":[139]d[178]1[167][141]68:le[178]24:[141]205:za$[178]i$
84 [139]d[178]2[167][141]68:le[178]24:[141]205:zb$[178]i$
85 [139]d[178]3[167][141]68:le[178]24:[141]205:zc$[178]i$
86 [139]d[178]4[167][141]68:le[178]24:[141]205:zd$[178]i$
87 [139]d[178]5[167][141]68:le[178]24:[141]205:ze$[178]i$
88 [139]d[178]6[167][141]68:le[178]24:[141]205:zf$[178]i$
89 [139]d[178]7[167][141]68:le[178]24:[141]205:zg$[178]i$
90 [139]d[178]8[167][141]68:le[178]24:[141]205:zh$[178]i$
91 [139]d[178]9[167][141]68:le[178]24:[141]205:zi$[178]i$
92 [139]d[178]10[167][141]68:le[178]24:[141]205:zj$[178]i$
93 [139]d[178]11[167][141]68:le[178]24:[141]205:zk$[178]i$
94 [139]d[178]12[167][141]68:le[178]24:[141]205:zl$[178]i$
95 [153]:[153]"cont      noch einen eintrag ;ndern ?
96 geta$:ifa$=""then96
97 ifa$="j"then75
98 goto2
99 poke53280,6:poke53281,6:print"[147]":gosub3:print"[158]          programmierer editor
[153]   welchen programmierer ver;ndern ?
[158]"ha$:print"[145]"ha:printhb$:print"[145]"hb:printhc$:print"[145]"hc
100 printhd$:print"[145]"hd:printhe$:print"[145]"he:printhf$:print"[145]"hf:printhg$:print"[145]"hg:printhh$:print"[145]"hh:printhi$:print"[145]"hi
101 printhj$:print"[145]"hj:printhk$:print"[145]"hk:printhl$:print"[145]"hl:print"":d=1:xx=14:gosub12
102 ifpeek(56320)=125thenprint"[145][145]":gosub13:gosub12:d=d+1
103 ifpeek(56320)=126thenprint"[145][145]":gosub13:print"[145][145][145]":gosub12:d=d-1
104 ifpeek(56320)=111then108
105 ifd=0thenprint"[145][145]":gosub13:print"":gosub12:d=12
106 ifd=13thenprint"[145][145]":gosub13:print"[145][145][145][145][145][145][145][145][145][145][145][145][145][145]":gosub12:d=1
107 goto102
108 print"[147]":gosub3:print"[158]          programmierer editor          ":ifd=1thengosub68:gosub205:ha$=i$:gosub69:ha=i
109 ifd=2thengosub68:gosub205:hb$=i$:gosub69:hb=i
110 ifd=3thengosub68:gosub205:hc$=i$:gosub69:hc=i
111 ifd=4thengosub68:gosub205:hd$=i$:gosub69:hd=i
112 ifd=5thengosub68:gosub205:he$=i$:gosub69:he=i
113 ifd=6thengosub68:gosub205:hf$=i$:gosub69:hf=i
114 ifd=7thengosub68:gosub205:hg$=i$:gosub69:hg=i
115 ifd=8thengosub68:gosub205:hh$=i$:gosub69:hh=i
116 ifd=9thengosub68:gosub205:hi$=i$:gosub69:hi=i
117 ifd=10thengosub68:gosub205:hj$=i$:gosub69:hj=i
118 ifd=11thengosub68:gosub205:hk$=i$:gosub69:hk=i
119 ifd=12thengosub68:gosub205:hl$=i$:gosub69:hl=i
120 print"[154]   noch einen programmierer ;ndern ?
121 [161]a$:[139]a$[178]""[167]121
122 [139]a$[178]"j"[167]99
123 [137]2
124 [151]53280,6:[151]53281,6:[153]"load":[141]3:[153]"sys            grafiker editor
print      welchen grafiker ver;ndern ?
sys"ga$:[153]"on"ga:[153]gb$:[153]"on"gb:[153]gc$:[153]"on"gc
125 [153]gd$:[153]"on"gd:[153]ge$:[153]"on"ge:[153]gf$:[153]"on"gf:[153]gg$:[153]"on"gg:[153]gh$:[153]"on"gh:[153]gi$:[153]"on"gi
126 [153]gj$:[153]"on"gj:[153]gk$:[153]"on"gk:[153]gl$:[153]"on"gl:[153]"":d[178]1:xx[178]14:[141]12
127 [139][194](56320)[178]125[167][153]"onon":[141]13:[141]12:d[178]d[170]1
128 [139][194](56320)[178]126[167][153]"onon":[141]13:[153]"ononon":[141]12:d[178]d[171]1
129 [139][194](56320)[178]111[167]133
130 [139]d[178]0[167][153]"onon":[141]13:[153]"":[141]12:d[178]12
131 [139]d[178]13[167][153]"onon":[141]13:[153]"onononononononononononononon":[141]12:d[178]1
132 [137]127
133 [153]"load":[141]3:[153]"sys            grafiker editor             ":[139]d[178]1[167][141]68:[141]205:ga$[178]i$:[141]69:ga[178]i
134 [139]d[178]2[167][141]68:[141]205:gb$[178]i$:[141]69:gb[178]i
135 [139]d[178]3[167][141]68:[141]205:gc$[178]i$:[141]69:gc[178]i
136 [139]d[178]4[167][141]68:[141]205:gd$[178]i$:[141]69:gd[178]i
137 [139]d[178]5[167][141]68:[141]205:ge$[178]i$:[141]69:ge[178]i
138 [139]d[178]6[167][141]68:[141]205:gf$[178]i$:[141]69:gf[178]i
139 [139]d[178]7[167][141]68:[141]205:gg$[178]i$:[141]69:gg[178]i
140 [139]d[178]8[167][141]68:[141]205:gh$[178]i$:[141]69:gh[178]i
141 [139]d[178]9[167][141]68:[141]205:gi$[178]i$:[141]69:gi[178]i
142 [139]d[178]10[167][141]68:[141]205:gj$[178]i$:[141]69:gj[178]i
143 [139]d[178]11[167][141]68:[141]205:gk$[178]i$:[141]69:gk[178]i
144 [139]d[178]12[167][141]68:[141]205:gl$[178]i$:[141]69:gl[178]i
145 [153]"cont      noch einen grafiker ;ndern ?
146 geta$:ifa$=""then146
147 ifa$="j"then124
148 goto2
149 poke53280,6:poke53281,6:print"[147]":gosub3:print"[158]           soundmacher editor
[153]    welchen soundmacher ver;ndern ?
[158]"sa$:print"[145]"sa:printsb$:print"[145]"sb:printsc$:print"[145]"sc
150 printsd$:print"[145]"sd:printse$:print"[145]"se:printsf$:print"[145]"sf:printsg$:print"[145]"sg:printsh$:print"[145]"sh:printsi$:print"[145]"si
151 printsj$:print"[145]"sj:printsk$:print"[145]"sk:printsl$:print"[145]"sl:printsm$:print"[145]"sm:printsn$:print"[145]"sn:printso$:print"[145]"so
152 printsq$:print"[145]"sq:print"":d=1:xx=14:gosub12
153 ifpeek(56320)=125thenprint"[145][145]":gosub13:gosub12:d=d+1
154 ifpeek(56320)=126thenprint"[145][145]":gosub13:print"[145][145][145]":gosub12:d=d-1
155 ifpeek(56320)=111then159
156 ifd=0thenprint"[145][145]":gosub13:print"":gosub12:d=16
157 ifd=17thenprint"[145][145]":gosub13:print"[145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145][145]":gosub12:d=1
158 goto153
159 print"[147]":gosub3:print"[158]           soundmacher editor           ":ifd=1thengosub68:gosub205:sa$=i$:gosub69:sa=i
160 ifd=2thengosub68:gosub205:sb$=i$:gosub69:sb=i
161 ifd=3thengosub68:gosub205:sc$=i$:gosub69:sc=i
162 ifd=4thengosub68:gosub205:sd$=i$:gosub69:sd=i
163 ifd=5thengosub68:gosub205:se$=i$:gosub69:se=i
164 ifd=6thengosub68:gosub205:sf$=i$:gosub69:sf=i
165 ifd=7thengosub68:gosub205:sg$=i$:gosub69:sg=i
166 ifd=8thengosub68:gosub205:sh$=i$:gosub69:sh=i
167 ifd=9thengosub68:gosub205:si$=i$:gosub69:si=i
168 ifd=10thengosub68:gosub205:sj$=i$:gosub69:sj=i
169 ifd=11thengosub68:gosub205:sk$=i$:gosub69:sk=i
170 ifd=12thengosub68:gosub205:sl$=i$:gosub69:sl=i
171 ifd=13thengosub68:gosub205:sm$=i$:gosub69:sm=i
172 ifd=14thengosub68:gosub205:sn$=i$:gosub69:sn=i
173 ifd=15thengosub68:gosub205:so$=i$:gosub69:so=i
174 ifd=16thengosub68:gosub205:sq$=i$:gosub69:sq=i
175 print"[154]    noch einen soundmacher ;ndern ?
176 [161]a$:[139]a$[178]""[167]176
177 [139]a$[178]"j"[167]149
178 [137]2
179 [151]53280,6:[151]53281,6:[153]"load":[141]3:[153]"sys             werbung editor
print     welche werbungsart ver;ndern ?
sys"wa$:[153]"on"wa:[153]wb$:[153]"on"wb:[153]wc$:[153]"on"wc
180 [153]"printkeine werbung
":d[178]1:xx[178]14:[141]12
181 [139][194](56320)[178]125[167][153]"onon":[141]13:[141]12:d[178]d[170]1
182 [139][194](56320)[178]126[167][153]"onon":[141]13:[153]"ononon":[141]12:d[178]d[171]1
183 [139][194](56320)[178]111[167]187
184 [139]d[178]0[167][153]"onon":[141]13:[153]"":[141]12:d[178]3
185 [139]d[178]4[167][153]"onon":[141]13:[153]"ononononon":[141]12:d[178]1
186 [137]181
187 [153]"load":[141]3:[153]"sys             werbung editor             ":[139]d[178]1[167][141]68:[141]205:wa$[178]i$:[141]69:wa[178]i
188 [139]d[178]2[167][141]68:[141]205:wb$[178]i$:[141]69:wb[178]i
189 [139]d[178]3[167][141]68:[141]205:wc$[178]i$:[141]69:wc[178]i
190 [153]"cont     noch eine werbungsart ;ndern ?
191 geta$:ifa$=""then191
192 ifa$="j"then179
193 goto2
194 poke53280,6:poke53281,6:print"[147]":gosub3:print"[158]             kapital editor
[153]wieviel startkapital soll jeder spieler
erhalten"ka:input"[145]";ka:kb=ka:goto2
195 open1,8,15:open2,8,2,"game-manager/005,s,r":input#1,xx,xy$,xy,xz:ifxx<>0thenclose1:close2:goto2
196 input#2,na$,nb$,nc$,nd$,ne$,nf$,ng$,nh$,ni$,nj$:input#2,na,nb,nc,nd,ne,nf,ng,nh,ni,nj:close1:close2:goto2
197 open1,8,15,"s:game-manager/005":open2,8,2,"game-manager/005,s,w":print#2,na$:print#2,nb$:print#2,nc$:print#2,nd$:print#2,ne$:print#2,nf$:print#2,ng$:print#2,nh$:print#2,ni$:print#2,nj$:print#2,na:print#2,nb:print#2,nc:print#2,nd:print#2,ne:print#2,nf:print#2,ng:print#2,nh:print#2,ni:print#2,nj:close1:close2:goto2
198 poke53280,.:poke53281,.:print"[147]":gosub3:print"[158]           highscores l:schen
      die top-ten vom game-manager
     ";:forb=1to15:poke646,b:print"[184][184]";:nextb:print"
       "na$:print"[154]       "nb$:print"[159]       "nc$:print"[156]       "nd$:print"       "ne$:print"[150]       "nf$
199 print"       "ng$:print"[153]       "nh$:print"[158]       "ni$:print"       "nj$:print"[145][145][145][145][145][145][145][145][145][145]"na:print"[154]"nb:print"[159]"nc:print"[156]"nd:print""ne
200 print"[150]"nf:print""ng:print"[153]"nh:print"[158]"ni:print""nj:print"[155] wirklich die highscores l:schen(j/n) ?
201 [161]a$:[139]a$[178]""[167]201
202 [139]a$[178]"j"[167]204
203 [137]2
204 na$[178]"...............":nb$[178]na$:nc$[178]na$:nd$[178]na$:ne$[178]na$:nf$[178]na$:ng$[178]na$:nh$[178]na$:ni$[178]na$:nj$[178]na$:na[178].:nb[178].:nc[178].:nd[178].:ne[178].:nf[178].:ng[178].:nh[178].:ni[178].:nj[178].:[137]2
205 i$[178]"":[151]214,y:[151]211,x[171][195](te$)[171]1:[158]58732:[153]te$" ";:p[178].
206 [151]204,.:[151]198,.:[146]198,1:[161]x$:[151]207,.:[151]204,1:[153]" cmd";:[139]p[177]0[175][198](x$)[178]20[167]i$[178][200](i$,[195](i$)[171]1):[153]"cmd cmd";:p[178]p[171]1:[137]206
207 [139][198](x$)[178]13[167]212
208 [139]p[178]le[167]206
209 [139]by[178].[175](x$[179]"0"[176]x$[177]"9")[167]206
210 [139]by[178]1[175](x$[179]" "[176](x$[177]"{$7f}"[175]x$[179]"close"))[167]206
211 [153]x$;:i$[178]i$[170]x$:p[178]p[170]1:[137]206
212 [142]