Courtesy of and copyright Hybrid Technology
For use with U.Wave program.
% Waveform definitions:
"bright" [WZERO 181 1 WH! 155 2 WH!
181 3 WH! 62 4 WH! 76 5 WH! 37 6 WH!
14 7 WH! 3 8 WH! WHG WGC]
181 3 WH! 62 4 WH! 76 5 WH! 37 6 WH!
14 7 WH! 3 8 WH! WHG WGC]
"medium" [WZERO 4FOR(159 INDEX WH!)FOR
WHG WGC]
WHG WGC]
"dull" [WZERO 243 1 WH! 74 2 WH!
27 3 WH! 19 4 WH! 16 5 WH! 12 6 WH!
8 7 WH! 8 8 WH! 4 9 WH! 4 10 WH!
WHG WGC]
27 3 WH! 19 4 WH! 16 5 WH! 12 6 WH!
8 7 WH! 8 8 WH! 4 9 WH! 4 10 WH!
WHG WGC]
"reed" [WZERO 242 1 WH! 220 3 WH!
200 5 WH! 180 7 WH! 120 9 WH!
80 11 WH! WHG WGC]
200 5 WH! 180 7 WH! 120 9 WH!
80 11 WH! WHG WGC]
"wierd" [WZERO 234 1 WH! 167 8 WH!
134 12 WH! WHG WGC]
134 12 WH! WHG WGC]
"delta" [WZERO
16 FOR(172 INDEX WH!)FOR WHG WGC]
16 FOR(172 INDEX WH!)FOR WHG WGC]
"tri" [32 FOR(INDEX 1 #- #11 #+ #11 #+
#11 INDEX WG! #11 65 INDEX #- WG!
0 #12 #- #11 64 INDEX #+ WG! 129
INDEX #- WG!)FOR WGC]
#11 INDEX WG! #11 65 INDEX #- WG!
0 #12 #- #11 64 INDEX #+ WG! 129
INDEX #- WG!)FOR WGC]
"qsine" [WZERO 128 4 WH! WHG
96 FOR(0 INDEX 32 #+ WG!)FOR WGC]
96 FOR(0 INDEX 32 #+ WG!)FOR WGC]
"pulse" [32 FOR(127 INDEX WG!)FOR
96 FOR(-127 INDEX 32 #+ WG!)FOR WGC]
96 FOR(-127 INDEX 32 #+ WG!)FOR WGC]
"ramp" [128 FOR(INDEX #11 #+ 129 #-
INDEX WG!)FOR WGC]
INDEX WG!)FOR WGC]
"rand1" [0 RAND!
128 FOR(RAND INDEX WG!)FOR WGC]
128 FOR(RAND INDEX WG!)FOR WGC]
"rand2" [255 RAND!
128 FOR(RAND INDEX WG!)FOR WGC]
128 FOR(RAND INDEX WG!)FOR WGC]
"null" [WZERO WGC]
% Setup words:
"W!" ["Wave "$OUT#11NOUTNL WMOD]
"preset1" [1 W! bright 2 W! medium
3 W! dull 4 W! reed 5 W! wierd
6 W! delta 7 W! tri8 W! qsine
9 W! pulse 10 W! ramp 11 W! rand1
12 W! rand2 13 W! null NL]
3 W! dull 4 W! reed 5 W! wierd
6 W! delta 7 W! tri8 W! qsine
9 W! pulse 10 W! ramp 11 W! rand1
12 W! rand2 13 W! null NL]
% Type preset1 to set up all
% 13 waveforms
% 13 waveforms
Published in AMPLINEX 014, November
1989
