PRESETRP
(GIN Macro)
Defined in: MACROS GEM
Used in:
- PRESETRP.mac.txt
5XFL ...[ 5X^= ...[ 5YDW ...#MAC PRESETRP 5YYG ...#STR %A 5^D6 ...#SKI 5^XQ ...#EXI [IF NO PARAMS, DO NOTHING 62CB ...#DEF 20?=0 62X2 ...#DEF 21?=#00075777 [ALL PERMITTED CATEGORIES 63BL ...#DEF 22?=#21200000 [READY,BREAKIN,FORCETYP 63W= ...#STR %A,NONE 64*W ...#SKI 64TG ...( 65*6 ...[%A = NONE 65SQ ...#STR %B 66#B ...( 66S2 ... SETRPERR [ERROR IF ANY OTHER PARAMS 67?L ...#EXI 67R= ...) 68=W ...#ALT AMXMSKPR=22? [MIN ALLOWED 68QG ... SETRPMEN 69=6 ...#EXI 69PQ ...) 6=9B ...#STR %A,ALL 6=P2 ...#SKI 6?8L ...( 6?N= ...[%A = ALL 6#7W ...#STR %B 6#MG ...( 6*76 ... SETRPERR [ERROR IF ANY OTHER PARAMS 6*LQ ...#EXI 6B6B ...) 6BL2 ...#ALT AMXMSKPR=21?^22? [MAX ALLOWED 6C5L ... SETRPMEN 6CK= ...#EXI 6D4W ...) 6DJG ...#STR %A,FULL 6F46 ...#SKI 6FHQ ...( 6G3B ...[%A = FULL 6GH2 ...#STR %B 6H2L ...( 6HG= ... SETRPERR [ERROR IF ANY OTHER PARAMS 6H^W ...#EXI 6JFG ...) 6J^6 ...#ALT AMXMSKPR=+FULLBITS&21?^22? 6KDQ ... SETRPMEN 6KYB ...#EXI 6LD2 ...) 6LXL ...#STR AB,%A 6MC= ...#SKI 6MWW ...( 6NBG ...[%A = AB 6NW6 ...#STR %B 6P*Q ...#SKI 6PTB ...( 6Q*2 ... SETRPERR [ERROR IF NO OTHER PARAMS 6QSL ...#EXI 6R#= ...) 6RRW ...[SET 20?=MASK OF EXCEPTED CATEGORIES 6S?G ... SETRPMSK %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q 6SR6 ...#ALT AMXMSKPR=+ALLBITS$20?&21?^22? 6T=Q ... SETRPMEN 6TQB ...#EXI 6W=2 ...) 6WPL ...#STR ALLBUT,%A 6X9= ...#SKI 6XNW ...( 6Y8G ...[%A = ALLBUT 6YN6 ...#STR %B 6^7Q ...#SKI 6^MB ...( 7272 ... SETRPERR [ERROR IF NO OTHER PARAMS 72LL ...#EXI 736= ...) 73KW ...[SET 20?=MASK OF EXCEPTED CATEGORIES 745G ... SETRPMSK %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q 74K6 ...#ALT AMXMSKPR=+ALLBITS$20?&21?^22? 754Q ... SETRPMEN 75JB ...#EXI 7642 ...) 76HL ...#STR FB,%A 773= ...#SKI 77GW ...( 782G ...[%A = FB 78G6 ...#STR %B 78^Q ...#SKI 79FB ...( 79^2 ... SETRPERR [ERROR IF NO OTHER PARAMS 7=DL ...#EXI 7=Y= ...) 7?CW ...[SET MASK OF EXCEPTED CATEGORIES 7?XG ... SETRPMSK %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q 7#C6 ...#ALT AMXMSKPR=+FULLBITS$20?&21?^22? 7#WQ ... SETRPMEN 7*BB ...#EXI 7*W2 ...) 7B*L ...#STR FULLBUT,%A 7BT= ...#SKI 7C#W ...( 7CSG ...[%A = FULLBUT 7D#6 ...#STR %B 7DRQ ...#SKI 7F?B ...( 7FR2 ... SETRPERR [ERROR IF NO OTHER PARAMS 7G=L ...#EXI 7GQ= ...) 7H9W ...[SET MASK OF EXCEPTED CATEGORIES 7HPG ... SETRPMSK %B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q 7J96 ...#ALT AMXMSKPR=+FULLBITS$20?&21?^22? 7JNQ ... SETRPMEN 7K8B ...#EXI 7KN2 ...) 7L7L ...[REMAINING CASE IS ONE OR MORE MON FILE CATEGORIES 7LM= ... SETRPMSK %A,%B,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P, 7M6W ...#ALT AMXMSKPR=20?&21?^22? 7MLG ... SETRPMEN 7N66 ...#EXI 7NKQ ...#NOR