Portable Game Console
PoGa-4DGL Reference Manual
//SOUTH 1
//WEST 2
//EAST 3
//NORTH_MIRRORED 4
//SOUTH_MIRRORED 5
//WEST_MIRRORED 6
//EAST_MIRRORED 7
//repeat
xoffs := 20;
yoffs := 20;
for(n:=0;n<8;n++)
gfx_BlitSprite(1, 2, xoffs, yoffs, n); // display the cherry sprite in all 8
orientations using pallete 2
xoffs += 20;
if(n==3)
xoffs :=20;
yoffs += 20;
endif
next
xoffs := 20;
yoffs := 80;
for(n:=0;n<8;n++)
gfx_BlitSprite(2, 3, xoffs, yoffs, n); // display the ghost sprite in all 8
orientations using pallete 3
xoffs += 20;
if(n==3)
xoffs :=20;
yoffs += 20;
endif
next
repeat forever
endfunc
© 2011 4D Systems
www.4dsystems.com.au
Page 75 of 87