home *** CD-ROM | disk | FTP | other *** search
/ BCI NET / BCI NET Dec 94.iso / archives / programming / blitzbasic / fdconvert.lha / fdconv.bb2 next >
Unknown  |  1994-02-09  |  4.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 80 33 2e 6c 00 3b 00 3b | 66 64 69 6e 66 6f 20 70 |.3.l.;.;|fdinfo p|
|00000010| 72 6f 67 2e 2e 2e 20 73 | 75 73 73 20 6f 75 74 20 |rog... s|uss out |
|00000020| 61 6e 20 66 64 20 66 69 | 6c 65 2c 20 61 6e 64 20 |an fd fi|le, and |
|00000030| 72 65 74 75 72 6e 20 6c | 69 62 72 61 72 79 20 6f |return l|ibrary o|
|00000040| 66 66 73 65 74 73 21 00 | 3b 00 80 08 20 61 6c 69 |ffsets!.|;... ali|
|00000050| 67 6e 7b 7d 00 3b 00 80 | 15 20 63 6f 24 00 3b 00 |gn{}.;..|. co$.;.|
|00000060| 6c 2e 71 3d dc 8f 28 63 | 6f 24 29 00 80 0b 20 6c |l.q=..(c|o$)... l|
|00000070| 2f 32 3c 3e bc 02 28 6c | 2f 32 29 20 80 21 20 63 |/2<>..(l|/2) .! c|
|00000080| 6f 24 2b dc 86 28 30 29 | 00 3b 00 80 02 20 80 08 |o$+..(0)|.;... ..|
|00000090| 00 00 80 08 20 66 69 6c | 6c 69 6e 7b 73 72 63 2e |.... fil|lin{src.|
|000000a0| 6c 7d 20 3b 73 72 63 3d | 73 6f 75 72 63 65 20 74 |l} ;src=|source t|
|000000b0| 6f 20 63 68 61 6e 67 65 | 00 3b 00 80 15 20 63 6f |o change|.;... co|
|000000c0| 24 00 3b 00 63 6f 24 3d | dc 81 28 63 6f 24 2c 73 |$.;.co$=|..(co$,s|
|000000d0| 72 63 29 2b dc 8c 28 dc | 8f 28 63 6f 24 29 29 2b |rc)+..(.|.(co$))+|
|000000e0| dc 83 28 63 6f 24 2c 73 | 72 63 2b 35 29 00 3b 00 |..(co$,s|rc+5).;.|
|000000f0| 80 02 20 80 08 00 00 80 | b4 00 20 20 65 72 72 00 |.. .....|.. err.|
|00000100| 20 20 dd 82 20 22 55 53 | 41 47 45 3a 20 46 44 43 | .. "US|AGE: FDC|
|00000110| 4f 4e 56 20 66 69 6c 65 | 6e 61 6d 65 20 5b 63 6f |ONV file|name [co|
|00000120| 6d 6d 61 6e 64 20 73 75 | 66 66 69 78 5d 22 00 20 |mmand su|ffix]". |
|00000130| 20 80 02 00 80 02 20 80 | b4 00 00 80 0b 20 b5 01 | ..... .|..... ..|
|00000140| 3c 3e 31 20 80 42 20 b5 | 01 3c 3e 32 20 80 21 20 |<>1 .B .|.<>2 .! |
|00000150| 80 05 20 65 72 72 00 00 | 80 0b 20 b5 01 3d 32 20 |.. err..|.. ..=2 |
|00000160| 80 21 20 73 75 66 24 3d | b5 02 28 32 29 00 00 64 |.! suf$=|..(2)..d|
|00000170| 65 73 74 24 3d 22 62 6c | 69 74 7a 6c 69 62 73 3a |est$="bl|itzlibs:|
|00000180| 61 6d 69 67 61 6c 69 62 | 73 2f 22 00 00 80 04 20 |amigalib|s/".... |
|00000190| 6e 24 28 31 30 30 30 29 | 2c 68 24 28 31 30 30 30 |n$(1000)|,h$(1000|
|000001a0| 29 2c 70 24 28 31 30 30 | 30 29 2c 6f 2e 77 28 31 |),p$(100|0),o.w(1|
|000001b0| 30 30 30 29 00 80 04 20 | 6c 24 28 31 30 29 2c 6c |000)... |l$(10),l|
|000001c0| 6e 28 31 30 29 20 3b 6d | 61 78 20 6c 69 62 73 20 |n(10) ;m|ax libs |
|000001d0| 73 70 6c 69 74 2d 75 70 | 00 00 80 0b 20 be 11 28 |split-up|.... ..(|
|000001e0| 30 2c b5 02 28 31 29 29 | 00 20 20 dd 82 20 22 45 |0,..(1))|. .. "E|
|000001f0| 78 61 6d 69 6e 69 6e 67 | 20 46 44 20 46 69 6c 65 |xamining| FD File|
|00000200| 2e 2e 2e 22 00 20 20 be | 08 20 30 3a 80 06 20 73 |...". .|. 0:.. s|
|00000210| 75 73 73 66 64 3a be 02 | 20 30 3a d2 01 00 20 20 |ussfd:..| 0:... |
|00000220| 3b 00 20 20 3b 6f 6b 2e | 2e 2e 20 66 64 20 66 69 |;. ;ok.|.. fd fi|
|00000230| 6c 65 20 73 75 73 73 65 | 64 20 2d 20 6e 6f 77 20 |le susse|d - now |
|00000240| 74 6f 20 6d 61 6b 65 20 | 6f 75 74 70 75 74 20 66 |to make |output f|
|00000250| 69 6c 65 2e 2e 2e 00 20 | 20 3b 00 20 20 80 06 20 |ile.... | ;. .. |
|00000260| 6d 61 6b 65 6c 69 62 00 | 20 20 3b 00 80 22 00 20 |makelib.| ;..". |
|00000270| 20 dd 82 20 22 43 6f 75 | 6c 64 6e 27 74 20 6f 70 | .. "Cou|ldn't op|
|00000280| 65 6e 20 66 69 6c 65 20 | 66 6f 72 20 72 65 61 64 |en file |for read|
|00000290| 69 6e 67 2e 22 00 20 20 | 80 02 00 80 c0 00 00 80 |ing.". |........|
|000002a0| 02 00 00 2e 6d 61 6b 65 | 6c 69 62 20 20 3b 6e 3d |....make|lib ;n=|
|000002b0| 6e 75 6d 62 65 72 20 6f | 66 20 63 6f 6d 6d 61 6e |number o|f comman|
|000002c0| 64 73 2e 2e 2e 00 68 65 | 72 65 30 00 6c 6c 2e 6c |ds....he|re0.ll.l|
|000002d0| 3d fe ba 28 26 6c 69 24 | 29 00 80 0b 20 6c 6c 00 |=..(&li$|)... ll.|
|000002e0| 20 20 fe bb 20 6c 6c 3a | 69 73 6c 69 62 3d 2d 31 | .. ll:|islib=-1|
|000002f0| 00 80 22 00 20 20 6c 6c | 2e 6c 3d fe c9 28 26 6c |..". ll|.l=..(&l|
|00000300| 69 24 29 00 20 20 80 0b | 20 6c 6c 00 20 20 20 20 |i$). ..| ll. |
|00000310| 69 73 6c 69 62 3d 30 00 | 20 20 80 22 00 20 20 20 |islib=0.| .". |
|00000320| 20 dd 82 20 22 43 6f 75 | 6c 64 6e 27 74 20 6f 70 | .. "Cou|ldn't op|
|00000330| 65 6e 20 6c 69 62 72 61 | 72 79 2f 72 65 73 6f 75 |en libra|ry/resou|
|00000340| 72 63 65 20 3a 20 22 2c | 6c 69 24 00 20 20 20 20 |rce : ",|li$. |
|00000350| dd 81 20 22 45 6e 74 65 | 72 20 6e 65 77 20 6c 69 |.. "Ente|r new li|
|00000360| 62 72 61 72 79 20 6e 61 | 6d 65 20 6f 72 20 72 65 |brary na|me or re|
|00000370| 74 75 72 6e 20 74 6f 20 | 65 78 69 74 20 3a 22 3a |turn to |exit :":|
|00000380| 6c 69 24 3d dd 01 28 34 | 30 29 00 20 20 20 20 80 |li$=..(4|0). .|
|00000390| 0b 20 6c 69 24 3d 22 22 | 20 80 21 20 80 07 00 20 |. li$=""| .! ... |
|000003a0| 20 20 20 80 05 20 68 65 | 72 65 30 00 20 20 80 c0 | .. he|re0. ..|
|000003b0| 00 80 c0 00 3b 00 3b 6c | 69 24 3d 6c 69 62 72 61 |....;.;l|i$=libra|
|000003c0| 72 79 20 6e 61 6d 65 21 | 20 2d 20 67 65 6e 65 72 |ry name!| - gener|
|000003d0| 61 74 65 20 61 6d 69 67 | 61 6c 69 62 73 20 6e 61 |ate amig|alibs na|
|000003e0| 6d 65 00 3b 00 6e 6c 3d | 28 6e 2d 31 29 2f 31 32 |me.;.nl=|(n-1)/12|
|000003f0| 37 2b 31 20 20 3b 68 6f | 77 20 6d 61 6e 79 20 6c |7+1 ;ho|w many l|
|00000400| 69 62 73 20 74 6f 20 6d | 61 6b 65 00 dd 82 20 22 |ibs to m|ake... "|
|00000410| 4c 69 62 72 61 72 79 20 | 77 69 6c 6c 20 72 65 71 |Library |will req|
|00000420| 75 69 72 65 20 22 2c 6e | 6c 2c 22 20 41 6d 69 67 |uire ",n|l," Amig|
|00000430| 61 6c 69 62 73 20 66 69 | 6c 65 73 2e 2e 2e 22 00 |alibs fi|les...".|
|00000440| 80 16 20 6b 3d 31 20 80 | 18 20 6e 6c 00 68 65 72 |.. k=1 .|. nl.her|
|00000450| 65 00 dd 81 20 22 41 6d | 69 67 61 6c 69 62 20 66 |e... "Am|igalib f|
|00000460| 69 6c 65 20 22 2c 6b 2c | 22 20 49 44 20 28 31 2d |ile ",k,|" ID (1-|
|00000470| 32 35 35 29 3a 20 22 3a | 6c 6e 28 6b 29 3d bc 01 |255): ":|ln(k)=..|
|00000480| 28 dd 01 28 38 29 29 00 | 80 0b 20 6c 6e 28 6b 29 |(..(8)).|.. ln(k)|
|00000490| 3e 32 35 35 20 80 8a 20 | 6c 6e 28 6b 29 3c 31 00 |>255 .. |ln(k)<1.|
|000004a0| 20 20 dd 82 20 22 49 6c | 6c 65 67 61 6c 20 6c 69 | .. "Il|legal li|
|000004b0| 62 72 61 72 79 20 49 44 | 22 3a 80 05 20 68 65 72 |brary ID|":.. her|
|000004c0| 65 00 80 c0 00 80 17 00 | 6c 6e 3d 6c 6e 28 31 29 |e.......|ln=ln(1)|
|000004d0| 00 3b 00 6c 69 32 24 3d | 6c 69 24 00 63 6c 65 61 |.;.li2$=|li$.clea|
|000004e0| 72 75 70 3a 6b 3d dc 89 | 28 6c 69 32 24 2c 22 3a |rup:k=..|(li2$,":|
|000004f0| 22 29 3a 80 0b 20 6b 20 | 80 21 20 6c 69 32 24 3d |"):.. k |.! li2$=|
|00000500| dc 83 28 6c 69 32 24 2c | 6b 2b 31 29 3a 80 05 20 |..(li2$,|k+1):.. |
|00000510| 63 6c 65 61 72 75 70 00 | 63 6c 65 61 72 75 70 32 |clearup.|clearup2|
|00000520| 3a 6b 3d dc 89 28 6c 69 | 32 24 2c 22 2f 22 29 3a |:k=..(li|2$,"/"):|
|00000530| 80 0b 20 6b 20 80 21 20 | 6c 69 32 24 3d dc 83 28 |.. k .! |li2$=..(|
|00000540| 6c 69 32 24 2c 6b 2b 31 | 29 3a 80 05 20 63 6c 65 |li2$,k+1|):.. cle|
|00000550| 61 72 75 70 00 3b 00 6e | 6e 3d 31 32 37 3a 6c 69 |arup.;.n|n=127:li|
|00000560| 3d 30 00 3b 00 80 16 20 | 74 6b 3d 31 20 80 18 20 |=0.;... |tk=1 .. |
|00000570| 6e 00 3b 00 6e 6e 2b 31 | 00 80 0b 20 6e 6e 3d 31 |n.;.nn+1|... nn=1|
|00000580| 32 38 00 20 20 3b 00 20 | 20 80 0b 20 6c 69 20 80 |28. ;. | .. li .|
|00000590| 21 20 80 06 20 6c 69 62 | 64 6f 6e 65 00 20 20 3b |! .. lib|done. ;|
|000005a0| 00 20 20 6c 69 2b 31 00 | 20 20 80 0b 20 be 12 28 |. li+1.| .. ..(|
|000005b0| 30 2c 64 65 73 74 24 2b | 6c 69 32 24 2b dd 83 28 |0,dest$+|li2$+..(|
|000005c0| 6c 69 29 29 3d 30 00 20 | 20 20 20 dd 82 20 22 45 |li))=0. | .. "E|
|000005d0| 72 72 6f 72 20 63 72 65 | 61 74 69 6e 67 20 46 69 |rror cre|ating Fi|
|000005e0| 6c 65 20 3a 20 22 2c 6c | 69 24 2b dd 83 28 6c 69 |le : ",l|i$+..(li|
|000005f0| 29 00 20 20 20 20 80 be | 20 80 16 3a 80 07 00 20 |). ..| ..:... |
|00000600| 20 80 c0 00 20 20 3b 00 | 20 20 63 6f 24 3d dc 8c | ... ;.| co$=..|
|00000610| 28 30 29 2b dc 8b 28 6c | 6e 28 6c 69 29 29 2b dc |(0)+..(l|n(li))+.|
|00000620| 88 28 dc 86 28 30 29 2c | 32 30 29 00 20 20 80 0b |.(..(0),|20). ..|
|00000630| 20 6c 69 3d 31 20 80 21 | 20 63 6f 24 2b dc 8b 28 | li=1 .!| co$+..(|
|00000640| 31 29 20 80 22 20 63 6f | 24 2b dc 8b 28 30 29 00 |1) ." co|$+..(0).|
|00000650| 20 20 63 6f 24 2b dc 88 | 28 dc 86 28 30 29 2c 32 | co$+..|(..(0),2|
|00000660| 30 29 00 20 20 6e 6e 3d | 31 3a dd 82 20 22 2d 2d |0). nn=|1:.. "--|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000680| 2d 2d 20 4e 45 57 20 4c | 49 42 20 2d 2d 2d 2d 2d |-- NEW L|IB -----|
|00000690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006a0| 2d 2d 22 00 20 20 3b 00 | 80 c0 00 3b 00 dd 82 20 |--". ;.|...;... |
|000006b0| 22 43 52 45 41 54 49 4e | 47 20 3a 20 22 2c 6e 24 |"CREATIN|G : ",n$|
|000006c0| 28 74 6b 29 2c 22 5f 22 | 2c 73 75 66 24 2c 22 20 |(tk),"_"|,suf$," |
|000006d0| 22 2c 68 24 28 74 6b 29 | 2c 22 20 22 2c 70 24 28 |",h$(tk)|," ",p$(|
|000006e0| 74 6b 29 00 63 6f 24 2b | dc 8b 28 36 29 2b dc 8c |tk).co$+|..(6)+..|
|000006f0| 28 30 29 2b dc 8b 28 6c | 6e 28 31 29 29 2b dc 8b |(0)+..(l|n(1))+..|
|00000700| 28 6f 28 74 6b 29 29 20 | 3b 74 79 70 65 20 61 6e |(o(tk)) |;type an|
|00000710| 64 20 6c 69 6e 6b 00 3b | 00 70 24 3d dc 83 28 70 |d link.;|.p$=..(p|
|00000720| 24 28 74 6b 29 2c 32 29 | 00 80 0c 20 dc 81 28 70 |$(tk),2)|... ..(p|
|00000730| 24 2c 31 29 3d 22 61 22 | 20 80 8a 20 dc 81 28 70 |$,1)="a"| .. ..(p|
|00000740| 24 2c 31 29 3d 22 64 22 | 00 20 20 80 0b 20 dc 81 |$,1)="d"|. .. ..|
|00000750| 28 70 24 2c 31 29 3d 22 | 61 22 00 20 20 20 20 63 |(p$,1)="|a". c|
|00000760| 6f 24 2b dc 86 28 bc 01 | 28 dc 83 28 70 24 2c 32 |o$+..(..|(..(p$,2|
|00000770| 2c 31 29 29 2b 31 36 29 | 00 20 20 80 22 00 20 20 |,1))+16)|. .". |
|00000780| 20 20 63 6f 24 2b dc 86 | 28 bc 01 28 dc 83 28 70 | co$+..|(..(..(p|
|00000790| 24 2c 32 2c 31 29 29 29 | 00 20 20 80 c0 00 20 20 |$,2,1)))|. ... |
|000007a0| 70 24 3d dc 83 28 70 24 | 2c 34 29 00 80 c1 00 3b |p$=..(p$|,4)....;|
|000007b0| 00 63 6f 24 2b dc 86 28 | 2d 31 29 00 61 6c 69 67 |.co$+..(|-1).alig|
|000007c0| 6e 7b 7d 00 63 6f 24 2b | dc 8c 28 30 29 2b dc 8b |n{}.co$+|..(0)+..|
|000007d0| 28 30 29 2b 6e 24 28 74 | 6b 29 2b 22 5f 22 2b 73 |(0)+n$(t|k)+"_"+s|
|000007e0| 75 66 24 2b dc 86 28 30 | 29 2b 68 24 28 74 6b 29 |uf$+..(0|)+h$(tk)|
|000007f0| 2b dc 86 28 30 29 00 61 | 6c 69 67 6e 7b 7d 00 3b |+..(0).a|lign{}.;|
|00000800| 00 80 17 00 3b 00 80 0b | 20 63 6f 24 20 80 21 20 |....;...| co$ .! |
|00000810| 80 06 20 6c 69 62 64 6f | 6e 65 00 3b 00 80 07 00 |.. libdo|ne.;....|
|00000820| 00 2e 6c 69 62 64 6f 6e | 65 00 3b 00 80 0b 20 6c |..libdon|e.;... l|
|00000830| 69 3d 31 20 3b 66 69 72 | 73 74 20 6f 6e 65 20 2d |i=1 ;fir|st one -|
|00000840| 20 63 72 65 61 74 65 20 | 27 6f 70 65 6e 6c 69 62 | create |'openlib|
|00000850| 72 61 72 79 27 20 73 74 | 75 66 66 21 00 20 20 3b |rary' st|uff!. ;|
|00000860| 00 20 20 3b 6d 61 6b 65 | 20 27 69 6e 69 74 27 20 |. ;make| 'init' |
|00000870| 6e 75 6c 6c 73 75 62 21 | 00 20 20 3b 00 20 20 66 |nullsub!|. ;. f|
|00000880| 69 6c 6c 69 6e 7b 24 31 | 36 7d 00 20 20 63 6f 24 |illin{$1|6}. co$|
|00000890| 2b dc 88 28 dc 86 28 30 | 29 2c 31 32 29 3a 69 61 |+..(..(0|),12):ia|
|000008a0| 74 3d dc 8f 28 63 6f 24 | 29 00 20 20 63 6f 24 2b |t=..(co$|). co$+|
|000008b0| dc 8c 28 30 29 2b dc 8c | 28 30 29 00 20 20 3b 00 |..(0)+..|(0). ;.|
|000008c0| 20 20 3b 6d 61 6b 65 20 | 27 66 69 6e 69 74 27 20 | ;make |'finit' |
|000008d0| 6e 75 6c 6c 73 75 62 21 | 00 20 20 3b 00 20 20 66 |nullsub!|. ;. f|
|000008e0| 69 6c 6c 69 6e 7b 24 31 | 63 7d 00 20 20 63 6f 24 |illin{$1|c}. co$|
|000008f0| 2b dc 88 28 dc 86 28 30 | 29 2c 36 29 2b dc 8b 28 |+..(..(0|),6)+..(|
|00000900| 6c 6e 28 31 29 29 2b dc | 8b 28 24 31 31 30 30 29 |ln(1))+.|.($1100)|
|00000910| 2b dc 8b 28 30 29 00 20 | 20 63 6f 24 2b dc 8c 28 |+..(0). | co$+..(|
|00000920| 30 29 3a 66 61 74 3d dc | 8f 28 63 6f 24 29 00 20 |0):fat=.|.(co$). |
|00000930| 20 63 6f 24 2b dc 8c 28 | 30 29 2b dc 8c 28 30 29 | co$+..(|0)+..(0)|
|00000940| 00 20 20 3b 00 20 20 63 | 6f 24 2b dc 8b 28 2d 31 |. ;. c|o$+..(-1|
|00000950| 29 2b dc 8c 28 30 29 00 | 20 20 3b 00 20 20 3b 6d |)+..(0).| ;. ;m|
|00000960| 61 6b 65 20 27 6c 69 62 | 69 6e 69 74 27 20 63 6f |ake 'lib|init' co|
|00000970| 64 65 21 00 20 20 3b 00 | 20 20 66 69 6c 6c 69 6e |de!. ;.| fillin|
|00000980| 7b 69 61 74 7d 00 20 20 | 63 6f 24 2b dc 8c 28 24 |{iat}. |co$+..($|
|00000990| 32 63 37 38 30 30 30 34 | 29 20 20 20 20 20 20 20 |2c780004|) |
|000009a0| 20 20 3b 20 20 20 20 20 | 6d 6f 76 65 2e 6c 20 20 | ; |move.l |
|000009b0| 20 34 2e 77 2c 61 36 00 | 20 20 63 6f 24 2b dc 8c | 4.w,a6.| co$+..|
|000009c0| 28 24 34 33 66 61 30 30 | 31 38 29 20 20 20 20 20 |($43fa00|18) |
|000009d0| 20 20 20 20 3b 6c 6f 6f | 70 20 6c 65 61 20 20 20 | ;loo|p lea |
|000009e0| 20 20 20 6c 69 62 6e 61 | 6d 65 28 70 63 29 2c 61 | libna|me(pc),a|
|000009f0| 31 00 20 20 63 6f 24 2b | dc 8b 28 24 37 30 30 30 |1. co$+|..($7000|
|00000a00| 29 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 |) | ; |
|00000a10| 20 20 20 20 6d 6f 76 65 | 71 20 20 20 20 23 30 2c | move|q #0,|
|00000a20| 64 30 00 20 20 63 6f 24 | 2b dc 8b 28 24 34 65 61 |d0. co$|+..($4ea|
|00000a30| 65 29 00 20 20 80 0b 20 | 69 73 6c 69 62 00 20 20 |e). .. |islib. |
|00000a40| 20 20 63 6f 24 2b dc 8b | 28 2d 35 35 32 29 20 20 | co$+..|(-552) |
|00000a50| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 20 20 20 | | ; |
|00000a60| 6a 73 72 20 20 20 20 20 | 20 6f 70 65 6e 6c 69 62 |jsr | openlib|
|00000a70| 72 61 72 79 28 61 36 29 | 00 20 20 80 22 00 20 20 |rary(a6)|. .". |
|00000a80| 20 20 63 6f 24 2b dc 8b | 28 2d 34 39 38 29 20 20 | co$+..|(-498) |
|00000a90| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 20 20 20 | | ; |
|00000aa0| 6a 73 72 20 20 20 20 20 | 20 6f 70 65 6e 72 65 73 |jsr | openres|
|00000ab0| 6f 75 72 63 65 28 61 36 | 29 00 20 20 80 c0 00 20 |ource(a6|). ... |
|00000ac0| 20 63 6f 24 2b dc 8b 28 | 24 34 61 38 30 29 20 20 | co$+..(|$4a80) |
|00000ad0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 20 20 20 20 | | ; |
|00000ae0| 20 74 73 74 2e 6c 20 20 | 20 20 64 30 00 20 20 63 | tst.l | d0. c|
|00000af0| 6f 24 2b dc 8c 28 24 36 | 37 30 30 66 66 66 34 29 |o$+..($6|700fff4)|
|00000b00| 20 20 20 20 20 20 20 20 | 20 3b 20 20 20 20 20 62 | | ; b|
|00000b10| 65 71 20 20 20 20 20 20 | 6c 6f 6f 70 00 20 20 63 |eq |loop. c|
|00000b20| 6f 24 2b dc 8b 28 24 34 | 65 37 35 29 20 20 20 20 |o$+..($4|e75) |
|00000b30| 20 20 20 20 20 20 20 20 | 20 3b 20 20 20 20 20 72 | | ; r|
|00000b40| 74 73 00 20 20 3b 00 20 | 20 3b 6d 61 6b 65 20 27 |ts. ;. | ;make '|
|00000b50| 6c 69 62 66 69 6e 69 74 | 27 20 63 6f 64 65 21 00 |libfinit|' code!.|
|00000b60| 20 20 3b 00 20 20 66 69 | 6c 6c 69 6e 7b 66 61 74 | ;. fi|llin{fat|
|00000b70| 7d 00 20 20 80 0b 20 69 | 73 6c 69 62 00 20 20 20 |}. .. i|slib. |
|00000b80| 20 63 6f 24 2b dc 8c 28 | 24 32 63 37 38 30 30 30 | co$+..(|$2c78000|
|00000b90| 34 29 20 20 20 3b 20 20 | 20 20 20 6d 6f 76 65 2e |4) ; | move.|
|00000ba0| 6c 20 20 20 20 34 2e 77 | 2c 61 36 00 20 20 20 20 |l 4.w|,a6. |
|00000bb0| 63 6f 24 2b dc 8c 28 24 | 34 65 65 65 66 65 36 32 |co$+..($|4eeefe62|
|00000bc0| 29 20 20 20 3b 20 20 20 | 20 20 6a 6d 70 20 20 20 |) ; | jmp |
|00000bd0| 20 20 20 20 2d 24 31 39 | 65 28 61 36 29 00 20 20 | -$19|e(a6). |
|00000be0| 80 22 00 20 20 20 20 63 | 6f 24 2b dc 8b 28 24 34 |.". c|o$+..($4|
|00000bf0| 65 37 35 29 00 20 20 80 | c0 00 20 20 3b 00 20 20 |e75). .|.. ;. |
|00000c00| 3b 61 64 64 20 27 6e 61 | 6d 65 2e 6c 69 62 72 61 |;add 'na|me.libra|
|00000c10| 72 79 27 00 20 20 3b 00 | 20 20 63 6f 24 2b 6c 69 |ry'. ;.| co$+li|
|00000c20| 24 2b dc 86 28 30 29 00 | 20 20 3b 00 20 20 3b 41 |$+..(0).| ;. ;A|
|00000c30| 6c 6c 20 43 6f 64 65 20 | 44 6f 6e 65 21 20 2d 20 |ll Code |Done! - |
|00000c40| 6e 6f 77 20 66 6f 72 20 | 72 65 6c 6f 63 20 73 74 |now for |reloc st|
|00000c50| 75 66 66 00 20 20 3b 00 | 20 20 72 65 24 3d dc 8c |uff. ;.| re$=..|
|00000c60| 28 24 33 65 63 29 2b dc | 8c 28 34 29 2b dc 8c 28 |($3ec)+.|.(4)+..(|
|00000c70| 30 29 2b dc 8c 28 24 31 | 36 29 2b dc 8c 28 24 31 |0)+..($1|6)+..($1|
|00000c80| 63 29 00 20 20 72 65 24 | 2b dc 8c 28 69 61 74 29 |c). re$|+..(iat)|
|00000c90| 2b dc 8c 28 66 61 74 29 | 2b dc 8c 28 30 29 00 20 |+..(fat)|+..(0). |
|00000ca0| 20 3b 00 80 22 00 20 20 | 3b 00 20 20 63 6f 24 2b | ;..". |;. co$+|
|00000cb0| dc 8b 28 2d 31 29 2b dc | 8c 28 30 29 00 20 20 3b |..(-1)+.|.(0). ;|
|00000cc0| 00 80 c0 00 3b 00 80 0c | 20 28 dc 8f 28 63 6f 24 |....;...| (..(co$|
|00000cd0| 29 20 80 42 20 33 29 00 | 20 20 63 6f 24 2b dc 86 |) .B 3).| co$+..|
|00000ce0| 28 30 29 00 80 c1 00 3b | 00 3b 4e 6f 77 20 66 6f |(0)....;|.;Now fo|
|00000cf0| 72 20 68 65 61 64 65 72 | 20 73 74 75 66 66 00 3b |r header| stuff.;|
|00000d00| 00 63 6c 3d dc 8f 28 63 | 6f 24 29 2f 34 00 3b 00 |.cl=..(c|o$)/4.;.|
|00000d10| 69 6e 24 3d dc 8c 28 24 | 33 66 33 29 2b dc 8c 28 |in$=..($|3f3)+..(|
|00000d20| 30 29 2b dc 8c 28 31 29 | 2b dc 8c 28 30 29 2b dc |0)+..(1)|+..(0)+.|
|00000d30| 8c 28 30 29 00 69 6e 24 | 2b dc 8c 28 63 6c 29 2b |.(0).in$|+..(cl)+|
|00000d40| dc 8c 28 24 33 65 39 29 | 2b dc 8c 28 63 6c 29 00 |..($3e9)|+..(cl).|
|00000d50| 3b 00 be 07 20 30 00 dd | 81 20 69 6e 24 2c 63 6f |;... 0..|. in$,co|
|00000d60| 24 2c 72 65 24 2c dc 8c | 28 24 33 66 32 29 00 be |$,re$,..|($3f2)..|
|00000d70| 02 20 30 3a d2 02 00 3b | 00 63 6f 24 3d 22 22 3a |. 0:...;|.co$="":|
|00000d80| 72 65 24 3d 22 22 3a 80 | 07 00 00 2e 73 75 73 73 |re$="":.|....suss|
|00000d90| 66 64 00 6e 3d 30 3a 62 | 69 3d 2d 33 30 3a 6c 69 |fd.n=0:b|i=-30:li|
|00000da0| 24 3d 22 6e 6f 6e 61 6d | 65 22 3a 67 65 6e 3d 2d |$="nonam|e":gen=-|
|00000db0| 31 00 80 0c 20 80 89 20 | be 0d 28 30 29 00 20 20 |1... .. |..(0). |
|00000dc0| 6c 24 3d dd 01 28 32 35 | 36 29 00 20 20 80 0b 20 |l$=..(25|6). .. |
|00000dd0| dc 81 28 6c 24 2c 31 29 | 3c 3e 22 2a 22 00 20 20 |..(l$,1)|<>"*". |
|00000de0| 20 20 80 0b 20 dc 81 28 | 6c 24 2c 32 29 3d 22 23 | .. ..(|l$,2)="#|
|00000df0| 23 22 00 20 20 20 20 20 | 20 63 24 3d dc 97 28 dc |#". | c$=..(.|
|00000e00| 83 28 6c 24 2c 33 29 29 | 3a 63 24 3d dc 92 28 63 |.(l$,3))|:c$=..(c|
|00000e10| 24 2c 33 32 29 00 20 20 | 20 20 20 20 80 0b 20 dc |$,32). | .. .|
|00000e20| 81 28 63 24 2c 36 29 3d | 22 70 75 62 6c 69 63 22 |.(c$,6)=|"public"|
|00000e30| 20 80 21 20 67 65 6e 3d | 2d 31 00 20 20 20 20 20 | .! gen=|-1. |
|00000e40| 20 80 0b 20 dc 81 28 63 | 24 2c 37 29 3d 22 70 72 | .. ..(c|$,7)="pr|
|00000e50| 69 76 61 74 65 22 20 80 | 21 20 67 65 6e 3d 30 00 |ivate" .|! gen=0.|
|00000e60| 20 20 20 20 20 20 80 0b | 20 dc 81 28 63 24 2c 33 | ..| ..(c$,3|
|00000e70| 29 3d 22 65 6e 64 22 20 | 80 21 20 80 07 00 20 20 |)="end" |.! ... |
|00000e80| 20 20 20 20 80 0b 20 dc | 81 28 63 24 2c 34 29 3d | .. .|.(c$,4)=|
|00000e90| 22 62 69 61 73 22 20 80 | 21 20 62 69 3d 2d bc 01 |"bias" .|! bi=-..|
|00000ea0| 28 dc 83 28 63 24 2c 35 | 29 29 00 20 20 20 20 80 |(..(c$,5|)). .|
|00000eb0| 22 00 20 20 20 20 20 20 | 80 0b 20 67 65 6e 00 20 |". |.. gen. |
|00000ec0| 20 20 20 20 20 20 20 62 | 31 3d dc 89 28 6c 24 2c | b|1=..(l$,|
|00000ed0| 22 28 22 29 20 20 20 20 | 20 3b 66 69 72 73 74 20 |"(") | ;first |
|00000ee0| 62 72 61 63 6b 65 74 00 | 20 20 20 20 20 20 20 20 |bracket.| |
|00000ef0| 62 32 3d dc 89 28 6c 24 | 2c 22 28 22 2c 62 31 2b |b2=..(l$|,"(",b1+|
|00000f00| 31 29 20 3b 73 65 63 6f | 6e 64 20 62 72 61 63 6b |1) ;seco|nd brack|
|00000f10| 65 74 00 20 20 20 20 20 | 20 20 20 80 0b 20 62 31 |et. | .. b1|
|00000f20| 3e 30 20 80 42 20 62 32 | 3e 30 00 20 20 20 20 20 |>0 .B b2|>0. |
|00000f30| 20 20 20 20 20 6e 2b 31 | 00 20 20 20 20 20 20 20 | n+1|. |
|00000f40| 20 20 20 6f 28 6e 29 3d | 62 69 00 20 20 20 20 20 | o(n)=|bi. |
|00000f50| 20 20 20 20 20 6e 24 28 | 6e 29 3d dc 81 28 6c 24 | n$(|n)=..(l$|
|00000f60| 2c 62 31 2d 31 29 00 20 | 20 20 20 20 20 20 20 20 |,b1-1). | |
|00000f70| 20 68 24 28 6e 29 3d dc | 83 28 6c 24 2c 62 31 2c | h$(n)=.|.(l$,b1,|
|00000f80| 62 32 2d 62 31 29 3a 80 | 0b 20 68 24 28 6e 29 3d |b2-b1):.|. h$(n)=|
|00000f90| 22 28 29 22 20 80 21 20 | 68 24 28 6e 29 3d 22 22 |"()" .! |h$(n)=""|
|00000fa0| 00 20 20 20 20 20 20 20 | 20 20 20 70 24 28 6e 29 |. | p$(n)|
|00000fb0| 3d dc 97 28 dc 83 28 6c | 24 2c 62 32 29 29 00 20 |=..(..(l|$,b2)). |
|00000fc0| 20 20 20 20 20 20 20 80 | 22 00 20 20 20 20 20 20 | .|". |
|00000fd0| 20 20 20 20 dd 82 20 22 | 45 72 72 6f 72 20 69 6e | .. "|Error in|
|00000fe0| 20 66 69 6c 65 20 3a 22 | 00 20 20 20 20 20 20 20 | file :"|. |
|00000ff0| 20 20 20 dd 82 20 6c 24 | 00 20 20 20 20 20 20 20 | .. l$|. |
|00001000| 20 80 c0 00 20 20 20 20 | 20 20 80 c0 00 20 20 20 | ... | ... |
|00001010| 20 20 20 62 69 2d 36 00 | 20 20 20 20 20 20 3b 00 | bi-6.| ;.|
|00001020| 20 20 20 20 80 c0 00 20 | 20 80 22 00 20 20 20 20 | ... | .". |
|00001030| 6e 24 3d dc 83 28 6c 24 | 2c 32 29 3a 6e 24 3d dc |n$=..(l$|,2):n$=.|
|00001040| 92 28 6e 24 2c 33 32 29 | 00 20 20 20 20 80 0b 20 |.(n$,32)|. .. |
|00001050| dc 81 28 6e 24 2c 31 29 | 3d dc 86 28 33 34 29 00 |..(n$,1)|=..(34).|
|00001060| 20 20 20 20 20 20 6e 32 | 3d dc 89 28 6e 24 2c dc | n2|=..(n$,.|
|00001070| 86 28 33 34 29 2c 32 29 | 2d 32 00 20 20 20 20 20 |.(34),2)|-2. |
|00001080| 20 80 0b 20 6e 32 3e 30 | 00 20 20 20 20 20 20 20 | .. n2>0|. |
|00001090| 20 6c 69 24 3d dc 83 28 | 6e 24 2c 32 2c 6e 32 29 | li$=..(|n$,2,n2)|
|000010a0| 00 20 20 20 20 20 20 80 | c0 00 20 20 20 20 80 c0 |. .|.. ..|
|000010b0| 00 20 20 80 c0 00 80 c1 | 00 80 07 00 00 |. .....|..... |
+--------+-------------------------+-------------------------+--------+--------+