LOAD PRINT1.ASM

BLOAD PRINT1.ASM,A$1800


!L
   1        ORG $7200
   2        OBJ $800
   3 ;---->>> MOD2
   4 ; 07/02/87
   5 ; **** WARNING PATCH AT $1AB4!!!!
   6        NLS 
   7        JMP START
   8        HEX 0000
   9        JMP ABSXXX
  10 LCNT\\ HEX 00
  11 CONYXX HEX 00
  12 RSPG\\ HEX 00
  13 CONV\F HEX 00
  14 STRT\\ HEX F7
  15 RPGH\\ HEX 00
  16 PG\BUF EQU $8200
  17 ROM/1  EQU $DF00
  18 ROM/10 EQU $DF0A
  19 ROM/VL EQU $DF14
  20 SQ\BUF EQU $9900
  21 SL\BUF EQU $99C4
  22 TB\BUF EQU $9800
  23 P1\BUF EQU $9600
  24 P2\BUF EQU $9680
  25 H1\BUF EQU $9200
  26 H2\BUF EQU $9280
  27 H3\BUF EQU $9300
  28 H4\BUF EQU $9380
  29 DD\BUF EQU $93C0
  30 PP\BUF EQU $93E0
  31 DC\BUF EQU $93F2
  32 PN\BUF EQU $93F6
  33 FT\BUF EQU $9400
  34 VT\BUF EQU $9480
  35 SCR/FG EQU $1E00
  36 SCR/TY EQU $1E08
  37 PRT/FG EQU $1E06
  38 ABOR\F EQU $1E4E
  39 P/SLOT EQU $1ED0
  40 PR?BRL EQU $1ED1
  41 PR/TYP EQU $1ED3
  42 CWID\\ EQU $1ED4
  43 FORM\\ EQU $1ED5
  44 ACAP\F EQU $1ED8
  45 FF/WAT EQU $1ED7
  46 COP/ML EQU $1E4F
  47 PR?WRT EQU $1E4D
  48 JAMS\F EQU $1E5A
  49 AUXDO  EQU $E12
  50 ;
  51 S/WID  EQU $148
  52 S/LEN  EQU $149
  53 ;
  54 SEQUEN EQU $1F00
  55 SV|Y\T EPZ $1E
  56 Z1C    EPZ $1C
  57 Z1A    EPZ $1A
  58 ZFC    EPZ $FC
  59 RMAR\\ HEX 00
  60 LMAR\\ HEX 00
  61 SMAR\\ HEX 00
  62 LNSK\\ HEX 01
  63 PASK\\ HEX 02
  64 INDT\\ HEX 05
  65 EWID\\ HEX 50
  66 BWID\\ HEX 50
  67 NUM\\  HEX 0000
  68 FFSK\\ HEX 00
  69 SVLMAR HEX 00
  70 SVRMAR HEX 00
  71 WHED\\ HEX 00
  72 PRE/PN HEX 00
  73 PREPPI HEX 00
  74 B?P#\F HEX 00
  75 BOT?\F HEX 00
  76 CENT\F HEX 00
  77 AFIN\F HEX 00
  78 HEAD\F HEX 00
  79 Page\F HEX 00
  80 PURG\F HEX 00
  81 ROMN\F HEX 00
  82 SCEN\F HEX 00
  83 SPAC\F HEX 00
  84 ;
  85 STCY\F HEX 00
  86 ALLCAP HEX 00
  87 UNPC\F HEX 00
  88 DHYP\F HEX 00
  89 ;
  90 PTHY\F HEX 00
  91 UNDL\F HEX 00
  92 SSQ\PT HEX 00
  93 PPPS\T HEX 00
  94 VKPS\T HEX 00
  95 VIFC\F HEX 00
  96 BEG\PT HEX 00
  97 END\PT HEX 00
  98 END2PT HEX 00
  99 WORD\T HEX 00
 100 CR#\T  HEX 00
 101 SV|X\T HEX 00
 102 NUM\T  HEX 00
 103 PN/LEN HEX 00
 104 CR\F   HEX 00
 105 PGNL\T HEX 00
 106 PGNH\T HEX 00
 107 CONV/C HEX 00
 108 SVPURG HEX 00
 109 VP$P\T HEX 00
 110 VLT\T  HEX 00
 111 MAIN\T HEX 00
 112 Z$$\F  HEX 00
 113 LIN\PT HEX 00
 114 PGNL\\ HEX 01
 115 PGNH\\ HEX 00
 116 KPPN\F HEX 00
 117 LIT$$D ASC '$$d'
 118 DEC/TB HEX 01000A006400E803
 119 HEDT/L HEX 000080008000
 120 HEDT/H HEX 929292939394
 121 PageLT ASC 'Page '
 122 SSQ/CH ASC 'i?027puvbceflmdxyz'
 123 ;
 124 ;
 125        ICL "PRINT2.ASM"
!