'load sk8er frames skate
img_sk8erStrip = IU.LoadscaledBitmap(File.DirAssets, "skate.png",-1,-1,True)
For x = 0 To 19
img_sk8er(x) = IU.Crop(img_sk8erStrip,x*50,0,50,70) 'crop png file to sprites
img_sk8er(x) = IU.CreateScaledBitmap(img_sk8er(x),12%x,23%y,True)'scale sprites images
Next