-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathgregg_2raw.unit
387 lines (314 loc) · 92 KB
/
gregg_2raw.unit
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
#!/usr/local/bin/koios
# koios-polos (axis of heaven) unit testing meta-language
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
PREP include the prototype headers - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
incl include public header gregg.h - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (RAW) verify defenses on point sequencing 0s point RAW__point ((01.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
exec clear raw points RAW_init i_equal 0
get ... review position POINT__unit "touch" , POINTS_RAW , 0 s_equal RAW touch ( 0) : / 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 1 s_equal RAW touch ( 1) : / 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 2 s_equal RAW touch ( 2) : / 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 3 s_equal RAW touch ( 3) : / 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 4 s_equal RAW touch ( 4) : / 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 5 s_equal RAW touch ( 5) : / 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 6 s_equal RAW touch ( 6) : / 0x 0y 0x 0y
COND attempt to add points before start - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 0 , 0 , POINT_NORMAL i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 0 []
exec call point add RAW__point 0 , 0 , POINT_HEAD i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 0 []
exec call point add RAW__point 0 , 0 , POINT_FINISH i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 0 []
exec call point add RAW__point 0 , 0 , 'q' i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 0 []
COND add a start point - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.003)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 0 , 0 , POINT_START i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 1 [S]
COND attempt to add points before head - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 0 , 0 , POINT_NORMAL i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 1 [S]
exec call point add RAW__point 0 , 0 , POINT_START i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 1 [S]
exec call point add RAW__point 0 , 0 , POINT_FINISH i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 1 [S]
exec call point add RAW__point 0 , 0 , 'q' i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 1 [S]
COND add a head point - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.005)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 0 , 0 , POINT_HEAD i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
COND attempt to add new start/head points - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.006)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 0 , 0 , POINT_START i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
exec call point add RAW__point 0 , 0 , POINT_HEAD i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
exec call point add RAW__point 0 , 0 , 'q' i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
COND attempt to add a duplicate/bad point - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.007)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 0 , 0 , POINT_NORMAL i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
exec call point add RAW__point 0 , 0 , 'q' i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
COND add a another point - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.008)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 1 , 1 , POINT_NORMAL i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 3 [S>-]
COND attempt to add a duplicate/bad point - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.009)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 1 , 1 , POINT_NORMAL i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 3 [S>-]
exec call point add RAW__point 0 , 0 , 'q' i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 3 [S>-]
COND add a another point - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.010)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 2 , 2 , POINT_NORMAL i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S>--]
COND attempt to add new start/head points - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.011)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 3 , 3 , POINT_START i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S>--]
exec call point add RAW__point 3 , 3 , POINT_HEAD i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S>--]
COND attempt to add finish - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.012)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 3 , 3 , POINT_FINISH i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S>--]
COND add a tail - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.013)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 3 , 3 , POINT_TAIL i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 5 [S>--<]
COND attempt to add points after tail - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.014)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 4 , 4 , POINT_NORMAL i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 5 [S>--<]
exec call point add RAW__point 4 , 4 , POINT_HEAD i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 5 [S>--<]
exec call point add RAW__point 4 , 4 , POINT_FINISH i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 5 [S>--<]
COND attempt to add a finish at a different pos - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.015)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 4 , 4 , POINT_FINISH i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 5 [S>--<]
COND add a correct finish - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.016)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 3 , 3 , POINT_FINISH i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
COND attempt to add a duplicate finish - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.017)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 3 , 3 , POINT_FINISH i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
COND attempt to add points after finish - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.018)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 1 , 2 , POINT_NORMAL i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
exec call point add RAW__point 1 , 2 , POINT_HEAD i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
exec call point add RAW__point 1 , 2 , POINT_FINISH i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
exec call point add RAW__point 0 , 0 , 'q' i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
COND add a another stroke strart - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.019)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call point add RAW__point 5 , 5 , POINT_START i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 7 [S>--<FS]
get ... review position POINT__unit "touch" , POINTS_RAW , 0 s_equal RAW touch ( 0) : S 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 1 s_equal RAW touch ( 1) : > 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 2 s_equal RAW touch ( 2) : - 1x 1y 1x 1y
get ... review position POINT__unit "touch" , POINTS_RAW , 3 s_equal RAW touch ( 3) : - 2x 2y 2x 2y
get ... review position POINT__unit "touch" , POINTS_RAW , 4 s_equal RAW touch ( 4) : < 3x 3y 3x 3y
get ... review position POINT__unit "touch" , POINTS_RAW , 5 s_equal RAW touch ( 5) : F 3x 3y 3x 3y
get ... review position POINT__unit "touch" , POINTS_RAW , 6 s_equal RAW touch ( 6) : S 5x 5y 5x 5y
get ... review position POINT__unit "touch" , POINTS_RAW , 7 s_equal RAW touch ( 7) : / 0x 0y 0x 0y
COND check the position information - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.020)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
get ... review detail POINT__unit "pos" , POINTS_RAW , 0 s_equal RAW pos ( 0) : S 0x 0y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 1 s_equal RAW pos ( 1) : > 0x 0y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 2 s_equal RAW pos ( 2) : - 1x 1y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 3 s_equal RAW pos ( 3) : - 2x 2y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 4 s_equal RAW pos ( 4) : < 3x 3y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 5 s_equal RAW pos ( 5) : F 3x 3y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 6 s_equal RAW pos ( 6) : S 5x 5y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 7 s_equal RAW pos ( 7) : / 0x 0y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((01.021)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (RAW) verify public functions to record points 0s touch RAW_touch, RAW_normal, RAW_lift ((02.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
exec clear raw points RAW_init i_equal 0
GROUP create a small normal - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND touch down - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call touch RAW_touch 0 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
get ... review adjustment RAW__unit "adjust" , 0 s_equal RAW adjust : 0x 0y
get ... review bounds RAW__unit "bounds" , 0 s_equal RAW bounds : beg 0x 0y end 0x 0y min 0x 0y max 0x 0y
COND move - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.003)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal 1 , 1 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 3 [S>-]
COND move - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal 2 , 2 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S>--]
COND move (duplicate) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.005)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal 2 , 2 i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S>--]
COND finish (dup with last, so just add finish) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.006)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call lift RAW_lift 3 , 3 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
COND finish (duplicate) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.007)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call lift RAW_lift 3 , 3 i_lesser 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
GROUP restart a new stroke - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND touch down - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.008)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call touch RAW_touch 0 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
COND add back the rest of a stroke - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.009)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal 1 , 1 i_equal 0
exec call normal RAW_normal 2 , 2 i_equal 0
exec call normal RAW_normal 2 , 2 i_lesser 0
exec call lift RAW_lift 3 , 3 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
GROUP continue the outline - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND touch down - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.010)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call touch RAW_touch 35 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 8 [S>--<FS>]
COND add some more - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.011)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal 36 , 0 i_equal 0
exec call normal RAW_normal 37 , 0 i_equal 0
COND finish - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.012)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call lift RAW_lift 38 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 12 [S>--<FS>--<F]
GROUP touch inside restart radius - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND touch down - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.013)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call touch RAW_touch 34 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
GROUP start a prefixed outline - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND touch down - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.014)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call touch RAW_touch -30 , 30 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 2 [S>]
COND add some more - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.015)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal -30 , 29 i_equal 0
exec call normal RAW_normal -30 , 28 i_equal 0
COND finish - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.016)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call lift RAW_lift -30 , 27 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 6 [S>--<F]
COND touch down in reset area - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.017)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call touch RAW_touch 0 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 8 [S>--<FS>]
COND add back the rest of a stroke - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.018)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal 1 , 0 i_equal 0
exec call normal RAW_normal 2 , 0 i_equal 0
exec call normal RAW_normal 2 , 0 i_lesser 0
exec call lift RAW_lift 2 , 1 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 12 [S>--<FS>--<F]
GROUP continue the outline - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND touch down - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.019)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call touch RAW_touch 35 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 14 [S>--<FS>--<FS>]
COND add some more - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.020)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call normal RAW_normal 36 , 0 i_equal 0
exec call normal RAW_normal 37 , 0 i_equal 0
COND finish - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.021)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec call lift RAW_lift 38 , 0 i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 18 [S>--<FS>--<FS>--<F]
get ... review position POINT__unit "touch" , POINTS_RAW , 0 s_equal RAW touch ( 0) : S -30x 30y -30x 30y
get ... review position POINT__unit "touch" , POINTS_RAW , 1 s_equal RAW touch ( 1) : > -30x 30y -30x 30y
get ... review position POINT__unit "touch" , POINTS_RAW , 2 s_equal RAW touch ( 2) : - -30x 29y -30x 29y
get ... review position POINT__unit "touch" , POINTS_RAW , 3 s_equal RAW touch ( 3) : - -30x 28y -30x 28y
get ... review position POINT__unit "touch" , POINTS_RAW , 4 s_equal RAW touch ( 4) : < -30x 27y -30x 27y
get ... review position POINT__unit "touch" , POINTS_RAW , 5 s_equal RAW touch ( 5) : F -30x 27y -30x 27y
get ... review position POINT__unit "touch" , POINTS_RAW , 6 s_equal RAW touch ( 6) : S 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 7 s_equal RAW touch ( 7) : > 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 8 s_equal RAW touch ( 8) : - 1x 0y 1x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 9 s_equal RAW touch ( 9) : - 2x 0y 2x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 10 s_equal RAW touch (10) : < 2x 1y 2x 1y
get ... review position POINT__unit "touch" , POINTS_RAW , 11 s_equal RAW touch (11) : F 2x 1y 2x 1y
get ... review position POINT__unit "touch" , POINTS_RAW , 12 s_equal RAW touch (12) : S 35x 0y 35x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 13 s_equal RAW touch (13) : > 35x 0y 35x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 14 s_equal RAW touch (14) : - 36x 0y 36x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 15 s_equal RAW touch (15) : - 37x 0y 37x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 16 s_equal RAW touch (16) : < 38x 0y 38x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 17 s_equal RAW touch (17) : F 38x 0y 38x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 18 s_equal RAW touch (18) : / 0x 0y 0x 0y
COND check the position information - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.022)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
get ... review detail POINT__unit "pos" , POINTS_RAW , 0 s_equal RAW pos ( 0) : S -30x 30y -128x -222y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 1 s_equal RAW pos ( 1) : > -30x 30y -128x -222y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 2 s_equal RAW pos ( 2) : - -30x 29y -128x -222y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 3 s_equal RAW pos ( 3) : - -30x 28y -128x -222y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 4 s_equal RAW pos ( 4) : < -30x 27y -128x -222y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 5 s_equal RAW pos ( 5) : F -30x 27y -128x -222y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 6 s_equal RAW pos ( 6) : S 0x 0y -125x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 7 s_equal RAW pos ( 7) : > 0x 0y -125x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 8 s_equal RAW pos ( 8) : - 1x 0y -125x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 9 s_equal RAW pos ( 9) : - 2x 0y -125x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 10 s_equal RAW pos (10) : < 2x 1y -125x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 11 s_equal RAW pos (11) : F 2x 1y -125x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 12 s_equal RAW pos (12) : S 35x 0y -122x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 13 s_equal RAW pos (13) : > 35x 0y -122x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 14 s_equal RAW pos (14) : - 36x 0y -121x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 15 s_equal RAW pos (15) : - 37x 0y -121x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 16 s_equal RAW pos (16) : < 38x 0y -121x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 17 s_equal RAW pos (17) : F 38x 0y -121x -225y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
get ... review detail POINT__unit "pos" , POINTS_RAW , 18 s_equal RAW pos (18) : / 0x 0y 0x 0y 0xd 0yd 0l 0.000s 0i 0.000r 0d 0q
GROUP wrap up - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((02.023)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
#23456789-12 123456789-123456789-123456789-12345 123456789-123456789-123456 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789- 123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789-123456789- 123456789-123456789-
#==(verb)=== ===========(description)=========== =====(function)=========== ========================(arguments)================================================================= ==(test)== ==========================(results)================================================================= ========(var)=======
SCRP (RAW) verify mass data loading 0s load RAW_load, RAW_equalize ((03.---)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
COND initialize the testing environment - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((03.001)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec start testing PROG__unit_quiet i_equal 0
exec clear raw points RAW_init i_equal 0
local create working/return variables - - - - - - - - - - - - - char x_raw [LEN_RECD] = "";
COND add a tiny input - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((03.002)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code move data to holder - - - - - - - - - - - - - strlcpy (x_raw , ";TOUCH,0,0;LIFT,1,1", LEN_RECD);
exec call mass load RAW_load x_raw i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S><F]
get ... review adjustment RAW__unit "adjust" , 0 s_equal RAW adjust : 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 0 s_equal RAW touch ( 0) : S 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 1 s_equal RAW touch ( 1) : > 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 2 s_equal RAW touch ( 2) : < 1x 1y 1x 1y
get ... review position POINT__unit "touch" , POINTS_RAW , 3 s_equal RAW touch ( 3) : F 1x 1y 1x 1y
get ... review position POINT__unit "touch" , POINTS_RAW , 4 s_equal RAW touch ( 4) : / 0x 0y 0x 0y
get ... review bounds RAW__unit "bounds" , 0 s_equal RAW bounds : beg 0x 0y end 1x 1y min 0x 0y max 1x 1y
COND add a tiny input (needing adjustment) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((03.003)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code move data to holder - - - - - - - - - - - - - strlcpy (x_raw , ";TOUCH,10,-7;LIFT,3,-41", LEN_RECD);
exec call mass load RAW_load x_raw i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 4 [S><F]
get ... review adjustment RAW__unit "adjust" , 0 s_equal RAW adjust : 10x -7y
get ... review position POINT__unit "touch" , POINTS_RAW , 0 s_equal RAW touch ( 0) : S 10x -7y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 1 s_equal RAW touch ( 1) : > 10x -7y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 2 s_equal RAW touch ( 2) : < 3x -41y -7x -34y
get ... review position POINT__unit "touch" , POINTS_RAW , 3 s_equal RAW touch ( 3) : F 3x -41y -7x -34y
get ... review position POINT__unit "touch" , POINTS_RAW , 4 s_equal RAW touch ( 4) : / 0x 0y 0x 0y
get ... review bounds RAW__unit "bounds" , 0 s_equal RAW bounds : beg 0x 0y end -7x -34y min -7x -34y max 0x 0y
COND add a longer input (with one dup) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((03.004)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code move data to holder - - - - - - - - - - - - - strlcpy (x_raw , ";TOUCH,10,-7;10,-7;11,-7;11,-8;12,-8;12,-9;LIFT,3,-41", LEN_RECD);
exec call mass load RAW_load x_raw i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 8 [S>----<F]
get ... review adjustment RAW__unit "adjust" , 0 s_equal RAW adjust : 10x -7y
get ... review position POINT__unit "touch" , POINTS_RAW , 0 s_equal RAW touch ( 0) : S 10x -7y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 1 s_equal RAW touch ( 1) : > 10x -7y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 2 s_equal RAW touch ( 2) : - 11x -7y 1x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 3 s_equal RAW touch ( 3) : - 11x -8y 1x -1y
get ... review position POINT__unit "touch" , POINTS_RAW , 4 s_equal RAW touch ( 4) : - 12x -8y 2x -1y
get ... review position POINT__unit "touch" , POINTS_RAW , 5 s_equal RAW touch ( 5) : - 12x -9y 2x -2y
get ... review position POINT__unit "touch" , POINTS_RAW , 6 s_equal RAW touch ( 6) : < 3x -41y -7x -34y
get ... review position POINT__unit "touch" , POINTS_RAW , 7 s_equal RAW touch ( 7) : F 3x -41y -7x -34y
get ... review position POINT__unit "touch" , POINTS_RAW , 8 s_equal RAW touch ( 8) : / 0x 0y 0x 0y
get ... review bounds RAW__unit "bounds" , 0 s_equal RAW bounds : beg 0x 0y end -7x -34y min -7x -34y max 2x 0y
COND add a longer input (with dup at end) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((03.005)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code move data to holder - - - - - - - - - - - - - strlcpy (x_raw , ";TOUCH,10,-7;10,-7;11,-7;11,-8;12,-8;12,-9;LIFT,12,-9", LEN_RECD);
exec call mass load RAW_load x_raw i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 7 [S>---<F]
get ... review adjustment RAW__unit "adjust" , 0 s_equal RAW adjust : 10x -7y
get ... review position POINT__unit "touch" , POINTS_RAW , 0 s_equal RAW touch ( 0) : S 10x -7y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 1 s_equal RAW touch ( 1) : > 10x -7y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 2 s_equal RAW touch ( 2) : - 11x -7y 1x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 3 s_equal RAW touch ( 3) : - 11x -8y 1x -1y
get ... review position POINT__unit "touch" , POINTS_RAW , 4 s_equal RAW touch ( 4) : - 12x -8y 2x -1y
get ... review position POINT__unit "touch" , POINTS_RAW , 5 s_equal RAW touch ( 5) : < 12x -9y 2x -2y
get ... review position POINT__unit "touch" , POINTS_RAW , 6 s_equal RAW touch ( 6) : F 12x -9y 2x -2y
get ... review position POINT__unit "touch" , POINTS_RAW , 7 s_equal RAW touch ( 7) : / 0x 0y 0x 0y
get ... review position POINT__unit "touch" , POINTS_RAW , 8 s_equal RAW touch ( 8) : / 0x 0y 0x 0y
get ... review bounds RAW__unit "bounds" , 0 s_equal RAW bounds : beg 0x 0y end 2x -2y min 0x -2y max 2x 0y
COND add a big one - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((03.006)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
code move data to holder - - - - - - - - - - - - - strlcpy (x_raw , ";TOUCH,10,-7;10,-7;11,-7;11,-8;12,-8;12,-9;12,-10;13,-10;13,-11;13,-12;14,-12;14,-13;14,-14;14,-15;14,-16;14,-17;14,-19;14,-20;14,-22;13,-22;13,-23;13,-25;13,-26;12,-26;12,-28;12,-29;11,-29;11,-31;10,-31;10,-32;10,-33;9,-33;9,-34;8,-34;8,-35;7,-35;7,-37;6,-37;6,-38;5,-38;5,-39;5,-40;4,-40;4,-41;3,-41;LIFT,3,-41", 9000);
exec call mass load RAW_load x_raw i_equal 0
get ... review raw points POINT__unit "types" , POINTS_RAW , 0 s_equal RAW by type : 46 [S>------------------------------------------<>
get ... review adjustment RAW__unit "adjust" , 0 s_equal RAW adjust : 10x -7y
get ... review bounds RAW__unit "bounds" , 0 s_equal RAW bounds : beg 0x 0y end -7x -34y min -7x -34y max 4x 0y
COND complete testing - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ((03.007)) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
exec stop testing PROG__unit_end i_equal 0
# end-of-file. done, finito, completare, whimper [Ï´···