From e6c65d33e68fdfe3b28bff284c62ead374566504 Mon Sep 17 00:00:00 2001
From: Brian Silverman <brians@playfulinvention.com>
Date: Wed, 30 May 2007 13:28:45 +0000
Subject: Initial import

---
(limited to 'samples/smoothcandy.ta')

diff --git a/samples/smoothcandy.ta b/samples/smoothcandy.ta
new file mode 100755
index 0000000..5b424e6
--- /dev/null
+++ b/samples/smoothcandy.ta
@@ -0,0 +1,243 @@
+(lp0
+(I0
+S'clean'
+p1
+I181
+I407
+(lp2
+NaI1
+atp3
+a(I1
+S'repeat'
+p4
+I181
+I446
+(lp5
+I0
+aI2
+aI3
+aNatp6
+a(I2
+(S'number'
+p7
+I350
+tp8
+I267
+I455
+(lp9
+I1
+aNatp10
+a(I3
+S'setpensize'
+p11
+I276
+I495
+(lp12
+I1
+aI4
+aI7
+atp13
+a(I4
+S'heading'
+p14
+I350
+I512
+(lp15
+I3
+aI5
+atp16
+a(I5
+S'plus'
+p17
+I443
+I504
+(lp18
+I4
+aI6
+atp19
+a(I6
+(g7
+I4
+tp20
+I482
+I512
+(lp21
+I5
+aNatp22
+a(I7
+S'forward'
+p23
+I276
+I549
+(lp24
+I3
+aI8
+aI9
+atp25
+a(I8
+(g7
+S'1000'
+p26
+tp27
+I350
+I558
+(lp28
+I7
+aNatp29
+a(I9
+S'setcolor'
+p30
+I276
+I588
+(lp31
+I7
+aI10
+aI13
+atp32
+a(I10
+g14
+I350
+I605
+(lp33
+I9
+aI11
+atp34
+a(I11
+S'division'
+p35
+I443
+I597
+(lp36
+I10
+aI12
+atp37
+a(I12
+(g7
+I3
+tp38
+I482
+I605
+(lp39
+I11
+aNatp40
+a(I13
+S'storeinbox1'
+p41
+I276
+I642
+(lp42
+I9
+aI14
+aI17
+atp43
+a(I14
+g14
+I350
+I659
+(lp44
+I13
+aI15
+atp45
+a(I15
+g35
+I443
+I651
+(lp46
+I14
+aI16
+atp47
+a(I16
+(g7
+I2
+tp48
+I482
+I659
+(lp49
+I15
+aNatp50
+a(I17
+S'setshade'
+p51
+I276
+I696
+(lp52
+I13
+aI18
+aI21
+atp53
+a(I18
+(g7
+I100
+tp54
+I350
+I713
+(lp55
+I17
+aI19
+atp56
+a(I19
+S'minus'
+p57
+I443
+I705
+(lp58
+I18
+aI20
+atp59
+a(I20
+S'box1'
+p60
+I482
+I713
+(lp61
+I19
+aNatp62
+a(I21
+S'back'
+p63
+I276
+I750
+(lp64
+I17
+aI22
+aI23
+atp65
+a(I22
+(g7
+S'1000'
+p66
+tp67
+I350
+I759
+(lp68
+I21
+aNatp69
+a(I23
+S'left'
+p70
+I276
+I789
+(lp71
+I21
+aI24
+aNatp72
+a(I24
+(g7
+I1
+tp73
+I350
+I798
+(lp74
+I23
+aNatp75
+a(I-1
+S'turtle'
+p76
+F0.0
+F0.0
+F10.0
+F3.6666666666666665
+F94.5
+F15.0
+tp77
+a.
\ No newline at end of file
--
cgit v0.9.1