atm959

Problem on _PUTIMAGE

Oct 11th, 2016
245
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.45 KB | None | 0 0
  1. windowDisplay& = _NEWIMAGE(800, 600, 32)
  2. SCREEN windowDisplay&
  3. DIM level%(64, 64)
  4. DIM tiles&(127)
  5.  
  6. CHDIR "Platformer/Tiles"
  7. tiles&(1) = _LOADIMAGE("grass.png")
  8.  
  9. FOR i% = 0 TO 10
  10. level%(i%, i%) = 1
  11. NEXT
  12.  
  13. WHILE 1
  14. CLS
  15. PRINT "Test"
  16. FOR x% = 0 TO 63
  17. FOR y% = 0 TO 63
  18. _PUTIMAGE (x% * 32, y% * 32)-((x% * 32) + 32, (y% * 32) + 32), tiles&(level%(x%, y%))
  19. NEXT
  20. NEXT
  21. _DISPLAY
  22. _LIMIT 60
  23. WEND
Advertisement
Add Comment
Please, Sign In to add comment