Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/samples/smoothcandy.ta
diff options
context:
space:
mode:
Diffstat (limited to 'samples/smoothcandy.ta')
-rwxr-xr-xsamples/smoothcandy.ta104
1 files changed, 52 insertions, 52 deletions
diff --git a/samples/smoothcandy.ta b/samples/smoothcandy.ta
index 5b424e6..c65a175 100755
--- a/samples/smoothcandy.ta
+++ b/samples/smoothcandy.ta
@@ -2,16 +2,16 @@
(I0
S'clean'
p1
-I181
-I407
+I212
+I39
(lp2
NaI1
atp3
a(I1
S'repeat'
p4
-I181
-I446
+I212
+I78
(lp5
I0
aI2
@@ -22,16 +22,16 @@ a(I2
p7
I350
tp8
-I267
-I455
+I298
+I87
(lp9
I1
aNatp10
a(I3
S'setpensize'
p11
-I276
-I495
+I307
+I127
(lp12
I1
aI4
@@ -40,8 +40,8 @@ atp13
a(I4
S'heading'
p14
-I350
-I512
+I381
+I144
(lp15
I3
aI5
@@ -49,8 +49,8 @@ atp16
a(I5
S'plus'
p17
-I443
-I504
+I474
+I136
(lp18
I4
aI6
@@ -59,16 +59,16 @@ a(I6
(g7
I4
tp20
-I482
-I512
+I513
+I144
(lp21
I5
aNatp22
a(I7
S'forward'
p23
-I276
-I549
+I307
+I181
(lp24
I3
aI8
@@ -79,16 +79,16 @@ a(I8
S'1000'
p26
tp27
-I350
-I558
+I381
+I190
(lp28
I7
aNatp29
a(I9
S'setcolor'
p30
-I276
-I588
+I307
+I220
(lp31
I7
aI10
@@ -96,8 +96,8 @@ aI13
atp32
a(I10
g14
-I350
-I605
+I381
+I237
(lp33
I9
aI11
@@ -105,8 +105,8 @@ atp34
a(I11
S'division'
p35
-I443
-I597
+I474
+I229
(lp36
I10
aI12
@@ -115,16 +115,16 @@ a(I12
(g7
I3
tp38
-I482
-I605
+I513
+I237
(lp39
I11
aNatp40
a(I13
S'storeinbox1'
p41
-I276
-I642
+I307
+I274
(lp42
I9
aI14
@@ -132,16 +132,16 @@ aI17
atp43
a(I14
g14
-I350
-I659
+I381
+I291
(lp44
I13
aI15
atp45
a(I15
g35
-I443
-I651
+I474
+I283
(lp46
I14
aI16
@@ -150,16 +150,16 @@ a(I16
(g7
I2
tp48
-I482
-I659
+I513
+I291
(lp49
I15
aNatp50
a(I17
S'setshade'
p51
-I276
-I696
+I307
+I328
(lp52
I13
aI18
@@ -169,8 +169,8 @@ a(I18
(g7
I100
tp54
-I350
-I713
+I381
+I345
(lp55
I17
aI19
@@ -178,8 +178,8 @@ atp56
a(I19
S'minus'
p57
-I443
-I705
+I474
+I337
(lp58
I18
aI20
@@ -187,16 +187,16 @@ atp59
a(I20
S'box1'
p60
-I482
-I713
+I513
+I345
(lp61
I19
aNatp62
a(I21
S'back'
p63
-I276
-I750
+I307
+I382
(lp64
I17
aI22
@@ -207,16 +207,16 @@ a(I22
S'1000'
p66
tp67
-I350
-I759
+I381
+I391
(lp68
I21
aNatp69
a(I23
S'left'
p70
-I276
-I789
+I307
+I421
(lp71
I21
aI24
@@ -225,16 +225,16 @@ a(I24
(g7
I1
tp73
-I350
-I798
+I381
+I430
(lp74
I23
aNatp75
a(I-1
S'turtle'
p76
-F0.0
-F0.0
+I-558
+I383
F10.0
F3.6666666666666665
F94.5