CLOSEST
(GIN Macro)
Defined in: MACROS EWDAS
Used in: CLOSDEL867, CONTEND867, EXINONE867, EXINTO867, EXINTWO866, EXOPEN867, FLAWMAP866, SCEX866, SCEXEND867, WRITEFIP867
- CLOSEST.mac.txt
?MJ= # ?N3W [??? CLOSEST ?NHG # ******* ?P36 #MAC CLOSEST ?PGQ # ?Q2B STO 1 EWK+1(3) ?QG2 STO 2 EWK+2(3) ?Q^L LDX 0 ETMARK(3) ?RF= BNZ 0 MCLOSEST1 ?RYW MCLOSEST2 ?SDG LDX 1 EBUF(3) ?SY6 BNZ 1 MCLOSEST3 ?TCQ LDX 1 EWK+1(3) ?TXB LDX 2 EWK+2(3) ?WC2 BRN %A ?WWL MCLOSEST3 ?XB= LDX 0 A1(1) ?XTW STO 0 EBUF(3) ?Y*G FREECORE 1 ?YT6 BRN MCLOSEST2 ?^#Q MCLOSEST1 ?^SB DOWN TRANSFER,3 #2#2 #NOR