SCREEN 13
CLS

'sprite offset
LET Xoff = 160
LET Yoff = 100

'colors
'normal white skin
LET skinD = 114
LET skinM = 65
LET skinL = 89

'blue hair
LET hairD = 199
LET hairM = 127
LET hairL = 54

'blue eyes
LET eyecol = 126

'natural mouth
LET mouthcol = 112


'draw head sprite
'PSET (0 + Xoff, 0 + Yoff),
'PSET (1 + Xoff, 0 + Yoff),
PSET (2 + Xoff, 0 + Yoff), hairD
PSET (3 + Xoff, 0 + Yoff), hairL
PSET (4 + Xoff, 0 + Yoff), hairL
PSET (5 + Xoff, 0 + Yoff), hairM
PSET (6 + Xoff, 0 + Yoff), hairL
PSET (7 + Xoff, 0 + Yoff), hairL
'PSET (8 + Xoff, 0 + Yoff),
'PSET (9 + Xoff, 0 + Yoff),

'PSET (0 + Xoff, 1 + Yoff),
PSET (1 + Xoff, 1 + Yoff), hairD
PSET (2 + Xoff, 1 + Yoff), hairD
PSET (3 + Xoff, 1 + Yoff), hairM
PSET (4 + Xoff, 1 + Yoff), hairM
PSET (5 + Xoff, 1 + Yoff), skinD
PSET (6 + Xoff, 1 + Yoff), hairD
PSET (7 + Xoff, 1 + Yoff), hairM
PSET (8 + Xoff, 1 + Yoff), hairL
'PSET (9 + Xoff, 1 + Yoff),

'PSET (0 + Xoff, 2 + Yoff),
PSET (1 + Xoff, 2 + Yoff), hairD
PSET (2 + Xoff, 2 + Yoff), hairD
PSET (3 + Xoff, 2 + Yoff), hairM
PSET (4 + Xoff, 2 + Yoff), skinM
PSET (5 + Xoff, 2 + Yoff), skinD
PSET (6 + Xoff, 2 + Yoff), skinD
PSET (7 + Xoff, 2 + Yoff), hairD
PSET (8 + Xoff, 2 + Yoff), hairM
'PSET (9 + Xoff, 2 + Yoff),

'PSET (0 + Xoff, 3 + Yoff),
PSET (1 + Xoff, 3 + Yoff), hairD
PSET (2 + Xoff, 3 + Yoff), skinD
PSET (3 + Xoff, 3 + Yoff), skinD
PSET (4 + Xoff, 3 + Yoff), skinL
PSET (5 + Xoff, 3 + Yoff), skinM
PSET (6 + Xoff, 3 + Yoff), skinD
PSET (7 + Xoff, 3 + Yoff), skinD
PSET (8 + Xoff, 3 + Yoff), hairD
'PSET (9 + Xoff, 3 + Yoff),

'PSET (0 + Xoff, 4 + Yoff),
PSET (1 + Xoff, 4 + Yoff), skinD
PSET (2 + Xoff, 4 + Yoff), skinM
PSET (3 + Xoff, 4 + Yoff), eyecol
PSET (4 + Xoff, 4 + Yoff), skinD
PSET (5 + Xoff, 4 + Yoff), skinL
PSET (6 + Xoff, 4 + Yoff), eyecol
PSET (7 + Xoff, 4 + Yoff), skinM
PSET (8 + Xoff, 4 + Yoff), skinM
'PSET (9 + Xoff, 4 + Yoff),

'PSET (0 + Xoff, 5 + Yoff),
PSET (1 + Xoff, 5 + Yoff), skinD
PSET (2 + Xoff, 5 + Yoff), skinM
PSET (3 + Xoff, 5 + Yoff), skinL
PSET (4 + Xoff, 5 + Yoff), skinM
PSET (5 + Xoff, 5 + Yoff), skinL
PSET (6 + Xoff, 5 + Yoff), skinL
PSET (7 + Xoff, 5 + Yoff), skinL
PSET (8 + Xoff, 5 + Yoff), skinM
'PSET (9 + Xoff, 5 + Yoff),

'PSET (0 + Xoff, 6 + Yoff),
PSET (1 + Xoff, 6 + Yoff), skinD
PSET (2 + Xoff, 6 + Yoff), skinM
PSET (3 + Xoff, 6 + Yoff), skinM
PSET (4 + Xoff, 6 + Yoff), skinD
PSET (5 + Xoff, 6 + Yoff), skinM
PSET (6 + Xoff, 6 + Yoff), skinL
PSET (7 + Xoff, 6 + Yoff), skinL
PSET (8 + Xoff, 6 + Yoff), skinD
'PSET (9 + Xoff, 6 + Yoff),

'PSET (0 + Xoff, 7 + Yoff),
PSET (1 + Xoff, 7 + Yoff), hairD
PSET (2 + Xoff, 7 + Yoff), skinD
PSET (3 + Xoff, 7 + Yoff), skinM
PSET (4 + Xoff, 7 + Yoff), skinM
PSET (5 + Xoff, 7 + Yoff), skinL
PSET (6 + Xoff, 7 + Yoff), skinL
PSET (7 + Xoff, 7 + Yoff), skinM
PSET (8 + Xoff, 7 + Yoff), hsirM
'PSET (9 + Xoff, 7 + Yoff),

'PSET (0 + Xoff, 8 + Yoff),
'PSET (1 + Xoff, 8 + Yoff),
PSET (2 + Xoff, 8 + Yoff), skinD
PSET (3 + Xoff, 8 + Yoff), skinD
PSET (4 + Xoff, 8 + Yoff), mouthcol
PSET (5 + Xoff, 8 + Yoff), mouthcol
PSET (6 + Xoff, 8 + Yoff), skinM
PSET (7 + Xoff, 8 + Yoff), skinM
'PSET (8 + Xoff, 8 + Yoff),
'PSET (9 + Xoff, 8 + Yoff),

'PSET (0 + Xoff, 9 + Yoff),
'PSET (1 + Xoff, 9 + Yoff),
'PSET (2 + Xoff, 9 + Yoff),
PSET (3 + Xoff, 9 + Yoff), skinD
PSET (4 + Xoff, 9 + Yoff), skinD
PSET (5 + Xoff, 9 + Yoff), skinM
PSET (6 + Xoff, 9 + Yoff), skinM
'PSET (7 + Xoff, 9 + Yoff),
'PSET (8 + Xoff, 9 + Yoff),
'PSET (9 + Xoff, 9 + Yoff),
'end draw head sprite



'draw body sprite


'end draw body sprite


END