TO HJ
FD 50 RT 45 FD 20 RT 90 FD 20 RT 45 FD 50 LT 90 RT 45
FD 30 RT 135 FD 70 RT 135 FD 30 BK 30 RT 45 FD 30 * 0.7
LT 90 BK 30 RT 15 FD 30 LT 15 BK 30 RT 15 FD 30 LT 15
REPEAT 2 [LT 15 BK 30 RT 15 FD 30]
LT 90 FD 4 * 13.3 * 0.6 RT 90 PU FD 30 * 0.7 PD
END
TO HJSK
MAKE "A ITEM 1 MOUSE
MAKE "B ITEM 2 MOUSE
PU SETXY SE :A :B PD
HJ
WAIT 1
CLEAN
HJSK
END
TO HJSK2
HJ
WAIT 10
CLEAN
PU FD 10 PD
HJSK2
END
这里有两个。
一、运行hjsk
火箭跟着鼠标走
二、运行hjsk2
火箭不断向上升