(GIN Macro)
Defined in: MACS JIB
Used in: LISTNIP865, SPEAK8
#5NS ...[??? PROPNO SECT COMM FGN 25 DOC #5PB # #692 # FIND THE PROPERTY NUMBER OF A GIVEN PROPERTY NAME #6NL # #78= #MAC PROPNO #78W ...#UNS HWATIDY #79G ...( #7=6 ... LDN 0 %B #7=Q ... SMO FX2 #7?B ... STO 0 ACOMMUNE1 #7#2 ... DOWN WHATPROP,5 #7#3 ...#UNS ANIP #7#4 ...( #7#5 ...#STR %D #7#6 ...( #7#7 ...#ACC %D #7#8 ...( #7#9 ... LDX 0 ACOMMUNE2(2) #7#= ... STO 0 %D #7#? ...) #7## ...#ACC %D #7#* ...#SKI #7#B ... LDX %D ACOMMUNE2(2) #7#C ...) #7#D ...) #7#L ...#ACC %A #7*= ...( #7*W ... LDX 0 ACOMMUNE1(2) #7BG ... STO 0 %A #7C6 ...#STR %C #7CQ ... BZE 0 %C #7DB ...) #7F2 ...#ACC %A #7FL ...#SKI #7G= ...( #7GW ... LDX %A ACOMMUNE1(2) #7HG ...#STR %C #7J6 ... BZE %A %C #7JQ ...) #7KB ...) #7L2 ...#UNS HWATIDY #7LL ...#SKI #7M= ...( #7MW REWIND %B #87G MSTEP #8M6 STEP %B #96Q #STR %C #9LB BZE 3 %C #=62 MOK #=KL MHUNT 2,CPB,CUNI #?5= LDN 1 #7777 #?JW ANDX 1 ANUM(2) ##4G LDX 0 APARA(2) ##J6 ERX 0 APROPNAME(3) #*3Q BNZ 0 MSTEP #*HB SBN 1 5 #B32 BNG 1 MEND #BGL LDX 0 APARA+1(2) #C2= ERX 0 APROPNAME+1(3) #CFW BNZ 0 MSTEP #C^G SBN 1 4 #DF6 BNG 1 MEND #DYQ LDX 0 APARA+2(2) #FDB ERX 0 APROPNAME+2(3) #FY2 BNZ 0 MSTEP #GCL MEND #GX= LDXC 1 APROPGROUP(3) #HBW LDN 1 0 #HWG SRC 1 1 #JB6 LDX 0 APROPNO(3) #JTQ ANDX 0 BITS22LS #K*B ADX 0 1 #KT2 #SKI %A #L#L STO 0 %A #LS= #SKI %A-1 #M?W LDX 1 FX1 #MRG #SKI %A-2 #N?6 LDX 2 FX2 #NGY ...) #NQQ #NOR