zMOT.-DREH< DREHEN EINES MOTIVS UM JEWEILS 90 GRADZ 3000: M1$(5,1): A$(1)pBILDSCHIRMAUFBAU0,31,0,39:7,0:: 5);"LIES GRUNDMOTIV VON KASSETTE EIN !"#: 5);"RECORDER STARTEN,DANN "("";IN$:"MOTIV";M1$-:: 5);"RECORDER STOPPEN!"H2:: 5); 23;"MOTIV WIRD GEDREHT!"Y7 BERECHNUNG< (M1$(1,0))0 : "KEIN MOTIV VORHANDEN":A (M1$(1,1))222 :"DREHUNG NICHT MOEGLICH":F (M1$(1,1))0 K0: K1K MO24PA$(0)"":A$(1)""U J0 K+Z I1 (M1$(1,J))B_W$(M1$(1,J),I,1)gd W$"R" A$(J)A$(J)"R":125 i W$"S" A$(J)A$(J)"S":125nW(W$):WW(MO22)s W0 WW8xA$(J)A$(J)((W),1)}I,JM1$(MO,0)"":M1$(MO,1)""  MO2 MO$"2"  MO3 MO$"1"5 MO4 MO$"8"PM1$(MO,0)"R"(31,MO$YFL0f J0 K{ I1 (A$(J)) FL0 (M1$(MO,0))255 FL1M1$(MO,FL)M1$(MO,FL)(A$(J),I,1) I,J MO: 5);"SPEICHERE DIE MOTIVE 1...4 AUF"$ 5);"KASSETTE!"S: 5);"RECODER AUF AUFNAHME,DANN"m"";IN$:"MOTIV";M1$syMOT