SCFCHAP
(GIN Macro)
Defined in: SCFMACROS
Used in:
- SCFCHAP.mac.txt
0000 [??? SCFCHAP SECT FILE FGN 15 DOC 3J?B #MAC SCFCHAP 3JR2 [ 3K=L [ PRINT DATA LINE(S) 3KQ= [ 3L9W #OPT Z%A=0 3LPG #SKI Z%A 3M96 #SKI 3MNQ ( 3MTY ...#UNS K%A 3N36 ...( 3N8B #FRE Z%A 3NN2 #DEF Z%A=1 3P7L #TRA K98BRADDATA 3PM= #DEF 19?+0=3? 3Q6W #ORD 3QLG #INT 3R66 XINF 12H%A 3RKQ 8H 3S5B 4HSIZE 3SK2 XLEN 8H 3T4L 12H 3TJ= 16HSCF TOTAL SIZE 3W3W XTOT 12H 3WHG 20H 3X36 28H 3XGQ XLNK +0 3Y2B XC10000 +10000 3YG2 XP1 +XLEN.1 3Y^L XP2 +XTOT.3 3^F= XC1000000 +1000000 3^YW #DEF 19?+1=19?+1]+((+L%A+3�)+127�) 42DG XRUN +19?+1] 42Y6 XNTRY STO 0 XLNK 43CQ LDN 5 L%A 43XB LDN 6 0 44C2 DVR 5 XC10000 44WL LDCT 7 #200 45B= LDN 1 4 45TW LDX 2 XP1 46*G MODE 1 46T6 XLA CBD 6 0(2) 47#Q BCHX 2 £ 47SB BCT 1 XLA 48#2 LDX 5 XRUN 48RL LDN 6 0 49?= DVR 5 XC1000000 49QW LDCT 7 #200 4==G LDN 1 6 4=Q6 LDX 2 XP2 4?9Q MODE 1 4?PB XLB CBD 6 0(2) 4#92 BCHX 2 £ 4#NL BCT 1 XLB 4*8= CALL 5 18?+2]+20] 4*MW LDX 5 18?+1]+62 4B7G LDN 4 XINF 4BM6 MOVE 4 30 4C6Q CALL 3 18?+2]+19] 4CLB LDX 0 XLNK 4D62 EXIT 0 0 4DKL #JUM XNTRY 4F5= #FRE XINF,XLEN,XTOT,XLNK,XC10000,XP1,XP2 4FJW #FRE XC1000000,XRUN,XNTRY,XLA,XLB 4G4G #DEF 3?=19?+0] 4GJ6 [ 4H3Q [ MEND BRADDATA 4HHB [ 4J32 #TRA K98BRADDATA 4JGL +K%A 4K2= #ALT K98BRADDATA=0? 4KFW #SKI (K97BRADDATA-(K98BRADDATA-1))� 4K^G ( 4LF6 ! TO MANY CALLS OF SCFCHAP LAST CHAPTER %A ! 4LYQ #EXI 4MDB ) 4MN8 ...) 4MNR ...#UNS K%A 4MPB ...#SKI 4MP^ ...( 4MQJ ...#DEF 19?+4=1? 4MR7 ...#LIS 4 4MRQ ...# **************************************** 4MS* ...# 4MSY ...# CHAPTER %A DOESN'T EXIST 4MTH ...# 4MW6 ...# **************************************** 4MWP ...#LIS 19?+4] 4MX# ...) 4MY2 ) 4NCL #STR %B 4NX= SCFCHAP %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P 4PBW #NOR