home *** CD-ROM | disk | FTP | other *** search
/ develop, the CD; issue 1 / Apple_Develop_1989.bin / Compatibility / Printing / PRSave / PRSave.rsrc / CODE_1_Main.txt < prev    next >
Text File  |  1989-12-10  |  59KB  |  1,079 lines
  1. # near model CODE resource
  2. # jump table entries: 0-0 (1 of them)
  3. fn00000000:
  4. 00000000  4E56 0000                link       A6, 0
  5. 00000004  3F3C 000A                move.w     -[A7], 0xA /* '\n' */
  6. 00000008  A9C8                     syscall    SysBeep
  7. 0000000A  4E5E                     unlink     A6
  8. 0000000C  205F                     movea.l    A0, [A7]+
  9. 0000000E  544F                     addq.w     A7, 2
  10. 00000010  4ED0                     jmp        [A0]
  11. 00000012  8B52                     or.w       [A2], D5
  12. 00000014  4550                     chk.w      D2, [A0]
  13. 00000016  4F52                     chk.w      D7, [A2]
  14. 00000018  5445                     addq.w     D5, 2
  15. 0000001A  5252                     addq.w     [A2], 1
  16. 0000001C  4F52                     chk.w      D7, [A2]
  17. 0000001E  0000 4E56                ori.b      D0, 0x56 /* 'V' */
  18. // begin alternate branch 00000020-00000024
  19. fn00000020:
  20. 00000020  4E56 FFFE                link       A6, -0x0002
  21. // end alternate branch 00000020-00000024
  22. fn00000020: // (misaligned)
  23. 00000022  FFFE                     .invalid   <<F/7/7>>
  24. 00000024  4EBA 0700                jsr        [PC + 0x700 /* 00000726 */]
  25. 00000028  4267                     clr.w      -[A7]
  26. 0000002A  4EBA 06EC                jsr        [PC + 0x6EC /* 00000718 */]
  27. 0000002E  4A5F                     tst.w      [A7]+
  28. 00000030  6616                     bne        +0x18 /* 00000048 */
  29. 00000032  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  30. 00000036  4EBA 069A                jsr        [PC + 0x69A /* 000006D2 */]
  31. 0000003A  4267                     clr.w      -[A7]
  32. 0000003C  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  33. 00000040  4EBA 069E                jsr        [PC + 0x69E /* 000006E0 */]
  34. 00000044  1D5F FFFF                move.b     [A6 - 0x1], [A7]+
  35. label00000048:
  36. 00000048  4EBA 06EA                jsr        [PC + 0x6EA /* 00000734 */]
  37. 0000004C  4E5E                     unlink     A6
  38. 0000004E  2E9F                     move.l     [A7], [A7]+
  39. 00000050  4E75                     rts
  40. 00000052  9549                     subx.w     -[A2], -[A1]
  41. 00000054  4E49                     trap       9
  42. 00000056  5449                     addq.w     A1, 2
  43. 00000058  414C                     chk.w      D0, A4
  44. 0000005A  495A                     chk.w      D4, [A2]+
  45. 0000005C  4550                     chk.w      D2, [A0]
  46. 0000005E  5249                     addq.w     A1, 1
  47. 00000060  4E54 5245                link       A4, -0xFFFFADBB
  48. 00000064  434F                     chk.w      D1, A7
  49. 00000066  5244                     addq.w     D4, 1
  50. 00000068  0000 4E56                ori.b      D0, 0x56 /* 'V' */
  51. // begin alternate branch 0000006A-0000006E
  52. fn0000006A:
  53. 0000006A  4E56 FFF4                link       A6, -0x000C
  54. // end alternate branch 0000006A-0000006E
  55. fn0000006A: // (misaligned)
  56. 0000006C  FFF4                     .invalid   <<F/7/7>>
  57. 0000006E  48E7 0708                movem.l    -[A7], D5,D6,D7,A4
  58. 00000072  3A2E 0008                move.w     D5, [A6 + 0x8]
  59. 00000076  4267                     clr.w      -[A7]
  60. 00000078  A994                     syscall    CurResFile
  61. 0000007A  3C1F                     move.w     D6, [A7]+
  62. 0000007C  3F05                     move.w     -[A7], D5
  63. 0000007E  A998                     syscall    UseResFile
  64. 00000080  4267                     clr.w      -[A7]
  65. 00000082  A9AF                     syscall    ResError
  66. 00000084  3E1F                     move.w     D7, [A7]+
  67. 00000086  4A47                     tst.w      D7
  68. 00000088  666A                     bne        +0x6C /* 000000F4 */
  69. 0000008A  42A7                     clr.l      -[A7]
  70. 0000008C  2F3A 00A0                move.l     -[A7], [PC + 0xA0 /* 0000012E, value 0x504F5054 'POPT' */]
  71. 00000090  3F3C 0080                move.w     -[A7], 0x80
  72. 00000094  A9A0                     syscall    GetResource
  73. 00000096  285F                     movea.l    A4, [A7]+
  74. 00000098  200C                     move.l     D0, A4
  75. 0000009A  6718                     beq        +0x1A /* 000000B4 */
  76. 0000009C  2F0C                     move.l     -[A7], A4
  77. 0000009E  A9AD                     syscall    RemoveResource/RmveResource
  78. 000000A0  4267                     clr.w      -[A7]
  79. 000000A2  A9AF                     syscall    ResError
  80. 000000A4  3E1F                     move.w     D7, [A7]+
  81. 000000A6  4A47                     tst.w      D7
  82. 000000A8  660A                     bne        +0xC /* 000000B4 */
  83. 000000AA  2F0C                     move.l     -[A7], A4
  84. 000000AC  4EBA 05CC                jsr        [PC + 0x5CC /* 0000067A */]
  85. 000000B0  3F05                     move.w     -[A7], D5
  86. 000000B2  A999                     syscall    UpdateResFile
  87. label000000B4:
  88. 000000B4  4A47                     tst.w      D7
  89. 000000B6  663C                     bne        +0x3E /* 000000F4 */
  90. 000000B8  2D6E 000A FFF6           move.l     [A6 - 0xA], [A6 + 0xA]
  91. 000000BE  4267                     clr.w      -[A7]
  92. 000000C0  486E FFF6                pea.l      [A6 - 0xA]
  93. 000000C4  4EBA 05BE                jsr        [PC + 0x5BE /* 00000684 */]
  94. 000000C8  3E1F                     move.w     D7, [A7]+
  95. 000000CA  4A47                     tst.w      D7
  96. 000000CC  6626                     bne        +0x28 /* 000000F4 */
  97. 000000CE  2F2E FFF6                move.l     -[A7], [A6 - 0xA]
  98. 000000D2  2F3A 005A                move.l     -[A7], [PC + 0x5A /* 0000012E, value 0x504F5054 'POPT' */]
  99. 000000D6  3F3C 0080                move.w     -[A7], 0x80
  100. 000000DA  487A 0044                pea.l      [PC + 0x44 /* 00000120, value 0xC507269, pstring "Print Record" */]
  101. 000000DE  A9AB                     syscall    AddResource
  102. 000000E0  4267                     clr.w      -[A7]
  103. 000000E2  A9AF                     syscall    ResError
  104. 000000E4  3E1F                     move.w     D7, [A7]+
  105. 000000E6  4A47                     tst.w      D7
  106. 000000E8  6604                     bne        +0x6 /* 000000EE */
  107. 000000EA  3F05                     move.w     -[A7], D5
  108. 000000EC  A999                     syscall    UpdateResFile
  109. label000000EE:
  110. 000000EE  4267                     clr.w      -[A7]
  111. 000000F0  A9AF                     syscall    ResError
  112. 000000F2  3E1F                     move.w     D7, [A7]+
  113. label000000F4:
  114. 000000F4  4A47                     tst.w      D7
  115. 000000F6  6706                     beq        +0x8 /* 000000FE */
  116. 000000F8  3F07                     move.w     -[A7], D7
  117. 000000FA  4EBA FF04                jsr        [PC - 0xFC /* 00000000 */]
  118. label000000FE:
  119. 000000FE  3F06                     move.w     -[A7], D6
  120. 00000100  A998                     syscall    UseResFile
  121. 00000102  4CDF 10E0                movem.l    D5,D6,D7,A4, [A7]+
  122. 00000106  4E5E                     unlink     A6
  123. 00000108  205F                     movea.l    A0, [A7]+
  124. 0000010A  5C4F                     addq.w     A7, 6
  125. 0000010C  4ED0                     jmp        [A0]
  126. 0000010E  8F53                     or.w       [A3], D7
  127. 00000110  4156                     chk.w      D0, [A6]
  128. 00000112  4550                     chk.w      D2, [A0]
  129. 00000114  5249                     addq.w     A1, 1
  130. 00000116  4E54 5245                link       A4, -0xFFFFADBB
  131. 0000011A  434F                     chk.w      D1, A7
  132. 0000011C  5244                     addq.w     D4, 1
  133. 0000011E  0012 0C50                ori.b      [A2], 0x50 /* 'P' */
  134. 00000122  7269                     moveq.l    D1, 0x69
  135. 00000124  6E74                     bgt        +0x76 /* 0000019A */
  136. 00000126  2052                     movea.l    A0, [A2]
  137. 00000128  6563                     bcs        +0x65 /* 0000018D */
  138. 0000012A  6F72                     ble        +0x74 /* 0000019E */
  139. 0000012C  6400 504F                bcc        +0x5051 /* 0000517D */
  140. 00000130  5054                     addq.w     [A4], 8
  141. fn00000132:
  142. 00000132  4E56 FFF8                link       A6, -0x0008
  143. 00000136  48E7 0308                movem.l    -[A7], D6,D7,A4
  144. 0000013A  4267                     clr.w      -[A7]
  145. 0000013C  A994                     syscall    CurResFile
  146. 0000013E  3C1F                     move.w     D6, [A7]+
  147. 00000140  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  148. 00000144  A998                     syscall    UseResFile
  149. 00000146  4267