Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/samples/csquiral.ta
diff options
context:
space:
mode:
authorU-BRIAN-X60\Brian Silverman <Brian Silverman@Brian-X60.(none)>2007-12-03 20:47:15 (GMT)
committer U-BRIAN-X60\Brian Silverman <Brian Silverman@Brian-X60.(none)>2007-12-03 20:47:15 (GMT)
commita705ec6401be821f25147470c668f5de2d273ef8 (patch)
tree8f4bd06530fb3efd6761b531760b0ef22e299bfd /samples/csquiral.ta
parent1ef7063ca9bf97f80fb81ff77c9d17d0c4be71bf (diff)
Improved graphics
Diffstat (limited to 'samples/csquiral.ta')
-rwxr-xr-xsamples/csquiral.ta267
1 files changed, 138 insertions, 129 deletions
diff --git a/samples/csquiral.ta b/samples/csquiral.ta
index 6682f0d..647b5b2 100755
--- a/samples/csquiral.ta
+++ b/samples/csquiral.ta
@@ -1,201 +1,210 @@
(lp0
(I0
-S'setpensize'
+S'clean'
p1
-I163
-I114
+I207
+I67
(lp2
NaI1
-aI2
atp3
a(I1
-(S'number'
+S'setpensize'
p4
-S'25'
-p5
-tp6
-I237
-I131
-(lp7
+I207
+I106
+(lp5
I0
-aNatp8
+aI2
+aI3
+atp6
a(I2
-S'storeinbox1'
-p9
-I163
-I168
+(S'number'
+p7
+S'25'
+p8
+tp9
+I281
+I123
(lp10
-I0
-aI3
-aI4
-atp11
+I1
+aNatp11
a(I3
-(g4
-S'0'
+S'storeinbox1'
p12
-tp13
-I237
-I185
-(lp14
-I2
-aNatp15
+I207
+I160
+(lp13
+I1
+aI4
+aI5
+atp14
a(I4
-S'repeat'
-p16
-I163
-I222
+(g7
+S'0'
+p15
+tp16
+I281
+I177
(lp17
-I2
-aI5
-aI6
+I3
aNatp18
a(I5
-(g4
-S'1300'
+S'repeat'
p19
-tp20
-I249
-I231
-(lp21
-I4
-aNatp22
+I207
+I214
+(lp20
+I3
+aI6
+aI7
+aNatp21
a(I6
-S'setcolor'
-p23
-I258
-I271
+(g7
+S'1300'
+p22
+tp23
+I293
+I223
(lp24
-I4
-aI7
-aI10
-atp25
+I5
+aNatp25
a(I7
-S'xcor'
+S'setcolor'
p26
-I332
-I288
+I302
+I263
(lp27
-I6
+I5
aI8
+aI11
atp28
a(I8
-S'division'
+S'xcor'
p29
-I425
+I376
I280
(lp30
I7
aI9
atp31
a(I9
-(g4
-S'6'
+S'division'
p32
-tp33
-I464
-I288
-(lp34
+I469
+I272
+(lp33
I8
-aNatp35
+aI10
+atp34
a(I10
-S'setshade'
-p36
-I258
-I325
+(g7
+S'6'
+p35
+tp36
+I508
+I280
(lp37
-I6
-aI11
-aI12
-atp38
+I9
+aNatp38
a(I11
-S'heading'
+S'setshade'
p39
-I332
-I342
+I302
+I317
(lp40
-I10
-aNatp41
+I7
+aI12
+aI13
+atp41
a(I12
-S'forward'
+S'heading'
p42
-I258
-I379
+I376
+I334
(lp43
-I10
-aI13
-aI14
-atp44
+I11
+aNatp44
a(I13
-S'box1'
+S'forward'
p45
-I332
-I388
+I302
+I371
(lp46
-I12
-aNatp47
+I11
+aI14
+aI15
+atp47
a(I14
-S'right'
+S'box1'
p48
-I258
-I418
+I376
+I380
(lp49
-I12
-aI15
-aI16
-atp50
+I13
+aNatp50
a(I15
-(g4
-S'91'
+S'right'
p51
-tp52
-I332
-I427
-(lp53
-I14
-aNatp54
-a(I16
-g9
-I258
-I457
-(lp55
-I14
+I302
+I410
+(lp52
+I13
+aI16
aI17
-aNatp56
+atp53
+a(I16
+(g7
+S'91'
+p54
+tp55
+I376
+I419
+(lp56
+I15
+aNatp57
a(I17
-g45
-I332
-I474
-(lp57
-I16
+g12
+I302
+I449
+(lp58
+I15
aI18
-atp58
+aNatp59
a(I18
-S'plus'
-p59
-I425
+g48
+I376
I466
(lp60
I17
aI19
atp61
a(I19
-(g4
-S'1'
+S'plus'
p62
-tp63
-I464
-I474
-(lp64
+I469
+I458
+(lp63
I18
-aNatp65
+aI20
+atp64
+a(I20
+(g7
+S'1'
+p65
+tp66
+I508
+I466
+(lp67
+I19
+aNatp68
a(I-1
S'turtle'
-p66
+p69
F906.80942086435073
F86.478356202884811
F220.0
F-17.117197178042431
F129.0
F25.0
-tp67
+tp70
a. \ No newline at end of file