open FDDE DIR 1
* m0 c% e: W7 N$ Copen FDDE TOC 2
4 v+ ]# s+ F6 {# g7 Tdo
5 @8 h# y9 U+ U+ G, a getdstring CHUNK 4 2
0 J0 |. p; u1 t get DUNNO long 2
/ E! a) Q1 k# m! B get DUNNO long 28 E& A2 U! |( L6 F1 p# W
get FILES long 2
7 p+ C3 K, ^8 e# a! z) d3 I get DUNNO long 2
1 Q: [& n) @0 t5 y) |, y get DUNNO long 2
9 h/ C1 c$ }$ r7 ^$ T+ J. u J get DUNNO long 2
1 {- _& ? K U6 H0 K get DUNNO long 2
* ~5 b: b1 s2 R z& k, ~2 t" F) r, swhile CHUNK != "REST"; L+ A- N( X8 y$ P" @5 S4 D
savepos NAMEPTR 11 ?% S4 }0 Q9 `9 l. @% H; ]
for i = 1 to FILES% _3 B% t* [/ V; P1 X& d8 V/ \
get DUNNO long 2
3 X' t. X; R, k4 L R get SIZE long 2
0 V8 h, n2 j7 F& u9 p W: U; f3 P math SIZE >>= 2* c9 o$ j- |- }: W! {; I" D3 }
get OFFSET long 2
6 @5 u/ D& t+ e5 @0 N goto NAMEPTR 1. k, h" ]& A; q# \
get NAMEOFF long 16 b# n% {& c3 j# a) g( D" a$ J
savepos NAMEPTR 1# y# ^ C- H7 q5 n. j
goto NAMEOFF 13 I) i, q6 L( P7 P7 O: L9 |
get NAME string 1' \# {8 w( T% l( p% o5 w
log NAME OFFSET SIZE, d( z( l0 n5 J( Z* F/ G2 J; |
next i& x& s1 F$ n, ?' c
- D8 p) j K w" V9 v/ c/ n4 Y3 U8 M. U# H7 l3 ?
这是解包器
1 R3 }: R. c3 z+ |( H( \' e, N3 u2 W, z1 z. u4 }" f6 \3 W
for 里面读取toc的部分,long就是4个字节6 h2 N( d/ m' L: J8 P# n$ B$ v0 y- a
get DUNNO long 29 l, G" L% Q6 F
get SIZE long 26 ?# k3 I: J2 V* ~
math SIZE >>= 24 m3 L# ]6 I( n* V- H, G& H
get OFFSET long 2
+ H+ k) @ @) ]) X. h% N9 H& j! f4 s9 n
for 里面读取dir的部分,long就是4个字节% o9 _5 N8 N0 i( i" }) t
goto NAMEPTR 1* M6 ] F; O3 [. g! ~2 g
get NAMEOFF long 11 g' ~/ i$ v; G) v: s/ p
savepos NAMEPTR 1
5 s0 s! s9 U- [/ i$ j/ i goto NAMEOFF 1
4 y; ^3 r+ K) V, l, A+ o get NAME string 1 |