Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/samples/colors.ta
diff options
context:
space:
mode:
Diffstat (limited to 'samples/colors.ta')
-rwxr-xr-xsamples/colors.ta123
1 files changed, 66 insertions, 57 deletions
diff --git a/samples/colors.ta b/samples/colors.ta
index 5819d26..c7b7c16 100755
--- a/samples/colors.ta
+++ b/samples/colors.ta
@@ -5,8 +5,9 @@ p1
I202
I114
(lp2
-NaI1
-aI2
+I2
+aI1
+aI3
atp3
a(I1
(S'number'
@@ -20,106 +21,114 @@ I131
I0
aNatp8
a(I2
-S'repeat'
+S'clean'
p9
I202
-I168
+I75
(lp10
+NaI0
+atp11
+a(I3
+S'repeat'
+p12
+I202
+I168
+(lp13
I0
-aI3
aI4
-aNatp11
-a(I3
+aI5
+aNatp14
+a(I4
(g4
I360
-tp12
+tp15
I288
I177
-(lp13
-I2
-aNatp14
-a(I4
+(lp16
+I3
+aNatp17
+a(I5
S'setcolor'
-p15
+p18
I297
I217
-(lp16
-I2
-aI5
+(lp19
+I3
aI6
-atp17
-a(I5
+aI7
+atp20
+a(I6
S'heading'
-p18
+p21
I371
I234
-(lp19
-I4
-aNatp20
-a(I6
+(lp22
+I5
+aNatp23
+a(I7
S'forward'
-p21
+p24
I297
I271
-(lp22
-I4
-aI7
+(lp25
+I5
aI8
-atp23
-a(I7
+aI9
+atp26
+a(I8
(g4
I1000
-tp24
+tp27
I371
I280
-(lp25
-I6
-aNatp26
-a(I8
+(lp28
+I7
+aNatp29
+a(I9
S'back'
-p27
+p30
I297
I310
-(lp28
-I6
-aI9
+(lp31
+I7
aI10
-atp29
-a(I9
+aI11
+atp32
+a(I10
(g4
I1000
-tp30
+tp33
I371
I319
-(lp31
-I8
-aNatp32
-a(I10
-S'right'
-p33
-I297
-I349
(lp34
-I8
-aI11
+I9
aNatp35
a(I11
+S'right'
+p36
+I297
+I349
+(lp37
+I9
+aI12
+aNatp38
+a(I12
(g4
I1
-tp36
+tp39
I371
I358
-(lp37
-I10
-aNatp38
+(lp40
+I11
+aNatp41
a(I-1
S'turtle'
-p39
+p42
F0.0
F0.0
F0.0
F359.0
I50
F15.0
-tp40
+tp43
a. \ No newline at end of file