10 ! UFD.BAS 20 ; '** UFD **' 30 Par$='UFD ABS'+CHR$(14,255,205,27,96,208,33,0,0,201) 40 ! 255 {ndras till 29 om ABS-filen anropas fr}n RAM: 50 Adr=VARPTR(Par$) 60 Ec=CALL(Adr+11,Adr) 70 IF Ec=0 THEN ; 'Fel vid laddning av UFD.ABS' : GOTO 110 80 POKE 64850,32 90 POKE 49328,13 100 Z=CALL(Ec-16) 110 END