From ebbaf1f427c01334106add9a11802381e170d7ce Mon Sep 17 00:00:00 2001
From: U-BRIAN-X60\Brian Silverman <Brian Silverman@Brian-X60.(none)>
Date: Thu, 30 Aug 2007 21:48:32 +0000
Subject: added journal awareness

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

diff --git a/samples/fountain.ta b/samples/fountain.ta
index 8ed05ac..00a9626 100755
--- a/samples/fountain.ta
+++ b/samples/fountain.ta
@@ -2,16 +2,16 @@
 (I0
 S'hat1'
 p1
-I699
-I215
+I632
+I54
 (lp2
 NaI1
 atp3
 a(I1
 S'repeat'
 p4
-I711
-I265
+I644
+I104
 (lp5
 I0
 aI2
@@ -23,16 +23,16 @@ p7
 S'400'
 p8
 tp9
-I797
-I274
+I730
+I113
 (lp10
 I1
 aNatp11
 a(I3
 S'storeinbox1'
 p12
-I806
-I314
+I739
+I153
 (lp13
 I1
 aI4
@@ -41,8 +41,8 @@ atp14
 a(I4
 S'heading'
 p15
-I880
-I331
+I813
+I170
 (lp16
 I3
 aI5
@@ -50,8 +50,8 @@ atp17
 a(I5
 S'division'
 p18
-I973
-I323
+I906
+I162
 (lp19
 I4
 aI6
@@ -60,16 +60,16 @@ a(I6
 (g7
 I2
 tp21
-I1012
-I331
+I945
+I170
 (lp22
 I5
 aNatp23
 a(I7
 S'storeinbox2'
 p24
-I806
-I368
+I739
+I207
 (lp25
 I3
 aI8
@@ -78,8 +78,8 @@ atp26
 a(I8
 S'box1'
 p27
-I880
-I385
+I813
+I224
 (lp28
 I7
 aI9
@@ -87,8 +87,8 @@ atp29
 a(I9
 S'plus'
 p30
-I973
-I377
+I906
+I216
 (lp31
 I8
 aI10
@@ -97,16 +97,16 @@ a(I10
 (g7
 I5
 tp33
-I1012
-I385
+I945
+I224
 (lp34
 I9
 aNatp35
 a(I11
 S'setcolor'
 p36
-I806
-I422
+I739
+I261
 (lp37
 I7
 aI12
@@ -115,8 +115,8 @@ atp38
 a(I12
 S'random'
 p39
-I880
-I420
+I813
+I259
 (lp40
 I11
 aI13
@@ -124,24 +124,24 @@ aI14
 aNatp41
 a(I13
 g27
-I908
-I439
+I841
+I278
 (lp42
 I12
 aNatp43
 a(I14
 S'box2'
 p44
-I1030
-I439
+I963
+I278
 (lp45
 I12
 aNatp46
 a(I15
 S'arc'
 p47
-I806
-I476
+I739
+I315
 (lp48
 I11
 aI16
@@ -152,8 +152,8 @@ a(I16
 (g7
 I-40
 tp50
-I880
-I485
+I813
+I324
 (lp51
 I15
 aNatp52
@@ -161,15 +161,15 @@ a(I17
 (g7
 I3000
 tp53
-I880
-I522
+I813
+I361
 (lp54
 I15
 aNatp55
 a(I18
 g47
-I806
-I552
+I739
+I391
 (lp56
 I15
 aI19
@@ -180,8 +180,8 @@ a(I19
 (g7
 I-40
 tp58
-I880
-I561
+I813
+I400
 (lp59
 I18
 aNatp60
@@ -189,16 +189,16 @@ a(I20
 (g7
 I-3000
 tp61
-I880
-I598
+I813
+I437
 (lp62
 I18
 aNatp63
 a(I21
 S'right'
 p64
-I806
-I628
+I739
+I467
 (lp65
 I18
 aI22
@@ -208,16 +208,16 @@ a(I22
 S'.1'
 p67
 tp68
-I880
-I637
+I813
+I476
 (lp69
 I21
 aNatp70
 a(I23
 S'fillscreen'
 p71
-I377
-I213
+I214
+I46
 (lp72
 NaI24
 aI25
@@ -228,8 +228,8 @@ a(I24
 S'10'
 p74
 tp75
-I451
-I222
+I288
+I55
 (lp76
 I23
 aNatp77
@@ -238,16 +238,16 @@ a(I25
 S'30'
 p78
 tp79
-I451
-I259
+I288
+I92
 (lp80
 I23
 aNatp81
 a(I26
 S'setshade'
 p82
-I377
-I289
+I214
+I122
 (lp83
 I23
 aI27
@@ -258,16 +258,16 @@ a(I27
 S'85'
 p85
 tp86
-I451
-I306
+I288
+I139
 (lp87
 I26
 aNatp88
 a(I28
 S'setxy'
 p89
-I377
-I343
+I214
+I176
 (lp90
 I26
 aI29
@@ -279,26 +279,26 @@ a(I29
 S'-590'
 p92
 tp93
-I451
-I352
+I288
+I185
 (lp94
 I28
 aNatp95
 a(I30
 (g7
-S'-500'
+S'-450'
 p96
 tp97
-I451
-I389
+I288
+I222
 (lp98
 I28
 aNatp99
 a(I31
 S'setpensize'
 p100
-I377
-I419
+I214
+I252
 (lp101
 I28
 aI32
@@ -309,15 +309,15 @@ a(I32
 S'3'
 p103
 tp104
-I451
-I436
+I288
+I269
 (lp105
 I31
 aNatp106
 a(I33
 g4
-I377
-I473
+I214
+I306
 (lp107
 I31
 aI34
@@ -328,16 +328,16 @@ a(I34
 S'6'
 p109
 tp110
-I463
-I482
+I300
+I315
 (lp111
 I33
 aNatp112
 a(I35
 S'seth'
 p113
-I472
-I522
+I309
+I355
 (lp114
 I33
 aI36
@@ -348,24 +348,24 @@ a(I36
 S'0'
 p116
 tp117
-I546
-I531
+I383
+I364
 (lp118
 I35
 aNatp119
 a(I37
 S'stack1'
 p120
-I472
-I561
+I309
+I394
 (lp121
 I35
 aI38
 atp122
 a(I38
 g89
-I472
-I600
+I309
+I433
 (lp123
 I37
 aI39
@@ -374,16 +374,16 @@ aNatp124
 a(I39
 S'xcor'
 p125
-I546
-I609
+I383
+I442
 (lp126
 I38
 aI40
 atp127
 a(I40
 g30
-I639
-I601
+I476
+I434
 (lp128
 I39
 aI41
@@ -393,16 +393,16 @@ a(I41
 S'200'
 p130
 tp131
-I678
-I609
+I515
+I442
 (lp132
 I40
 aNatp133
 a(I42
 S'ycor'
 p134
-I546
-I646
+I383
+I479
 (lp135
 I38
 aNatp136
@@ -410,9 +410,9 @@ a(I-1
 S'turtle'
 p137
 F609.99999999906686
-F-500.00000000254568
+F-450.00000000254568
 F40.000000000009074
-I22
+I21
 F85.0
 F3.0
 tp138
--
cgit v0.9.1