$*$ Definition der Record-Struktur eines Listenelements string IS 0 next IS 8 LOC Data_Segment GREG @ No BYTE " no ",0 Theory BYTE " theory ",0 Without BYTE " without ",0 Practice BYTE " practice ",0 1H OCTA Without OCTA 3F First OCTA No OCTA 2F 2H OCTA Theory OCTA 1B 3H OCTA Practice OCTA 0 LOC #100 word IS $1 base IS $2 Basis Register offset IS $3 Offset register Main LDA base,First Adresse des ersten Records 1H LDO $255,base,string TRAP 0,Fputs,StdOut LDO base,base,next BNZ base,1B TRAP 0,Halt,0