From a705ec6401be821f25147470c668f5de2d273ef8 Mon Sep 17 00:00:00 2001
From: U-BRIAN-X60\Brian Silverman <Brian Silverman@Brian-X60.(none)>
Date: Mon, 03 Dec 2007 20:47:15 +0000
Subject: Improved graphics

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

diff --git a/samples/rainbow.ta b/samples/rainbow.ta
index bf36d27..6ceaf12 100755
--- a/samples/rainbow.ta
+++ b/samples/rainbow.ta
@@ -2,16 +2,16 @@
 (I0
 S'clean'
 p1
-I191
-I35
+I227
+I63
 (lp2
 NaI1
 atp3
 a(I1
 S'setcolor'
 p4
-I191
-I74
+I227
+I102
 (lp5
 I0
 aI2
@@ -23,16 +23,16 @@ p7
 S'50'
 p8
 tp9
-I265
-I91
+I301
+I119
 (lp10
 I1
 aNatp11
 a(I3
 S'setpensize'
 p12
-I191
-I128
+I227
+I156
 (lp13
 I1
 aI4
@@ -43,16 +43,16 @@ a(I4
 S'15'
 p15
 tp16
-I265
-I145
+I301
+I173
 (lp17
 I3
 aNatp18
 a(I5
 S'repeat'
 p19
-I191
-I182
+I227
+I210
 (lp20
 I3
 aI6
@@ -62,15 +62,15 @@ a(I6
 (g7
 I360
 tp22
-I277
-I191
+I313
+I219
 (lp23
 I5
 aNatp24
 a(I7
 g4
-I286
-I231
+I322
+I259
 (lp25
 I5
 aI8
@@ -79,8 +79,8 @@ atp26
 a(I8
 S'heading'
 p27
-I360
-I248
+I396
+I276
 (lp28
 I7
 aI9
@@ -88,8 +88,8 @@ atp29
 a(I9
 S'product'
 p30
-I453
-I240
+I489
+I268
 (lp31
 I8
 aI10
@@ -99,8 +99,8 @@ a(I10
 S'100'
 p33
 tp34
-I492
-I248
+I528
+I276
 (lp35
 I9
 aI11
@@ -108,8 +108,8 @@ atp36
 a(I11
 S'division'
 p37
-I585
-I240
+I621
+I268
 (lp38
 I10
 aI12
@@ -118,16 +118,16 @@ a(I12
 (g7
 I360
 tp40
-I624
-I248
+I660
+I276
 (lp41
 I11
 aNatp42
 a(I13
 S'forward'
 p43
-I286
-I285
+I322
+I313
 (lp44
 I7
 aI14
@@ -138,16 +138,16 @@ a(I14
 S'1000'
 p46
 tp47
-I360
-I294
+I396
+I322
 (lp48
 I13
 aNatp49
 a(I15
 S'back'
 p50
-I286
-I324
+I322
+I352
 (lp51
 I13
 aI16
@@ -158,16 +158,16 @@ a(I16
 S'1000'
 p53
 tp54
-I360
-I333
+I396
+I361
 (lp55
 I15
 aNatp56
 a(I17
 S'right'
 p57
-I286
-I363
+I322
+I391
 (lp58
 I15
 aI18
@@ -176,8 +176,8 @@ a(I18
 (g7
 I1
 tp60
-I360
-I372
+I396
+I400
 (lp61
 I17
 aNatp62
--
cgit v0.9.1