MAX_VKEYS 11

LOAD_TEX gui/touch.png
SET_CANV_TEX VKEY 0 32 96 32 32
SET_CANV_TEX VKEY 1 0 0 32 32
SET_CANV_TEX VKEY 2 32 0 32 32
SET_CANV_TEX VKEY 3 64 0 32 32
SET_CANV_TEX VKEY 4 0 32 32 32
SET_CANV_TEX VKEY 5 32 32 32 32
SET_CANV_TEX VKEY 6 64 32 32 32
SET_CANV_TEX VKEY 7 0 64 32 32
SET_CANV_TEX VKEY 8 32 64 32 32
SET_CANV_TEX VKEY 9 64 64 32 32
SET_CANV_TEX VKEY 10 0 96 32 32
SET_CANV_TEX VKEY 11 64 96 32 32

RESET_TEX

;SET_VKEY [id] [keycode] [x] [y]
STACK 2

;NUM 0
;y:=getHeight-32
PUSH $SCREEN_H
PUSH 32
SUB
;x:=getWidth-64
PUSH $SCREEN_W
PUSH 64
SUB
SET_VKEY 0 48 POP POP

;NUM 1
PUSH $SCREEN_H
PUSH 96
SUB
PUSH $SCREEN_W
PUSH 32
SUB
SET_VKEY 1 49 POP POP

;NUM 2
PUSH $SCREEN_H
PUSH 96
SUB
SET_VKEY 2 50 32 POP

;NUM 3
PUSH $SCREEN_H
PUSH 96
SUB
PUSH $SCREEN_W
PUSH 64
SUB
SET_VKEY 3 51 POP POP

;NUM 4
PUSH $SCREEN_H
PUSH 64
SUB
SET_VKEY 4 52 0 POP

;NUM 5
PUSH $SCREEN_H
PUSH 96
SUB
PUSH $SCREEN_W
PUSH 96
SUB
SET_VKEY 5 53 POP POP

;NUM 6
PUSH $SCREEN_H
PUSH 64
SUB
SET_VKEY 6 54 64 POP

;NUM 7
PUSH $SCREEN_H
PUSH 32
SUB
PUSH $SCREEN_W
PUSH 32
SUB
SET_VKEY 7 55 POP POP

;NUM 8
PUSH $SCREEN_H
PUSH 32
SUB
SET_VKEY 8 56 32 POP

;NUM 9
PUSH $SCREEN_H
PUSH 32
SUB
PUSH $SCREEN_W
PUSH 96
SUB
SET_VKEY 9 57 POP POP

;NUM *
SET_VKEY 10 42 0 0

;NUM #
PUSH $SCREEN_W
PUSH 32
SUB
SET_VKEY 11 35 POP 0

STACK -1