From c767b810f5d98e1895278a7c21b7c7d0eec5d669 Mon Sep 17 00:00:00 2001 From: Walter Bender Date: Fri, 20 Feb 2009 17:07:54 +0000 Subject: adding sample directory for languages --- (limited to 'samples/zh_TW/rainbow.ta') diff --git a/samples/zh_TW/rainbow.ta b/samples/zh_TW/rainbow.ta new file mode 100644 index 0000000..6ceaf12 --- /dev/null +++ b/samples/zh_TW/rainbow.ta @@ -0,0 +1,194 @@ +(lp0 +(I0 +S'clean' +p1 +I227 +I63 +(lp2 +NaI1 +atp3 +a(I1 +S'setcolor' +p4 +I227 +I102 +(lp5 +I0 +aI2 +aI3 +atp6 +a(I2 +(S'number' +p7 +S'50' +p8 +tp9 +I301 +I119 +(lp10 +I1 +aNatp11 +a(I3 +S'setpensize' +p12 +I227 +I156 +(lp13 +I1 +aI4 +aI5 +atp14 +a(I4 +(g7 +S'15' +p15 +tp16 +I301 +I173 +(lp17 +I3 +aNatp18 +a(I5 +S'repeat' +p19 +I227 +I210 +(lp20 +I3 +aI6 +aI7 +aNatp21 +a(I6 +(g7 +I360 +tp22 +I313 +I219 +(lp23 +I5 +aNatp24 +a(I7 +g4 +I322 +I259 +(lp25 +I5 +aI8 +aI13 +atp26 +a(I8 +S'heading' +p27 +I396 +I276 +(lp28 +I7 +aI9 +atp29 +a(I9 +S'product' +p30 +I489 +I268 +(lp31 +I8 +aI10 +atp32 +a(I10 +(g7 +S'100' +p33 +tp34 +I528 +I276 +(lp35 +I9 +aI11 +atp36 +a(I11 +S'division' +p37 +I621 +I268 +(lp38 +I10 +aI12 +atp39 +a(I12 +(g7 +I360 +tp40 +I660 +I276 +(lp41 +I11 +aNatp42 +a(I13 +S'forward' +p43 +I322 +I313 +(lp44 +I7 +aI14 +aI15 +atp45 +a(I14 +(g7 +S'1000' +p46 +tp47 +I396 +I322 +(lp48 +I13 +aNatp49 +a(I15 +S'back' +p50 +I322 +I352 +(lp51 +I13 +aI16 +aI17 +atp52 +a(I16 +(g7 +S'1000' +p53 +tp54 +I396 +I361 +(lp55 +I15 +aNatp56 +a(I17 +S'right' +p57 +I322 +I391 +(lp58 +I15 +aI18 +aNatp59 +a(I18 +(g7 +I1 +tp60 +I396 +I400 +(lp61 +I17 +aNatp62 +a(I-1 +S'turtle' +p63 +F0.0 +F0.0 +F0.0 +F99.722222222222229 +I50 +F15.0 +tp64 +a. \ No newline at end of file -- cgit v0.9.1