MODSUCHASM ORG 6000H ; ; 23.3.1990 by JC-SOFT ; ************** ; >MSUCH< ; ************** ; ; PE: ; Reg. A --> Strukturbyte ; PA: ; Reg. L --> Steckplatz ; Fl. CY ==> 1 wenn nicht vorh. ; ; PV1 EQU 0F003H MODUL EQU 26H ; MSUCH EX AF LD L,4 MSUCHW LD A,1 CALL PV1 DEFB MODUL EX AF CP H RET Z MSUCHF EX AF LD A,4 ADD L LD L,A JR NZ,MSUCHW SCF RET ; MSUCH dient dem Suchen von ; Modulen im gesamten System. ; Dabei wird grunds{tzlich das ; erste Modul mit dem in 'A' ; stehenden Strukturbyte ge- ; funden. Soll weitergesucht ; werden, so ist mit dem ; Strukturbyte in 'A' und dem ; letzten Modulschacht in 'L' ; auf der Marke MSUCH wieder ; einzuspringen. ; ; E n d e ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ