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