open FDDE DIR 1+ x. u& @ @# U5 u
open FDDE TOC 24 B* r' n. Y! P( J
do 5 x' a; v$ m. U9 D4 |+ y% l5 [7 |
getdstring CHUNK 4 2) f; m" P5 X2 D, |$ S
get DUNNO long 2
7 T) `- ^5 L3 v& D% t get DUNNO long 21 a9 j5 b" }/ z
get FILES long 2
: k Y1 Q# i& |) B- } get DUNNO long 26 d. r ?6 M: ~
get DUNNO long 2: e( Z" W9 R8 a( }2 f
get DUNNO long 28 X& Z; l. R* E& W+ a- l
get DUNNO long 2
* \. u+ I2 W, L/ Jwhile CHUNK != "REST"& |. x$ ~9 S% h+ }4 K& y# B
savepos NAMEPTR 1
8 l6 q/ Z! A6 P& J% R0 V2 R1 Wfor i = 1 to FILES$ w t) `4 q, d! I' Y+ L
get DUNNO long 2. G, e0 P( s, i# m R
get SIZE long 2
P0 Y6 i% m4 h. m math SIZE >>= 29 \1 X1 _; x% p! i3 k& j
get OFFSET long 2& G- N8 _* M# ]6 I9 x9 k
goto NAMEPTR 13 N+ S2 Q, {3 y) i0 [/ u2 `
get NAMEOFF long 1
* F9 n, k6 R: t savepos NAMEPTR 18 G8 Q5 w u6 s [( L: {# @
goto NAMEOFF 1
$ F- d' J) ]0 D get NAME string 1# O5 D5 k& V- R R& p& o' y6 B
log NAME OFFSET SIZE
6 s2 F3 @$ N, G4 q8 y# q1 jnext i
/ |6 ^) A4 A# P& @+ d: n$ M0 G: Z6 w. L) d- g, e; M
' G/ l% ]$ n4 g; c/ U* I2 d! P这是解包器1 U. u. o" ~3 H8 K* _! A/ C
# E0 K2 ~! P) {8 N1 mfor 里面读取toc的部分,long就是4个字节
% q' w H$ H9 `8 L C get DUNNO long 2
$ t. P/ U8 E+ q0 ]2 r; `5 |3 w; s get SIZE long 2
2 y( z" i, X7 [, |8 Z# Q math SIZE >>= 2 |/ R/ K% u+ A1 E8 a. j
get OFFSET long 2$ {' g+ {8 V/ S) R
/ w( [6 e1 I. r4 ^
for 里面读取dir的部分,long就是4个字节! t, O) z+ F R N1 p" P( c; s
goto NAMEPTR 1
: h o' g* q+ Y/ ^' k A& e0 {2 K* | get NAMEOFF long 1% Y. |) D. q1 Q V# Y
savepos NAMEPTR 1. c$ A& h2 y' N0 H' a3 b8 D% r$ X
goto NAMEOFF 18 n1 M- U6 v, L U
get NAME string 1 |