CLS
1
SCREEN 12
'INPUT ANGLE$
DRAW$ = "TA"
DRAW$ = DRAW$ + ANGLE$
DRAW$ = DRAW$ + "R70 D10 L30 D70 L40 U20 R10 D10 R20 U60 L30 U10"

DRAW "X" + VARPTR$(DRAW$)
'GOTO 1