TO  shouhui  ;先定义手绘子程序 
setspeed 99  ;速度降为99，默认是100，太快不能手绘
label  LL  ;定义标签LL  
if button=1 then pd else pu   ;如果鼠标左键按下，则落笔画线条，否则抬笔不画线条， 作用是按下鼠标左键即画线，放开左键即不画，以实现手绘   
setxy mousex mousey  ;以鼠标的座标为参数画线  
scor  ;保存当前海龟座标  
if button=1 or button=0 then go LL  ;如果按鼠标的右键则停止，否则跳转到标签LL处，循环执行，实现手绘动作。  
End  ;结束
shouhui  ;执行这个子手绘子过程 
 CS ;清屏幕
  BP   ;回放手绘图形，很有意思
  SAVECOR  ;保存回放数据的过程到编辑器，注意可能数据量非常大 
  EDIT   ;打开编辑器看看多了什么