From 33de02bc04595ec56fa8ef7c3200dba63c05297b Mon Sep 17 00:00:00 2001 From: Walter Bender Date: Thu, 12 Feb 2009 21:58:53 +0000 Subject: finishing up merge from TAPortfolio --- (limited to 'samples/rainbow.ta') diff --git a/samples/rainbow.ta b/samples/rainbow.ta deleted file mode 100644 index 6ceaf12..0000000 --- a/samples/rainbow.ta +++ /dev/null @@ -1,194 +0,0 @@ -(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