# draw a red arrow

reset

canvassize 200, 200
canvascolor 0, 0, 0
pencolor 255, 0, 0
penwidth 5
clear

go 20,20
direction 135

forward 200
turnleft 135
forward 100
turnleft 135
forward 141
turnleft 135
forward 100
turnleft 45

go 40, 100
