; P< ASCII BYTE 0 EVEN IF NDF,, =Dep DEFAULT VMAJOR,1 DEFAULT VMINOR,0 DEFAULT VSUB,0 DEFAULT VEDIT,0 DEFAULT VWHO,0 WORD LWORD ++++ WORD WORD } SAVE D1,D2 MOV ,D2 SWAP D2 ROLW D2,#8. CLR D1 MOVB D2,D1 DCVT 0,<<&^O36>> IF NE, &^O2, TYPE <.> IF NE, &^O4 MOVB #'.,D1 FILOTB @A2 ENDC IF NE, &^O10, MOVB #'.,(A2)+ ROLW D2,#8. MOVB D2,D1 AND #^O17,D1 DCVT 0,<<&^O16>> MOV ,D1 ROLW D1,#8. ROLB D1,#4. AND #^O17,D1 BEQ 10$$ ADD #'A-1,D1 IF NE, &^O2, TTY IF NE, &^O4, FILOTB @A2 IF NE, &^O10, MOVB D1,(A2)+10$$: MOV ,D2 AND #^O7777,D2 BEQ 20$$ IF NE, &^O2, TYPE <(> IF NE, &^O4 MOVB #'(,D1 FILOTB @A2 ENDC IF NE, &^O10, MOVB #'(,(A2)+ MOV D2,D1 DCVT 0,<<&^O16>> IF NE, &^O2, TYPE <)> IF NE, &^O4 MOVB #'),D1 FILOTB @A2 ENDC IF NE, &^O10, MOVB #'),(A2)+20$$: MOV ,D2 SWAP D2 ROLB D2,#4. AND #^O17,D2 BEQ 30$$ IF NE, &^O2, TYPE <-> IF NE, &^O4 MOVB #'-,D1 FILOTB @A2 ENDC IF NE, &^O10, MOVB #'-,(A2)+ MOV D2,D1 DCVT 0,<<&^O56>> IF NE, &^O40, BR 40$$30$$: IF NE, &^O40 IF NE, &^O2, TYPE < > IF NE, &^O4 MOVB #' ,D1 FILOTB @A2 ENDC IF NE, &^O10, MOVB #' ,(A2)+ ENDC40$$: REST D1,D2^ =$$OFLC IF B, , $$OFLC=$$OFLC+1 IF NB, , $$OFLC=$$OFLC+^y: IF B, , $$OFLC=0 IF NB, , $$OFLC=^Bx =$$OFLC # k 2 7M < g' 5 wcMY_qdBxjyhF t |(@:;M@N`w6 F s $  g'5::S(N``Vdf wF _MSxt g'>_M T[YewBx" 3jLNkQR`;dz͌kKkKvlKlK lKlKYlKlK6lKlK%lK%lKg'lK,lK,lK2lK:TlKBxlK>zlKzrlKu~lK,lKnKRfLRg'LRT[LRfLRfLRgLRBxLR4LRZ{TS{TYe[eO[eR`[eMq[e]q\e\eg'\ef\eBx\eZggWggggigfgsgsgDgŒy#y9qzzAz;Mz!jZ_q kuTy @c's