Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 10 GOSllB SO
- 20 SO-llm 1,7581!,@ 1 !1:SON 2,190,8,8,11:SON 4,755,0,0,11
- 30 IVERY 7 GOS111 uu
- 40 GOIO 48
- S8 7
- 60 ENV 1,1,14,1,1,8,4,5,-3,11
- 70 DtV 2,1,13,1,1,114
- ¡
- 5,-3,11
- 80IJIV311314,-,
- 90 m tl1ls,l,ls11,i,a,1s1-1,s
- 188 DIJ -,1,1,2
- 1
- '·-1,2,1,1¡!
- 11D DATA 1,1.,
- 1 .7:.,ili, 128 llN ttra.<S>: S :FOI i:8 TO 5:D ttr1<i>:NIXI
- 130 HtA 2,22111
- 148 1111 tsS:tihctr 138:fOI i:& TO s:11• tr,,<i>:IIXt
- 150 ffr-2
- 160 tll:1:occ:1 : _
- 170 ix:O
- 180 tra=ttra(ix)
- 190 debut:-1
- 200 IIIIDIN
- 180 tra=tt1a ( ix)
- iSü debut:-1
- - . T\ r. TUJRt;! •• ,, a.: :
- •LJ ¡{t :-1
- :Jfil ]
- a,..L,¡;}
- 2?u IF {g(l) AND 7):0 OR (SQ(2) AND 7):0 OR (S8(4) AND 7)-º -1 lrrj, nr- 1 iT.
- 21u IT NO 1 debut GOIO 280 -u nt.-!l ru.l Jr:.N
- 240 IF th=l IHIN RESJORE 410:ev:1
- 250 IF th=2 IHIN RESJORE 4S0:ev:2:occ:1
- 26º IT tli=3 IRIN RESTORI 490:ev:1:et:3 ELSI et:0
- 2Tü debut=O
- 88 FJ;A» pa pe ,L
- G IF pa.:-1 THDt 350
- 3Ilil Ir th:2 lmt p-pb/2
- 310 SC1JND 1,pa/occ/tra,16,8,3
- ªªº SimID 2,pb/occ/tra,16,0,ev
- J:,YJ SOltND 4,pc/occ/tra,16,8,3,et
- 340 REIURN
- 3W DIBUI=-1:RIP:RIP-1
- 360 IF rep{}8 IHEN RilUIN
- 370 ix:ix+l
- ª00 IF ix:6 I ix:0:occ:2:th:th+l:IF th)3 IHDf th:1
- JSO tra=ttra(1x):rep:trep(ix)
- 4G1J PJ. I LIPxH
- 410 DTA 379,253,758,253,169,0,190,159,0,253,253,676
- 1! !A ¡s,2S3, 7 58i2S3,169,O,190 1 !59 1 0,2S3,2S3,676
- ; ;.! J1S,19010,2 3,lb9,0,23,2M,68J79 i 2130
- íf.}U 11 1A l6S1142,0,253 i284fO,379,190,0 11,u ,19JJ8
- 440 DHIA ls-9142,6,6,23,2 3,7S8,213,lb9,3t9,1,159,253,-1,0 1 8
- 4Su DIA 37S,253,379,2S3,169,338,190,1S9,318,2S3,2S3,284
- 1 HIA 379, 190 ,2S3 i213 1 !69J39,2S3,84 i 284J79 i 2131253
- 4itl AlH ló9,142,0,23J2H,1,3,9,1,19,1,19,3 9
- 43 DATA 169,142,OJS3213 1190,213,169,338,190,159,1901-l,O,O
- 430 DATA 379,253,1,23,lb9,OJ90159,ª13 2S3 253 190
- S-Ofl DBIA 379,1S0,239J13 l !69J:,u,23,2H 1!ili9 i 2Í3 1 253
- 510 DATA 169,142,0,2J,2ij'l,1u,3t9,10,1:,u,1,19,24
- 520 DAIA 169,142,O,253,213,319,213,169,338,190,159,379,-1,O,0
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement