DEFFILL 1,2,24 ! Bild aufbauen PBOX 0,0,639,399 TEXT 30,32,"LUPE" ALERT 1," | Vergr”žern | ",1,"START",button| REPEAT y%=15 FOR x%=1 TO 80 ' GOSUB gfa_h_lupe__(x%,y%,x%+25,y%+25,160,50,XBIOS(2),8) ' NEXT x% ALERT 1," | Nochmal | ",1," Ja |Nein",button| UNTIL button|=2