100 REM PATCH FUER STARTEXTER 64 AB 5.X
110 REM (W) 11/89 MICHAEL MOELLER
120 :
130 POKE55,0:POKE56,12:REM BASICENDE SETZEN
140 REM LOAD FILE O4 UND O3
150 IFA=0THENA=1:LOAD"O4",8,1
160 IFA=1THENL1=PEEK(174):H1=PEEK(175):A=2:LOAD"O3",8,1
170 L2=PEEK(174):H2=PEEK(175)
180 POKE51190,54:REM FILE O3
190 POKE5811,54:REM FILE O4
200 POKE8331,54:POKE9962,54:POKE10492,54:POKE13688,54
210 POKE6768,64:POKE6769,23:REM GET UMLEITEN
220 I=0
230 READZ:IFZ<0THEN270
240 POKE5937+I,Z:I=I+1:GOTO230
250 :
260 REM SAVE FILES
270 OPEN15,8,15,"S:O4,O3":CLOSE15
280 SYS57812"O3",8
290 POKE193,0:POKE194,195:POKE780,193:POKE781,L2:POKE782,H2:SYS65496
300 SYS57812"O4",8
310 POKE193,45:POKE194,12:POKE780,193:POKE781,L1:POKE782,H1:SYS65496
320 :
330 DATA32,160,35,240,48,32,195,35,240,43,32,172,35,240,38,32,77,52,162,4,221
340 DATA83,23,240,5,202,16,248,170,96,189,88,23,96,16,128,130,132,143,148,137
350 DATA138,139,140,234,234,234,234,234,234,234,234,234,-1