5 WSET 0:CROFF 
10 COL 0,55,$56:CLS 
15 MOUSE 1,0
18 STILE 15
20 WIN c(1,255,55,88,0,0,39,29,3,0,"Demonstration von Backup und Restore")
30 FONT "Was koennte man mit diesen Funktionen",55,0,0,0,4
40 FONT "so anstellen? Na zum Beispiel dieses",55,0,0,0,5
50 FONT "Fenster darstellen und im Vordergrund",55,0,0,0,6
60 FONT "ein zweites Fenster oeffnen,um zum Bsp.",55,0,0,0,7
70 FONT "einen Hinweistext anzuzeigen",55,0,0,0,8
80 FONT "Das ist noch nicht sehr spektakulaer, ",55,0,0,0,12
90 FONT "aber wenn das Fenster geloescht wird,",55,0,0,0,13
100 FONT "stellen wir den Hintergrund wieder her!",55,0,0,0,14
110 FONT "Druecke bitte eine Taste",55,9,0,8,17
150 a=INKEY 
152 b=MB 0
155 IF a=0 AND b=0 THEN GOTO 150
160 BACKUP 5,6,39,28,$30000
180 WIN c(2,0,88,99,5,6,38,27,4,1,"Infofenster")
185 COL 0,88,0
196 WSET 2
200 CLS :PRINT "Nun wollen wir das Fenster"
210 PRINT "wieder loeschen."
211 PRINT " ":PRINT " "
215 PRINT "   Druecke bitte eine Taste"
220 a=INKEY 
225 b=WIN 
227 IF a=0 AND b<>22THEN GOTO 220
230 RECOVER 5,6,39,28,$30000
240 WSET 1
250 COL 0,55,$56
260 CRON 
280 END 

