home *** CD-ROM | disk | FTP | other *** search
- 1 rem berechnung der tabellen fuer fastline ($c300-$c690)
- 2 l=49920:h=l+256
- 3 fori=0to255:a=i+1-(((i+1)and7)=0)*312:pokel+i,aand255:pokeh+i,int(a/256):next
- 4 l=h+256:h=l+200
- 5 fori=0to199:a=8192+(iand7)+int(i/8)*320:pokel+i,aand255:pokeh+i,int(a/256):next
-