to  cts  ; 藏头诗
pr [【以戒为师】]
    make shi  [ [以佛为餐已数年，]  [戒得虚名涤尘心。]  [为人不喜作诳语，] [ 师傅慧能偈常吟。]]
make kk 1 repeat 4[pr item kk shi make kk kk+1]
(pr char 59  [请大家将每句的开头一字组合起来:] )
make kk 1 repeat 4[type first first item kk shi make kk kk+1]
end
