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/reflections.ta')

diff --git a/samples/reflections.ta b/samples/reflections.ta
index e112aa3..77c6a7e 100755
--- a/samples/reflections.ta
+++ b/samples/reflections.ta
@@ -2,16 +2,16 @@
 (I0
 S'clean'
 p1
-I119
-I61
+I243
+I63
 (lp2
 NaI1
 atp3
 a(I1
 S'setpensize'
 p4
-I119
-I100
+I243
+I102
 (lp5
 I0
 aI2
@@ -23,16 +23,16 @@ p7
 S'15'
 p8
 tp9
-I193
-I117
+I317
+I119
 (lp10
 I1
 aNatp11
 a(I3
 S'storeinbox1'
 p12
-I119
-I154
+I243
+I156
 (lp13
 I1
 aI4
@@ -43,16 +43,16 @@ a(I4
 S'6200'
 p15
 tp16
-I193
-I171
+I317
+I173
 (lp17
 I3
 aNatp18
 a(I5
 S'repeat'
 p19
-I119
-I208
+I243
+I210
 (lp20
 I3
 aI6
@@ -63,16 +63,16 @@ a(I6
 S'6200'
 p22
 tp23
-I205
-I217
+I329
+I219
 (lp24
 I5
 aNatp25
 a(I7
 S'storeinbox2'
 p26
-I214
-I257
+I338
+I259
 (lp27
 I5
 aI8
@@ -81,8 +81,8 @@ atp28
 a(I8
 S'box1'
 p29
-I288
-I274
+I412
+I276
 (lp30
 I7
 aI9
@@ -90,8 +90,8 @@ atp31
 a(I9
 S'division'
 p32
-I381
-I266
+I505
+I268
 (lp33
 I8
 aI10
@@ -101,16 +101,16 @@ a(I10
 S'50'
 p35
 tp36
-I420
-I274
+I544
+I276
 (lp37
 I9
 aNatp38
 a(I11
 S'setshade'
 p39
-I214
-I311
+I338
+I313
 (lp40
 I7
 aI12
@@ -121,8 +121,8 @@ a(I12
 S'100'
 p42
 tp43
-I288
-I328
+I412
+I330
 (lp44
 I11
 aI13
@@ -130,8 +130,8 @@ atp45
 a(I13
 S'minus'
 p46
-I381
-I320
+I505
+I322
 (lp47
 I12
 aI14
@@ -139,16 +139,16 @@ atp48
 a(I14
 S'box2'
 p49
-I420
-I328
+I544
+I330
 (lp50
 I13
 aNatp51
 a(I15
 S'forward'
 p52
-I214
-I365
+I338
+I367
 (lp53
 I11
 aI16
@@ -156,16 +156,16 @@ aI19
 atp54
 a(I16
 g29
-I288
-I374
+I412
+I376
 (lp55
 I15
 aI17
 atp56
 a(I17
 g32
-I381
-I366
+I505
+I368
 (lp57
 I16
 aI18
@@ -175,16 +175,16 @@ a(I18
 S'8'
 p59
 tp60
-I420
-I374
+I544
+I376
 (lp61
 I17
 aNatp62
 a(I19
 S'back'
 p63
-I214
-I404
+I338
+I406
 (lp64
 I15
 aI20
@@ -192,16 +192,16 @@ aI23
 atp65
 a(I20
 g29
-I288
-I413
+I412
+I415
 (lp66
 I19
 aI21
 atp67
 a(I21
 g32
-I381
-I405
+I505
+I407
 (lp68
 I20
 aI22
@@ -210,16 +210,16 @@ a(I22
 (g7
 g59
 tp70
-I420
-I413
+I544
+I415
 (lp71
 I21
 aNatp72
 a(I23
 S'right'
 p73
-I214
-I443
+I338
+I445
 (lp74
 I19
 aI24
@@ -230,15 +230,15 @@ a(I24
 S'1'
 p76
 tp77
-I288
-I452
+I412
+I454
 (lp78
 I23
 aNatp79
 a(I25
 g12
-I214
-I482
+I338
+I484
 (lp80
 I23
 aI26
@@ -246,16 +246,16 @@ aI29
 atp81
 a(I26
 g29
-I288
-I499
+I412
+I501
 (lp82
 I25
 aI27
 atp83
 a(I27
 g46
-I381
-I491
+I505
+I493
 (lp84
 I26
 aI28
@@ -264,24 +264,24 @@ a(I28
 (g7
 g76
 tp86
-I420
-I499
+I544
+I501
 (lp87
 I27
 aNatp88
 a(I29
 S'setcolor'
 p89
-I214
-I536
+I338
+I538
 (lp90
 I25
 aI30
 aNatp91
 a(I30
 g29
-I288
-I553
+I412
+I555
 (lp92
 I29
 aNatp93
--
cgit v0.9.1