{{htmlmetatags>metatag-description:(ICL George 3 and George 4 source: COMPS RME7A)}}
====== COMPS RME7A ======
(George Source)
**Macros used:** [[george:macro:BITDEFS|BITDEFS]]
22FL #
22^= # BOBULE BEANBAG ROOM D10
23DW #
23YG #OPT BRILLO=0
24D6 #
24K# ...#OPT BSOKAY=1
24QG ...#OPT BSMK2=0
24XQ #OPT JSKI10=G4
257J #ALT JSKI10=G4
25?F #DEF JPABSA=0 [ALT BS ALLOCN ALGORITHM SKIP
25CB #OPT A1B=16
25X2 #OPT AGONY=1
26BL #OPT AGONY7=1 [MK7 LOADER/ALLOCATOR CHANGES
26W= #OPT GSQUE=1
27*W #OPT ENTWINE=0 [TWINNING
27TG #OPT CARTON=1
28*6 #OPT HELP=0
28SQ #OPT HIGHSPEED=1
29#B #OPT ALL=0
29S2 #DEF ANEWDUMP=1
2=?L #OPT ALINKSTACK=1
2=R= #OPT JOURNAL=0
2?=W #OPT BDMK7=0
2?QG #OPT K6DRUM=200
2#=6 #OPT EXCHCART=0
2#PQ #DEF BDRUM=APJOBNO+ATTMAX+1
2*P2 #DEF CPERFCHAP=1
2B8L #DEF BTHREE=3
2BN= #DEF AQMODE=A1
2C7W #DEF ASHEET=AQMODE+1
2CMG #DEF ACORSZ=ASHEET+1
2D76 #DEF AWRDNUM=ACORSZ+1
2DLQ #DEF BSHEET=AWRDNUM+1
2F6B #DEF BCORSZ=BSHEET+1
2FL2 #DEF BWRDNUM=BCORSZ+1
2G5L #DEF ASTIME=BWRDNUM+1
2GK= #DEF ATOTIME=ASTIME+1
2H4W #DEF AOBJLF=ATOTIME+1
2HJG #DEF AOBJST=AOBJLF+1
2J46 #OPT BSTATS=0
2JHQ [
2K3B #SKI BSOPT<1$1
2KH2 #INC TRANFAIL
2L2L #SKI BSOPT
2LG= #INC TRANFAIL1
2MFG #INC GETBAX30
2M^6 #INC BSALFAIL
2NDQ #SKI CAMK7
2NYB #INC COREALLF
2PD2 #SKI CAMK7>1-1
2PXL #INC COREALL37
2QC= #SKI CAMK7<2-2
2QWW #INC COREALL36
2RBG #INC BSQ60
2RW6 #INC BSTS65
2S*Q #INC LOADERI75
2STB #SKI G3
2T*2 #INC LOADERII75
2TSL #SKI G4
2W#= #INC LOADERIJ75
2WRW #
2X?G #INC LOADERMT75 [N.I. MT ALLOCATOR/LOADER
2XR6 #INC LOADERGO75
2Y=Q #INC LOADERDB75
2YQB #INC LOADERDA75 [
2^=2 #INC LOADERDR75 [ CODING.
2^PL #INC LOADERBU75
329= #INC LENDMT
32NW #OPT K0LOADERMT=0
338G #OPT K6LOADERMT=100
33N6 #OPT APDL=0 [LISTING OF DUMP MACRO (NI)
347Q #
34MB #INC SETLIST70
3572 #INC DATUM70
35LL #INC DRUM70
366= #DEF GETPERMK7=1
36KW #OPT K0DRUM=K0ALLGEO
375G #INC MOVCART70
37K6 [
384Q #OPT K6COMMAND=0
38JB #OPT K6EMS=0
3942 #OPT K6FILESTORE=K6ALLGEO
39HL #OPT K6GREATGEO=0
3=3= #OPT K6INGEO=0
3=GW #OPT K6KERNEL=0
3?2G #OPT K0KERNEL=0
3?G6 #OPT K6OBJPROG=0
3?^Q #OPT K6PERIS=0
3#FB #OPT K6TRACE=K6KERNEL>K6ALLGEO
3#^2 [
3*DL #OPT GSBS=512
3*Y= #OPT GSBSLOG=9
3BCW #DEF BLN=4 [NO. OF CHUNKS (BLOCKLETS) IN A BLOCK
3BXG #DEF BLS=2 [LOG THE NO. OF CHUNKS TO THE BASE 2
3CC6 #DEF GSBS4=GSBS/BLN [NO. OF WORDS IN A CHUNK
3CWQ #DEF FOURM=-4 [CONSTANT OF MINUS FOUR
3DBB #DEF APTYPE=10 [PARAM TO SEARCH ON TYPE&UNIT NUM
3DW2 #DEF APGEOG=11 [PARAM TO SEARCH ON GEOG NUM IN GETPE
3F*L #DEF APSER=12 [PARAM TO SEARCH ON SERIAL NUM.
3FT= # PLIST SETTINGS -- P.WARNER
3G#W #OPT FIRSTREC=1 [DISTANCE FROM A1 TO START OF 1ST REC
3GSG #OPT FIRLEN=5 [LENGTH OF MENDED FS DESCR RECORD
3H#6 #OPT APERPROP=7 [START OF PROPERTY SYSTEM AREA
3HRQ #SKI G3MARK>5-5
3J?B #OPT ALPSETUP=APERPROP+ATTMAX [WHICH IS 'ATTMAX' LONG IN MARKS>5
3JR2 #OPT ALPSETUP=APERPROP+2 [OR 2 IN MK5. ALPSETUP=LISTFILE WORD
3K=L #OPT AEXECAREA=ALPSETUP+1 [START OF ASSISTED REPEATS AREA
3KQ= #OPT APERLEN=AEXECAREA+4 [WHICH IS 4 WORDS LONG
3L9W #DEF ALINK=AWORK4-ACC3+1
3LPG #DEF ATRAN=BACKCHAN+1
3M96 #DEF AQUE=ATRAN-ALOGLEN+7
3MNQ #
3N8B # IDENTIFIERS FOR THE BSTB/BSLIST BLOCK
3NN2 #
3P7L #DEF BSPOINT=A1 [POINTER TO NEXT FREE BLOCK NUMBER
3PM= #DEF BSFREE=BSPOINT+1 [NO. OF FREE BLOCKS ON THIS RES
3Q6W #DEF BSJAML=BSFREE+1 [LEVEL AT WHICH B.S.UNJAMMER STARTED
3QLG #DEF BSTOT=BSJAML+1 [TOTAL NUMBER OF BLOCKS ON THIS RESID
3R66 #DEF BSLETH=BSTOT+1 [LETHARGY COEFFICIENT
3RKQ #DEF BSCOPY=BSLETH+1 [NO. OF BLOCKS BEING COPIED TO THIS R
3S5B #DEF BSTHRESH=BSCOPY+1 [THRESHOLD LIMIT USED BY B.S.UNJAMMER
3SCR ...#DEF BSRESERVE=BSTHRESH+1 [SIZE OF RESERVE TANK
3SQ8 ...#DEF BSRLEN=BSRESERVE+1 [START OF LIST OF FREE BLOCK NUMBERS
3T4L #
3T7Q ... BITDEFS BSLETH,1,BSMARK [DO NOT ALLOCATE ENHANCEMENT -NOT USE
3T=W ...# DOCUMENTATION ONLY
3TB2 ...#OPT ANOTALLOC=1 [SKIP IDENTIFIER
3TF6 ...#
3TJ= #OPT BSCHLEN=GSBS/BLN+BSRLEN
3W3W #OPT BSQLENGTH=5
3WHG #OPT BSQTHRESHLD=10
3X36 #OPT CGINPROG=8
3X=Y ...#DEF BKARTWT=16 [WAIT FOR KARTCONT BIT
3XGQ #DEF BWELL=3
3Y2B #DEF BFB=#400
3YG2 #DEF BOFB=2 [ONLINE FAIL BIT
3Y^L #DEF BNOFB=1 [NON ONLINE FAIL BIT
3^F= #DEF BSFAIL=ACOMMUNE6
3^YW #DEF BOBJ=1
42DG #DEF BONL=2
42Y6 #DEF BSET=4
43CQ #DEF BUSE=8
43XB #DEF FREE=16
44C2 #DEF FAIL=32
44WL #DEF ASWAP=#200
45B= #DEF BPAGE=#4000
45TW #DEF BLFAIL=#2000
46*G #DEF BONLFAIL=BONL+FAIL
46T6 #DEF BONLSWAP=BONL+ASWAP
47#Q #DEF ALENLFN=ATRAN+1
47SB #DEF BLKNO=ATRAN+2
48#2 #DEF CORADD=ATRAN+3
48RL #DEF APCA=ATRAN+4
49?= #DEF BSMODE=ATRAN+5
49QW #DEF ABSA=ATRAN+6
4==G #DEF ADBLKNO=ATRAN+7
4=Q6 #OPT KILL=0
4?9Q #DEF BOBJSET=BSET+BOBJ
4?PB #DEF FLAW=64
4#92 #DEF BSCFL=#400
4#NL #DEF BSPFL=#200
4*8= ...#DEF AFAILLEN=7
4*MW #DEF AFAILREC=2
4B7G #DEF AFAILEX=4*AFAILREC
4BM6 #DEF AFRAILLEN=9
4C6Q #DEF AFRAILREC=2
4CLB #DEF AFRAILEX=4*AFRAILREC
4D62 #DEF BONLINE=BONL
4DKL #DEF ASWAPFLA=ASWAP+FLAW
4F5= #DEF ASWAPBON=ASWAP+BONL
4FJW #DEF FABUFR=FAIL+BUSE+FREE
4G4G #DEF FAILBIT=#1000
4GJ6 #DEF BSETBUSE=BSET+BUSE
4H3Q #DEF BOBJBUSE=BOBJ+BUSE
4HHB #DEF FAILFREE=FAIL+FREE
4J32 #DEF FREEBOBJ=BOBJ+FREE
4JGL #DEF BSETFREE=BSET+FREE
4K2= #DEF FAILFLAW=FAIL+FLAW
4KFW #DEF FAILSWAP=FAIL+ASWAP
4KJ5 ...#OPT K0BRADDATA=K0ALLGEO
4KL# ...#OPT K0BRADSPLT=K0ALLGEO
4KNH ...#OPT K0BRADEMUL=K0ALLGEO
4KQQ ...#OPT K6BRADDATA=K6ALLGEO
4KS^ ...#OPT K6BRADSPLT=K6ALLGEO
4KX8 ...#OPT K6BRADEMUL=K6ALLGEO
4K^G #OPT K0BSTS=K0KERNEL>K0ALLGEO
4LF6 #OPT K0BSQ=K0BSTS
4LYQ #OPT K6BSTS=K6KERNEL>K6ALLGEO
4MDB #OPT K6BSQ=K6BSTS
4MY2 #OPT K6SETLIST=K6ALLGEO
4NCL #OPT K0SETLIST=K0ALLGEO
4PBW #OPT K6TRANFAIL=K6BSTS>K6ALLGEO
4PLN ...#OPT K6DRUMALL=K6KERNEL>K6ALLGEO
4PWG #OPT K0TRANFAIL=K0ALLGEO
4QB6 #OPT K6BSALFAIL=K6ALLGEO
4QTQ #OPT K0BSALFAIL=K0ALLGEO
4R*B #OPT K0DATUM=K0KERNEL>K0ALLGEO
4RT2 #SKI BSOPT
4S#L #DEF AWAY=BA1
^^^^ ...27504263002300000000