开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 压缩解压 > 查看源码
config.S
资源名称：unzip540.zip　[点击查看]
上传用户：andy_li
上传日期：2007-01-06
资源大小：1019k
文件大小：2k
源码类别：

压缩解压

开发平台：

MultiPlatform

config.S：源码内容
  1. #
  2. .globl _qlflag
  3. .globl _qlwait
  4. #ifdef ZIP
  5. .globl _dtype
  6. #endif
  8. .data
  9.         ds.w    0
  10.         dc.b    '<<QCFX>>01'
  11. #ifdef ZIP
  12.         dc.w    8
  13. dc.b    'Info-ZIP'
  14. *                12345678901234567890
  15.         ds.w    0
  16.         dc.w    3
  17.         dc.b    '?.?'
  18.         ds.w    0
  19. #else
  20.         dc.w    10
  21. dc.b    'Info-UNZIP'
  22. *                12345678901234567890
  23.         ds.w    0
  24.         dc.w    3
  25.         dc.b    '?.?'
  26.         ds.w    0
  27. #endif
  28.         dc.b    10
  29.         dc.b    0
  30. l_4:    dc.w    _qlwait-l_4
  31.         dc.w    0
  32.         dc.w    0
  33. l_5:    dc.w    hpt-l_5
  34. l_6:    dc.w    hxx-l_6
  36. #ifdef ZIP
  37.         dc.b    10
  38.         dc.b    0
  39. d_4:    dc.w    _dtype-d_4
  40.         dc.w    0
  41.         dc.w    0
  42. d_5:    dc.w    dpt-d_5
  43. d_6:    dc.w    dxx-d_6
  45. #else
  46. dc.b    4
  47.         dc.b    0
  48. l5:
  49.         dc.w    list1-l5
  50.         dc.w    0
  51. l5a:
  52.         dc.w    Postit-l5a ; post proc
  53. l6:
  54.         dc.w    apt-l6
  55. l7:
  56.         dc.w    axx-l7
  57. * -------------------------------------
  58.         dc.b    4
  59.         dc.b    0
  60. l8:
  61.         dc.w    list2-l8
  62.         dc.w    0
  63. l8a:
  64. dc.w    Postit-l8a ; post proc
  65. l9:
  66.         dc.w    bpt-l9
  67. la:
  68.         dc.w    bxx-la
  69. * -------------------------------------
  70. #endif
  71. dc.w    -1                          ; end
  73. _qlflag:
  74. dc.w 0
  75. _qlwait:
  76.         dc.w    250
  77. _dtype:
  78. dc.w 255
  80. hpt:    dc.w    10
  81.         dc.b    'Exit Delay'
  82. *                12345678901234567890
  83.         ds.w    0
  84. hxx:    dc.w    0
  85.         dc.w    $ffff
  86.         dc.w    -1
  87. #ifdef  ZIP
  88. dpt:    dc.w    14
  89.         dc.b    'Directory Type'
  90. *                12345678901234567890
  91.         ds.w    0
  92. dxx:    dc.w    3
  93.         dc.w    $ff
  94.         dc.w    -1
  95. #else
  97. list1:
  98.         dc.b    0
  99. list2:
  100.         dc.b    0
  102. apt:
  103.         dc.w    11
  104.         dc.b    'Unpack Mode'
  105. *                12345678901234567890
  106. .even
  107. axx:    dc.b    0
  108. dc.b 0
  109.         dc.w    8
  110.         dc.b    'SMS/QDOS'
  111. .even
  112.         dc.b    1
  113.         dc.b    0
  114.         dc.w    7
  115.         dc.b    'Default'
  116. .even
  117. dc.w    -1
  118. .even
  119. bpt:
  120.         dc.w    12
  121.         dc.b    'Listing Mode'
  122. *                12345678901234567890
  123. .even
  124. bxx:
  125.         dc.w    0
  126.         dc.w    7
  127.         dc.b    'Default'
  128. .even
  129.         dc.b    2
  130.         dc.b    0
  131.         dc.w    8
  132.         dc.b    'SMS/QDOS'
  133. *                12345678901234567890
  134. .even
  135.  dc.w    -1
  136. Postit:
  137. lea.l _qlflag,a0
  138. move.b  list1,d0
  139. move.b d0,(a0)
  140. move.b list2,d0
  141. or.b d0,(a0)
  142. moveq #0,d0
  143. rts
  144. #endif
  145. end