dim ptr = a mainloop COLUBK=$00 COLUPF=$08 pfpixel 20 5 on pfpixel 21 5 on pfpixel 22 5 on pfpixel golemShape[0] 7 on pfpixel golemShape[1] 7 on pfpixel golemShape[2] 7 on ptr = 0 pfpixel golemShape[ptr] 9 on ptr = ptr + 1 pfpixel golemShape[ptr] 9 on ptr = ptr + 1 pfpixel golemShape[ptr] 9 on drawscreen goto mainloop data golemShape 20, 21, 22 end