DIM buffer%(20479)                                  ! Buffer mit 81920 Bytes
'
GOSUB gfa_poppal__
palette$=lib_rv__$
GOSUB gfa_pload__("\EXAMPLES\STUFF\DEMO.PI1",XBIOS(2),0)
'
GOSUB gfa_l_skonv__(XBIOS(2)+168*160,V:buffer%(0))
'
' BSAVE "FONT2.FTL",V:buffer%(0),81920              ! Font speichern
'
txt$="Das Demo kann durch einen Tastendruck abgebrochen werden !"
'
GOSUB gfa_l_hscrol__(XBIOS(2)+10*160,V:buffer%(0),txt$,0)
'
~XBIOS(6,L:V:palette$)