Advertisement
rilo

Simons'Basic #2 to KickC

Jan 7th, 2020
455
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 0.56 KB | None | 0 0
  1. import "c64"
  2. import "bitmap2"
  3.  
  4. const byte* SCREEN = $400;
  5. const byte* BITMAP = $2000;
  6.  
  7. void main() {
  8.     *BORDERCOL = LIGHT_GREY;
  9.     *D011 = VIC_BMM|VIC_DEN|VIC_RSEL|3;
  10.     vicSelectGfxBank(SCREEN);
  11.     *D016 = VIC_CSEL;
  12.     *D018 = toD018(SCREEN, BITMAP);
  13.  
  14.     bitmap_init(BITMAP,SCREEN);
  15.     bitmap_clear(LIGHT_GREY,BLACK);
  16.     for (word j = 0; j <= 200; j +=8) {
  17.         bitmap_line(260,199,60,199-j);
  18.         bitmap_line(60,0,j+60,199);
  19.         bitmap_line(60,0,260,199-j);
  20.         bitmap_line(260,199,j+60,0);
  21.     }
  22.     do {} while (true);
  23. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement