10 REM BANK0
15 :
20 SYS49158,1:REM RUN BANK 1
30 :
50 PRINT"[147]HIER IST BANK 0"
60 PRINT"";
70 X=X+1:PRINT"DURCHLAUF : "X
75 FORZ=1TO600:NEXT
80 SYS49155,1:REM BANK 1 EIN
90 GETA$:IFA$=""THEN GOTO 60
95 :
100 IFA$="1"THEN SYS49164,1:REM STOP BANK 1
110 IFA$="2"THEN SYS49164,2:REM STOP BANK 2
120 IFA$="3"THEN SYS49164,3:REM STOP BANK 3
130 IFA$="0"THEN STOP
140 IFA$<>"S"THEN GOTO 60
150 FORX=1TO3:SYS49164,X:NEXT:REM STOP BANK 1-3
160 END