SEARCH MONSYM SEARCH MACSYM T1=1 T2=2 T3=3 START: MOVEI T1,^D10000 DISMS MOVEI T1,6 MOVEI T2,ARG NODE MOVE T3,ARG SKIPN T3 JRST [TMSG <?NO LOOPBACK PORT > HALTF] TLNE T3,400000 HALTF TMSG <?LOOPBACK PORT NOT RUNNING > HALTF ARG: BLOCK 1 END START