Examples

R RUL 10 1
RW LUA -120 1
REPEAT 3
RW LLA -90 0.3
RW LLA 90 0.3
END

SD
SET KAKUDO 15 // Change this variable
R BODY KAKUDO
R LUL -KAKUDO
R RUL -KAKUDO

R RUL 10 1
RW LUA -120 1
IF [RAND(1, 6) >= 4]
REPEAT 3
RW LLA -90 0.3
RW LLA 90 0.3
END
END

SC 0.2
M -100 200
PEN DOWN
LT 90
REPEAT 2
REPEAT 180
FD 2
RT 1
W 0.02
END
REPEAT 100
FD 2
W 0.02
END
END

A
M -120 200
PEN DOWN
PENW 10
RT 90
FD 180
RT 90
FD 30
LT 90
FD 100
PEN UP
M -180 -120
SC 0.5
R BODY 45
R BODY 15 0.2
R LUA -120 0.2
R LLA 45 0.2
R RUA 45 0.2
R RLA 90 0.2
R LUL 20 0.2
R LLL -60 0.2
R RUL 45 0.2
R RLL -60 0.2

D slip
SC 0.5
R BODY 45
R BODY 15 0.2
R LUA -120 0.2
R LLA 45 0.2
R RUA 45 0.2
R RLA 90 0.2
R LUL 20 0.2
R LLL -60 0.2
R RUL 45 0.2
R RLL -60 0.2
END
D makeStep
M -120 200
PEN DOWN
PENW 10
RT 90
FD 180
RT 90
FD 30
LT 90
FD 100
PEN UP
M -180 -120
END
E makeStep
E slip

REPEAT 50
R LUA [RAND(-90, 90)] 0.2
RW RUA [RAND(-90, 90)] 0.2
END

R LUA -180
SET DR [3.6 - 0.018]
REPEAT 100
RW LUA DR 0.02
SET DR [DR - 0.036]

R LUA -90
R RUA 60
SET DLUA 0
SET DLLA 0
SET DRUA 0
SET DRLA 0
REPEAT 500
SET DLUA [DLUA - COS(ANGLE("LUA"))]
SET DLLA [DLLA - COS(ANGLE("LLA"))]
SET DRUA [DRUA - COS(ANGLE("RUA"))]
SET DRLA [DRLA - COS(ANGLE("RLA"))]
R LUA DLUA 0.02
R LLA DLLA 0.02
R RUA DRUA 0.02
RW RLA DRLA 0.02
END

SC 0.3
MW -250 0
RW LUA -20
RW RUA 20
REPEAT 8
ST
MW 60 0
END