- Canvis en tools/spritedit.lua, crec

tools/spritedit.lua

@@ -2,26 +2,43 @@ function init()
     ink_color = 15
     paper_color = 0
     setchar(0,0xff,0x81,0x81,0x81,0x81,0x81,0x81,0xff)
-    sprite={0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x81,0x81,0x81,0x81,0x81,0x81,0x81,0x81,0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03}
+    sprite={0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+            0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+            0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+            0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}
+            --0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,
+            --0x81,0x81,0x81,0x81,0x81,0x81,0x81,0x81,
+            --0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,
+            --0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03}
 end
 
 function update()
+    -- Borra pantalla
     color(15,1)
     cls()
+
+    -- Pinta sprite en gran a pantalla
     color(ink_color,paper_color)
     drawbigspr(sprite,1,1)
+
+    -- Pinta el sprite en els caracters A, B, C i D
     drawspr(sprite,65)
+
+    -- Pinta els caracters AB CD a pantalla
     print("AB",18,1) print("CD",18,2)
 
+    -- Pinta la paleta
     for i=0,15 do
         color(0,i)
         poke(721+i,0) poke(1921+i,i<<4)
         poke(761+i,0) poke(1961+i,i<<4)
     end
 
+    -- Pinta el borde roig a les entrades en la paleta seleccionades
     poke(1921+ink_color, peek(1921+ink_color)+4)
     poke(1961+paper_color, peek(1961+paper_color)+4)
-    
+
+    -- Gestió dels clicks en la paleta
     if mousebutton(1) and mousex()>=1 and mousey()>=18 and mousex()<=16 and mousey()<=19 then
         if mousey()==18 then
             ink_color = mousex()-1
@@ -30,7 +47,15 @@ function update()
         end
     end
 
+    -- Gestió dels clicks sobre l'sprite
     handlesprmouse()
+
+    -- Si pulsem 'C', borrar el sprite
+    if btnp(KEY_C) then
+        for i=1,32 do
+            sprite[i]=0;
+        end
+    end
 end
 
 mousepressed = false