home *** CD-ROM | disk | FTP | other *** search
/ Audio 4.94 - Over 11,000 Files / audio-11000.iso / amiga / midi / med210.lhw / in.adf / Source / med210src.lzh / med-newintui.c < prev    next >
C/C++ Source or Header  |  1990-07-13  |  33KB  |  600 lines
  1. /* MED - music editor ⌐ 1989, 1990 by Teijo Kinnunen */
  2. /* MED-newintui.c ---- Intuition-structures */
  3. #include "med.h"
  4. extern struct Kappale far song;
  5.  
  6. extern UWORD chip gfximg2[],chip gfximg3[],chip gfximg4[],chip gfximg5[];
  7. extern UWORD chip gfximg6[],chip gfximg7[],chip gfximg8[],chip gfximg9[];
  8. extern UWORD chip gfximgA[],chip gfximgB[];
  9. extern UWORD chip okt12data[],chip okt23data[],chip okt34data[];
  10. extern UWORD chip okt45data[],chip loadgadgets[],chip savegadgets[];
  11.  
  12. struct Image far autoknobimg[8];
  13. struct Image far kuviot = { 0,0,224,45,2,gfximg2,0x3,0x0,NULL };
  14. struct Image far loadgadgimg = { 0,0,66,14,2,loadgadgets,0x3,0x0,NULL };
  15. struct Image far savegadgimg = { 0,0,66,14,2,savegadgets,0x3,0x0,NULL };
  16. struct Image far oktimg[5] = { { 0,0,9,8,2,okt12data,0x3,0x0,NULL },
  17. { 0,0,9,8,2,okt23data,0x3,0x0,NULL },{ 0,0,9,8,2,okt34data,0x3,0x0,NULL },
  18. { 0,0,9,8,2,okt45data,0x3,0x0,NULL } };
  19. char hakemisto[100],kappaleennimi[50],undo[100],toistostr[7],tpitstr[7];
  20. char presetstr[4],volstr[4],mvolstr[4],stransstr[4],linesstr[4] = { '0',0 };
  21. UWORD *imgdataptr[] = {
  22.     NULL,NULL,gfximg2,gfximg3,gfximg4,gfximg5,gfximg6,gfximg7,
  23.     gfximg8,gfximg9,gfximgA,gfximgB };
  24.  
  25. struct PropInfo propinfo[] = {
  26. { AUTOKNOB|FREEVERT|PROPBORDERLESS,MAXPOT,MAXPOT,MAXBODY,MAXBODY,0,0,0,0,0,0 },
  27. { AUTOKNOB|FREEHORIZ|PROPBORDERLESS,0x2134,MAXPOT,0x112,MAXBODY,0,0,0,0,0,0 },
  28. { AUTOKNOB|FREEHORIZ|PROPBORDERLESS,MAXPOT,MAXPOT,0x400,MAXBODY,0,0,0,0,0,0 },
  29. { AUTOKNOB|FREEHORIZ|PROPBORDERLESS,MAXPOT,MAXPOT,508,MAXBODY,0,0,0,0,0,0 },
  30. { AUTOKNOB|FREEHORIZ|PROPBORDERLESS,MAXPOT/2,MAXPOT,2621,MAXBODY,0,0,0,0,0,0 },
  31. { AUTOKNOB|FREEHORIZ|PROPBORDERLESS,0,0,MAXBODY/16,MAXBODY,0,0,0,0,0,0 },
  32. { AUTOKNOB|FREEHORIZ|PROPBORDERLESS,0,0,MAXBODY/16,MAXBODY,0,0,0,0,0,0 },
  33. { AUTOKNOB|FREEHORIZ|PROPBORDERLESS,0,0,MAXBODY/16,MAXBODY,0,0,0,0,0,0 }
  34. };
  35. struct StringInfo strinfo[] = {
  36. { hakemisto,undo,0,100,0,0,0,0,0,0,NULL,NULL,NULL },
  37. { kappaleennimi,undo,0,50,0,0,0,0,0,0,NULL,NULL,NULL },
  38. { song.sample[0].sname,undo,0,40,0,0,0,0,0,0,NULL,NULL,NULL },
  39. { toistostr,undo,0,7,0,0,0,0,0,0,NULL,NULL,NULL },
  40. { tpitstr,undo,0,7,0,0,0,0,0,0,NULL,NULL,NULL },
  41. { presetstr,undo,0,4,0,0,0,0,0,0,NULL,NULL,NULL },
  42. { volstr,undo,0,4,0,0,0,0,0,0,NULL,NULL,NULL },
  43. { mvolstr,undo,0,4,0,0,0,0,0,0,NULL,NULL,NULL },
  44. { stransstr,undo,0,4,0,0,0,0,0,0,NULL,NULL,NULL },
  45. { linesstr,undo,0,4,0,0,0,0,0,0,NULL,NULL,NULL }
  46. };
  47. struct Gadget far gadget1[] = {
  48. { &gadget1[1],233,17,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  49.   NULL,NULL,NULL,0x102,NULL },
  50. { &gadget1[2],233,27,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  51.   NULL,NULL,NULL,0x103,NULL },
  52. { &gadget1[3],233,37,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  53.   NULL,NULL,NULL,0x104,NULL },
  54. { &gadget1[4],233,47,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  55.   NULL,NULL,NULL,0x105,NULL },
  56. { &gadget1[5],233,57,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  57.   NULL,NULL,NULL,0x106,NULL },
  58. { &gadget1[6],276,17,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  59.   NULL,NULL,NULL,0x107,NULL },
  60. { &gadget1[7],276,27,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  61.   NULL,NULL,NULL,0x108,NULL },
  62. { &gadget1[8],276,37,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  63.   NULL,NULL,NULL,0x109,NULL },
  64. { &gadget1[9],276,47,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  65.   NULL,NULL,NULL,0x10A,NULL },
  66. { &gadget1[10],276,57,39,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  67.   NULL,NULL,NULL,0x10B,NULL },
  68. { &gadget1[11],108,66,5,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  69.   NULL,NULL,NULL,0xF00,NULL },    /* Editoi (E) */
  70. { &gadget1[12],115,66,9,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  71.   NULL,NULL,NULL,0xF01,NULL },    /* 2╫ */
  72. { NULL,97,66,9,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  73.   NULL,NULL,NULL,0xF02,NULL }    /* 1+2/2+3/3+4/4+5/5+6 */
  74. };
  75.  
  76. struct Gadget far gadget2[] = {
  77. { &gadget2[1],8,21,120,8,GADGHCOMP,RELVERIFY,BOOLGADGET,NULL,NULL,
  78.   NULL,NULL,NULL,0x200,NULL }, /* rivi1 */
  79. { &gadget2[2],8,29,120,8,GADGHCOMP,RELVERIFY,BOOLGADGET,NULL,NULL,
  80.   NULL,NULL,NULL,0x201,NULL },
  81. { &gadget2[3],8,37,120,8,GADGHCOMP,RELVERIFY,BOOLGADGET,NULL,NULL,
  82.   NULL,NULL,NULL,0x202,NULL },
  83. { &gadget2[4],8,45,120,8,GADGHCOMP,RELVERIFY,BOOLGADGET,NULL,NULL,
  84.   NULL,NULL,NULL,0x203,NULL },
  85. { &gadget2[5],8,53,120,8,GADGHCOMP,RELVERIFY,BOOLGADGET,NULL,NULL,
  86.   NULL,NULL,NULL,0x204,NULL }, /* rivi5 */
  87. { &gadget2[6],130,47,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  88.   NULL,NULL,NULL,0x205,NULL }, /* nuoli yl÷s */
  89. { &gadget2[7],130,21,6,24,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,/*selaus*/
  90.   (APTR)&autoknobimg[0],NULL,NULL,NULL,(APTR)&propinfo[0],0x206,NULL },
  91. { &gadget2[8],130,55,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  92.   NULL,NULL,NULL,0x207,NULL }, /* nuoli alas */
  93. { &gadget2[9],153,43,74,8,GADGHCOMP,RELVERIFY,STRGADGET,NULL,NULL,
  94.   NULL,NULL,(APTR)&strinfo[0],0x208,NULL }, /* Hak. nimi */
  95. { &gadget2[10],153,53,74,8,GADGHCOMP,RELVERIFY,STRGADGET,NULL,NULL,
  96.   NULL,NULL,(APTR)&strinfo[1],0x209,NULL }, /* Kpl nimi */
  97. { &gadget2[11],139,20,21,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  98.   NULL,NULL,NULL,0x120A,NULL }, /* Lataa */
  99. { &gadget2[12],139,27,21,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  100.   NULL,NULL,NULL,0x20B,NULL }, /* Tall. */
  101. { &gadget2[13],139,34,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  102.   NULL,NULL,NULL,0x20F,NULL }, /* DF0 */
  103. { &gadget2[14],157,34,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  104.   NULL,NULL,NULL,0x210,NULL }, /* DF1 */
  105. { &gadget2[15],175,34,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  106.   NULL,NULL,NULL,0x211,NULL }, /* DF2 */
  107. { &gadget2[16],193,34,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  108.   NULL,NULL,NULL,0x212,NULL }, /* DH0 */
  109. { &gadget2[17],213,34,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  110.   NULL,NULL,NULL,0x213,NULL }, /* DH1 */
  111. /* Gadget 17: Lataus */
  112. { &gadget2[18],163,20,64,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  113.   NULL,NULL,NULL,0x214,NULL },    /* Lataa kappale */
  114. { &gadget2[19],163,27,31,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  115.   NULL,NULL,NULL,0x215,NULL },    /* Lataa soitin */
  116. { NULL,196,27,31,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  117.   NULL,NULL,NULL,0x216,NULL },    /* ST MOD */
  118. /* Gadget 20: Tallennus */
  119. { &gadget2[21],163,20,64,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  120.   NULL,NULL,NULL,0x217,NULL },    /* Tall. kpl */
  121. { &gadget2[22],163,27,31,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  122.   NULL,NULL,NULL,0x218,NULL },    /* Tall. soitin */
  123. { NULL,196,27,31,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  124.   NULL,NULL,NULL,0x219,NULL }    /* Tuhoa */
  125. };
  126.  
  127. struct Gadget far gadget3[] = {
  128. { &gadget3[1],100,45,63,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  129.   NULL,NULL,NULL,0x300,NULL }, /* Soita kappale */
  130. { &gadget3[2],100,54,63,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  131.   NULL,NULL,NULL,0x301,NULL }, /* Soita lohkoa */
  132. { &gadget3[3],53,45,45,16,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  133.   NULL,NULL,NULL,0x302,NULL }, /* Lopeta soitto */
  134. { &gadget3[4],165,45,63,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  135.   NULL,NULL,NULL,0x303,NULL }, /* Jatka kappaletta */
  136. { &gadget3[5],165,54,63,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  137.   NULL,NULL,NULL,0x304,NULL }, /* Jatka lohkoa */
  138. { &gadget3[6],90,34,35,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  139.   NULL,NULL,NULL,0x1305,NULL }, /* Suodatin */
  140. { &gadget3[7],127,34,13,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  141.   NULL,NULL,NULL,0x1306,NULL }, /* Eq 1 */
  142. { &gadget3[8],54,26,11,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  143.   NULL,NULL,NULL,0x307,NULL }, /* ST */
  144. { &gadget3[9],54,19,11,5,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  145.   NULL,NULL,NULL,0x1308,NULL }, /* MED    vvv-tempo/prop. */
  146. { &gadget3[10],69,21,138,10,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,
  147.   (APTR)&autoknobimg[1],NULL,NULL,NULL,(APTR)&propinfo[1],0x309,NULL },
  148. { &gadget3[11],211,21,6,10,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  149.   NULL,NULL,NULL,0x30A,NULL }, /* tempo <- */
  150. { &gadget3[12],221,21,6,10,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  151.   NULL,NULL,NULL,0x30B,NULL }, /* tempo -> */
  152. { &gadget3[13],25,31,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  153.   NULL,NULL,NULL,0x30C,NULL }, /* ^ */
  154. { &gadget3[14],25,41,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  155.   NULL,NULL,NULL,0x30D,NULL }, /* v */
  156. { &gadget3[15],25,20,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  157.   NULL,NULL,NULL,0x30E,NULL }, /* eka */
  158. { &gadget3[16],25,51,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  159.   NULL,NULL,NULL,0x30F,NULL }, /* viim. */
  160. { &gadget3[17],35,26,7,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  161.   NULL,NULL,NULL,0x310,NULL }, /* + */
  162. { &gadget3[18],44,26,7,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  163.   NULL,NULL,NULL,0x311,NULL }, /* - */
  164. { &gadget3[19],35,35,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  165.   NULL,NULL,NULL,0x312,NULL }, /* LisΣΣ jΣrj. */
  166. { &gadget3[20],35,44,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  167.   NULL,NULL,NULL,0x313,NULL }, /* Poista jΣrj. */
  168. { &gadget3[21],35,53,16,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  169.   NULL,NULL,NULL,0x314,NULL },  /* LisΣΣ tΣmΣ */
  170. { &gadget3[22],142,34,13,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  171.   NULL,NULL,NULL,0x1315,NULL }, /* Eq 2 */
  172. { &gadget3[23],157,34,13,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  173.   NULL,NULL,NULL,0x1316,NULL }, /* Eq 3 */
  174. { &gadget3[24],60,34,13,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  175.   NULL,NULL,NULL,0x317,NULL }, /* hex */
  176. { NULL,75,34,13,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  177.   NULL,NULL,NULL,0x1318,NULL } /* dec */
  178. };
  179.  
  180. struct Gadget far gadget4[] = {
  181. { &gadget4[1],7,39,24,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  182.   NULL,NULL,NULL,0x407,NULL }, /* Poista */
  183. { &gadget4[2],33,30,15,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  184.   NULL,NULL,NULL,0x401,NULL }, /* Ens. soitin */
  185. { &gadget4[3],98,30,15,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  186.   NULL,NULL,NULL,0x402,NULL }, /* Viim. soitin */
  187. { &gadget4[4],50,30,22,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  188.   NULL,NULL,NULL,0x403,NULL }, /* << */
  189. { &gadget4[5],74,30,22,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  190.   NULL,NULL,NULL,0x404,NULL }, /* >> */
  191. { &gadget4[6],33,39,80,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  192.   NULL,NULL,NULL,0x405,NULL }, /* Lataa soitin */
  193. { &gadget4[7],7,30,24,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  194.   NULL,NULL,NULL,0x406,NULL }, /* Ukko */
  195. { &gadget4[8],25,20,152,8,GADGHCOMP,RELVERIFY,STRGADGET,NULL,NULL,
  196.   NULL,NULL,(APTR)&strinfo[2],0x400,NULL }, /* Soitin nimi (str) */
  197. { &gadget4[9],179,30,48,8,GADGHCOMP,RELVERIFY|LONGINT,STRGADGET,NULL,NULL,
  198.   NULL,NULL,(APTR)strinfo[3],0x408,NULL }, /* Toisto/alk. */
  199. { &gadget4[10],179,40,48,8,GADGHCOMP,RELVERIFY|LONGINT,STRGADGET,NULL,NULL,
  200.   NULL,NULL,(APTR)strinfo[4],0x409,NULL }, /* Toisto/pit. */
  201. {á&gadget4[11],77,51,131,10,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,
  202.   (APTR)&autoknobimg[2],NULL,NULL,NULL,(APTR)&propinfo[2],0x40B,NULL },
  203. { &gadget4[12],116,38,24,8,GADGHCOMP,RELVERIFY|LONGINT,STRGADGET,NULL,NULL,
  204.   NULL,NULL,(APTR)&strinfo[8],0x40E,NULL },
  205. {á&gadget4[13],212,51,6,10,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  206.   NULL,NULL,NULL,0x40A,NULL }, /* <- voim */
  207. {á&gadget4[14],222,51,6,10,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  208.   NULL,NULL,NULL,0x40C,NULL }, /* -> voim */
  209. { &gadget4[15],142,38,6,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  210.   NULL,NULL,NULL,0x40D,NULL },
  211. { NULL,150,38,6,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  212.   NULL,NULL,NULL,0x40F,NULL }
  213. };
  214.  
  215. struct Gadget far gadget5[] = {
  216. { &gadget5[1],30,19,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  217.   NULL,NULL,NULL,0x501,NULL }, /* cut track */
  218. { &gadget5[2],59,19,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  219.   NULL,NULL,NULL,0x500,NULL }, /* copy track */
  220. { &gadget5[3],88,19,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  221.   NULL,NULL,NULL,0x502,NULL }, /* paste track */
  222. { &gadget5[4],117,19,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  223.   NULL,NULL,NULL,0x503,NULL }, /* swap track */
  224. { &gadget5[5],30,30,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  225.   NULL,NULL,NULL,0x505,NULL }, /* cut block */
  226. { &gadget5[6],59,30,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  227.   NULL,NULL,NULL,0x504,NULL }, /* copy block */
  228. { &gadget5[7],88,30,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  229.   NULL,NULL,NULL,0x506,NULL }, /* paste block */
  230. { &gadget5[8],117,30,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  231.   NULL,NULL,NULL,0x507,NULL }, /* swap block */
  232. { &gadget5[9],6,53,43,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  233.   NULL,NULL,NULL,0x508,NULL }, /* new block */
  234. { &gadget5[10],51,53,43,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  235.   NULL,NULL,NULL,0x509,NULL }, /* new here */
  236. { &gadget5[11],96,53,43,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  237.   NULL,NULL,NULL,0x50A,NULL }, /* del block */
  238. { &gadget5[12],141,53,43,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  239.   NULL,NULL,NULL,0x50B,NULL }, /* del last */
  240. { &gadget5[13],146,42,33,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  241.   NULL,NULL,NULL,0x50C,NULL }, /* clr buff */
  242. { &gadget5[14],186,53,20,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  243.   NULL,NULL,NULL,0x50D,NULL }, /* split */
  244. { &gadget5[15],208,53,20,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  245.   NULL,NULL,NULL,0x50E,NULL }, /* join */
  246. { &gadget5[16],30,42,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  247.   NULL,NULL,NULL,0x50F,NULL }, /* set mark */
  248. { &gadget5[17],59,42,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  249.   NULL,NULL,NULL,0x510,NULL }, /* cut */
  250. { &gadget5[18],88,42,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  251.   NULL,NULL,NULL,0x511,NULL }, /* copy */
  252. { &gadget5[19],117,42,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  253.   NULL,NULL,NULL,0x512,NULL }, /* paste */
  254. { &gadget5[20],164,19,14,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  255.   NULL,NULL,NULL,0x1513,NULL }, /* 4 */
  256. { &gadget5[21],180,19,14,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  257.   NULL,NULL,NULL,0x514,NULL }, /* 8 */
  258. { &gadget5[22],196,19,14,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  259.   NULL,NULL,NULL,0x515,NULL }, /* 12 */
  260. { &gadget5[23],213,19,14,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  261.   NULL,NULL,NULL,0x516,NULL }, /* 16 */
  262. { &gadget5[24],181,42,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  263.   NULL,NULL,NULL,0x517,NULL }, /* 1 */
  264. { &gadget5[25],188,42,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  265.   NULL,NULL,NULL,0x518,NULL }, /* 2 */
  266. { &gadget5[26],195,42,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  267.   NULL,NULL,NULL,0x519,NULL }, /* 3 */
  268. { &gadget5[27],202,42,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  269.   NULL,NULL,NULL,0x51A,NULL }, /* 4 */
  270. { &gadget5[28],209,42,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  271.   NULL,NULL,NULL,0x51B,NULL }, /* 8 */
  272. { &gadget5[29],216,42,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  273.   NULL,NULL,NULL,0x51C,NULL }, /* 16 */
  274. { &gadget5[30],223,42,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  275.   NULL,NULL,NULL,0x51D,NULL }, /* clr */
  276. { &gadget5[31],164,30,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  277.   NULL,NULL,NULL,0x51E,NULL }, /* << */
  278. { &gadget5[32],174,30,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  279.   NULL,NULL,NULL,0x51F,NULL }, /* < */
  280. { &gadget5[33],184,31,24,8,GADGHCOMP,RELVERIFY|LONGINT,STRGADGET,NULL,NULL,
  281.   NULL,NULL,(APTR)&strinfo[9],0x520,NULL }, /* str */
  282. { &gadget5[34],210,30,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  283.   NULL,NULL,NULL,0x521,NULL }, /* > */
  284. { NULL,220,30,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  285.   NULL,NULL,NULL,0x522,NULL } /* >> */
  286. };
  287.  
  288. struct Gadget far gadget6[] = {
  289. { &gadget6[1],190,40,38,10,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  290.   NULL,NULL,NULL,0x600,NULL }, /* Edit */
  291. { &gadget6[2],190,52,38,10,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  292.   NULL,NULL,NULL,0x601,NULL }, /* 2╫spc */
  293. { &gadget6[3],51,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  294.   NULL,NULL,NULL,0x1602,NULL }, /* 1... */
  295. { &gadget6[4],62,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  296.   NULL,NULL,NULL,0x1603,NULL },
  297. { &gadget6[5],73,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  298.   NULL,NULL,NULL,0x1604,NULL },
  299. { &gadget6[6],84,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  300.   NULL,NULL,NULL,0x1605,NULL },
  301. { &gadget6[7],95,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  302.   NULL,NULL,NULL,0x1606,NULL },
  303. { &gadget6[8],106,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  304.   NULL,NULL,NULL,0x1607,NULL },
  305. { &gadget6[9],117,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  306.   NULL,NULL,NULL,0x1608,NULL },
  307. { &gadget6[10],128,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  308.   NULL,NULL,NULL,0x1609,NULL },
  309. { &gadget6[11],139,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  310.   NULL,NULL,NULL,0x160A,NULL },
  311. { &gadget6[12],150,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  312.   NULL,NULL,NULL,0x160B,NULL },
  313. { &gadget6[13],161,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  314.   NULL,NULL,NULL,0x160C,NULL },
  315. { &gadget6[14],172,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  316.   NULL,NULL,NULL,0x160D,NULL },
  317. { &gadget6[15],183,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  318.   NULL,NULL,NULL,0x160E,NULL },
  319. { &gadget6[16],194,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  320.   NULL,NULL,NULL,0x160F,NULL },
  321. { &gadget6[17],205,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  322.   NULL,NULL,NULL,0x1610,NULL },
  323. { &gadget6[18],216,19,9,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  324.   NULL,NULL,NULL,0x1611,NULL }, /* ...16 */
  325. { &gadget6[19],7,52,15,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  326.   NULL,NULL,NULL,0x1612,NULL }, /* Okt 1+2 */
  327. { &gadget6[20],24,52,15,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  328.   NULL,NULL,NULL,0x613,NULL }, /* Okt 2+3 */
  329. { &gadget6[21],41,52,15,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  330.   NULL,NULL,NULL,0x614,NULL }, /* Okt 3+4 */
  331. { &gadget6[22],58,52,15,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  332.   NULL,NULL,NULL,0x615,NULL }, /* Okt 4+5 */
  333. { &gadget6[23],7,30,13,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  334.   NULL,NULL,NULL,0x616,NULL }, /* slide 1 */
  335. { &gadget6[24],93,30,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  336.   NULL,NULL,NULL,0x617,NULL }, /* <- */
  337. { &gadget6[25],113,30,8,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  338.   NULL,NULL,NULL,0x618,NULL }, /* -> */
  339. { &gadget6[26],7,41,49,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  340.   NULL,NULL,NULL,0x1619,NULL }, /* autom. rivinv. */
  341. { &gadget6[27],58,41,21,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  342.   NULL,NULL,NULL,0x161A,NULL }, /* sh0-9 */
  343. { &gadget6[28],81,41,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  344.   NULL,NULL,NULL,0x61B,NULL }, /* l.alt */
  345. { &gadget6[29],102,41,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  346.   NULL,NULL,NULL,0x61C,NULL }, /* r.alt */
  347. { &gadget6[30],58,30,33,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  348.   NULL,NULL,NULL,0x61D,NULL }, /* pick */
  349. { &gadget6[31],22,30,13,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  350.   NULL,NULL,NULL,0x61E,NULL }, /* slide 2 */
  351. { &gadget6[32],37,30,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  352.   NULL,NULL,NULL,0x61F,NULL }, /* vol. slide */
  353. { &gadget6[33],81,52,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  354.   NULL,NULL,NULL,0x620,NULL }, /* save keys */
  355. { &gadget6[34],102,52,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  356.   NULL,NULL,NULL,0x621,NULL }, /* clr */
  357. { &gadget6[35],124,40,14,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  358.   NULL,NULL,NULL,0x622,NULL }, /* note # up */
  359. { &gadget6[36],124,48,14,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  360.   NULL,NULL,NULL,0x623,NULL }, /* note # down */
  361. { &gadget6[37],140,40,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  362.   NULL,NULL,NULL,0x624,NULL }, /* oct #áup */
  363. { &gadget6[38],140,48,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  364.   NULL,NULL,NULL,0x625,NULL }, /* oct # down */
  365. { &gadget6[39],128,56,14,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  366.   NULL,NULL,NULL,0x626,NULL }, /* clr note & oct # */
  367. { &gadget6[40],149,40,6,14,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  368.   NULL,NULL,NULL,0x627,NULL }, /* change 0th # */
  369. { &gadget6[41],158,40,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  370.   NULL,NULL,NULL,0x628,NULL }, /* incr. 1st # */
  371. { &gadget6[42],158,48,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  372.   NULL,NULL,NULL,0x629,NULL }, /* decr. 1st # */
  373. { &gadget6[43],158,56,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  374.   NULL,NULL,NULL,0x62A,NULL }, /* clr 1st # */
  375. { &gadget6[44],166,40,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  376.   NULL,NULL,NULL,0x62B,NULL }, /* incr. 2nd # */
  377. { &gadget6[45],166,48,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  378.   NULL,NULL,NULL,0x62C,NULL }, /* decr. 2nd # */
  379. { &gadget6[46],166,56,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  380.   NULL,NULL,NULL,0x62D,NULL }, /* clr 2nd # */
  381. { &gadget6[47],174,40,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  382.   NULL,NULL,NULL,0x62E,NULL }, /* incr. 3rd # */
  383. { &gadget6[48],174,48,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  384.   NULL,NULL,NULL,0x62F,NULL }, /* decr. 3rd # */
  385. { &gadget6[49],174,56,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  386.   NULL,NULL,NULL,0x630,NULL }, /* clr 3rd # */
  387. { &gadget6[50],182,40,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  388.   NULL,NULL,NULL,0x631,NULL }, /* incr. 4th # */
  389. { &gadget6[51],182,48,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  390.   NULL,NULL,NULL,0x632,NULL }, /* decr. 4th # */
  391. { NULL,182,56,30,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  392.   NULL,NULL,NULL,0x633,NULL } /* clr 4th # */
  393. };
  394.  
  395. struct Gadget far gadget7[] = {
  396. { &gadget7[1],15,21,90,8,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,
  397.   (APTR)&autoknobimg[5],NULL,NULL,NULL,(APTR)&propinfo[5],0x700,NULL },
  398. { &gadget7[2],15,31,90,8,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,
  399.   (APTR)&autoknobimg[6],NULL,NULL,NULL,(APTR)&propinfo[6],0x701,NULL },
  400. { &gadget7[3],15,41,90,8,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,
  401.   (APTR)&autoknobimg[7],NULL,NULL,NULL,(APTR)&propinfo[7],0x702,NULL },
  402. { &gadget7[4],15,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  403.   NULL,NULL,NULL,0x703,NULL },    /* vΣri 0 */
  404. { &gadget7[5],25,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  405.   NULL,NULL,NULL,0x704,NULL },
  406. { &gadget7[6],35,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  407.   NULL,NULL,NULL,0x705,NULL },
  408. { &gadget7[7],45,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  409.   NULL,NULL,NULL,0x706,NULL },
  410. { &gadget7[8],55,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  411.   NULL,NULL,NULL,0x707,NULL },
  412. { &gadget7[9],65,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  413.   NULL,NULL,NULL,0x708,NULL },
  414. { &gadget7[10],75,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  415.   NULL,NULL,NULL,0x709,NULL },
  416. { &gadget7[11],85,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  417.   NULL,NULL,NULL,0x70A,NULL },    /* vΣri 7 */
  418. { &gadget7[12],118,21,27,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  419.   NULL,NULL,NULL,0x70B,NULL },    /* nollaa */
  420. { &gadget7[13],118,31,27,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  421.   NULL,NULL,NULL,0x70C,NULL },    /* peru */
  422. { &gadget7[14],151,55,23,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  423.   NULL,NULL,NULL,0x70D,NULL },    /* ei hypi */
  424. { &gadget7[15],176,55,26,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  425.   NULL,NULL,NULL,0x70E,NULL },    /* joka 8. */
  426. { &gadget7[16],204,55,24,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  427.   NULL,NULL,NULL,0x170F,NULL },    /* soitin */
  428. { &gadget7[17],171,19,57,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  429.   NULL,NULL,NULL,0x711,NULL },    /* uusi kpl */
  430. { &gadget7[18],171,28,57,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  431.   NULL,NULL,NULL,0x712,NULL },    /* jΣtΣ soittimet */
  432. { &gadget7[19],171,37,57,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  433.   NULL,NULL,NULL,0x713,NULL },    /* poistu */
  434. { &gadget7[20],159,19,10,12,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  435.   NULL,NULL,NULL,0x714,NULL },    /* OK! */
  436. { &gadget7[21],134,46,44,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  437.   NULL,NULL,NULL,0x715,NULL },    /* LisΣΣ polut */
  438. { NULL,180,46,48,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  439.   NULL,NULL,NULL,0x716,NULL }    /* Poista polut */
  440. };
  441.  
  442. struct Gadget far gadget8[] = {
  443. { &gadget8[1],43,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  444.   NULL,NULL,NULL,0x800,NULL }, /* ½ */
  445. { &gadget8[2],53,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  446.   NULL,NULL,NULL,0x801,NULL }, /* < */
  447. { &gadget8[3],63,52,24,8,GADGHCOMP,RELVERIFY|LONGINT,STRGADGET,NULL,NULL,
  448.   NULL,NULL,(APTR)&strinfo[6],0x802,NULL }, /* voim. */
  449. { &gadget8[4],89,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  450.   NULL,NULL,NULL,0x803,NULL }, /* > */
  451. { &gadget8[5],99,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  452.   NULL,NULL,NULL,0x804,NULL }, /* ╗ */
  453. { &gadget8[6],163,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  454.   NULL,NULL,NULL,0x805,NULL }, /* ½ (pv) */
  455. { &gadget8[7],173,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  456.   NULL,NULL,NULL,0x806,NULL }, /* < (pv) */
  457. { &gadget8[8],183,52,24,8,GADGHCOMP,RELVERIFY|LONGINT,STRGADGET,NULL,NULL,
  458.   NULL,NULL,(APTR)&strinfo[7],0x807,NULL }, /* pΣΣvoim. */
  459. { &gadget8[9],209,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  460.   NULL,NULL,NULL,0x808,NULL }, /* > (pv) */
  461. { &gadget8[10],219,52,8,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  462.   NULL,NULL,NULL,0x809,NULL }, /* ╗ (pv) */
  463. { NULL,44,28,142,18,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  464.   NULL,NULL,NULL,0x810,NULL } /* volumes */
  465. };
  466.  
  467. struct Gadget far gadget9[] = {
  468. { &gadget9[1],8,52,41,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  469.   NULL,NULL,NULL,0x900,NULL },    /* MIDI pΣΣllΣ */
  470. { &gadget9[2],82,34,27,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  471.   NULL,NULL,NULL,0x1901,NULL },    /* Midi ei */
  472. { &gadget9[3],111,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  473.   NULL,NULL,NULL,0x902,NULL },    /* 1 */
  474. { &gadget9[4],118,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  475.   NULL,NULL,NULL,0x903,NULL },    /* 2 */
  476. { &gadget9[5],125,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  477.   NULL,NULL,NULL,0x904,NULL },    /* 3 */
  478. { &gadget9[6],132,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  479.   NULL,NULL,NULL,0x905,NULL },    /* 4 */
  480. { &gadget9[7],139,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  481.   NULL,NULL,NULL,0x906,NULL },    /* 5 */
  482. { &gadget9[8],146,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  483.   NULL,NULL,NULL,0x907,NULL },    /* 6 */
  484. { &gadget9[9],153,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  485.   NULL,NULL,NULL,0x908,NULL },    /* 7 */
  486. { &gadget9[10],160,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  487.   NULL,NULL,NULL,0x909,NULL },    /* 8 */
  488. { &gadget9[11],167,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  489.   NULL,NULL,NULL,0x90A,NULL },    /* 9 */
  490. { &gadget9[12],174,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  491.   NULL,NULL,NULL,0x90B,NULL },    /* 10 */
  492. { &gadget9[13],181,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  493.   NULL,NULL,NULL,0x90C,NULL },    /* 11 */
  494. { &gadget9[14],188,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  495.   NULL,NULL,NULL,0x90D,NULL },    /* 12 */
  496. { &gadget9[15],195,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  497.   NULL,NULL,NULL,0x90E,NULL },    /* 13 */
  498. { &gadget9[16],202,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  499.   NULL,NULL,NULL,0x90F,NULL },    /* 14 */
  500. { &gadget9[17],209,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  501.   NULL,NULL,NULL,0x910,NULL },    /* 15 */
  502. { &gadget9[18],216,34,5,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  503.   NULL,NULL,NULL,0x911,NULL },    /* 16 */
  504. { &gadget9[19],112,53,24,8,GADGHCOMP,RELVERIFY|LONGINT,STRGADGET,NULL,NULL,
  505.   NULL,NULL,(APTR)&strinfo[5],0x912,NULL },    /* Preset # str */
  506. { &gadget9[20],205,54,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  507.   NULL,NULL,NULL,0x913,NULL },    /* <-     v- Preset # prop*/
  508. { &gadget9[21],139,54,62,6,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,
  509.   (APTR)&autoknobimg[3],NULL,NULL,NULL,(APTR)&propinfo[3],0x914,NULL },
  510. { &gadget9[22],215,54,6,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  511.   NULL,NULL,NULL,0x915,NULL },    /* -> */
  512. { &gadget9[23],51,52,53,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  513.   NULL,NULL,NULL,0x916,NULL },    /* Sy÷tt÷ */
  514. { NULL,180,19,47,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  515.   NULL,NULL,NULL,0x917,NULL }    /* get volume */
  516. };
  517.   
  518. struct Gadget far gadgetA[] = {
  519. { &gadgetA[1],6,26,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  520.   NULL,NULL,NULL,0xA00,NULL },
  521. { &gadgetA[2],6,35,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  522.   NULL,NULL,NULL,0xA01,NULL },
  523. { &gadgetA[3],6,44,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  524.   NULL,NULL,NULL,0xA02,NULL },
  525. { &gadgetA[4],6,53,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  526.   NULL,NULL,NULL,0xA03,NULL },
  527. { &gadgetA[5],59,26,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  528.   NULL,NULL,NULL,0xA04,NULL },
  529. { &gadgetA[6],59,35,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  530.   NULL,NULL,NULL,0xA05,NULL },
  531. { &gadgetA[7],59,44,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  532.   NULL,NULL,NULL,0xA06,NULL },
  533. { &gadgetA[8],59,53,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  534.   NULL,NULL,NULL,0xA07,NULL },
  535. { &gadgetA[9],112,26,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  536.   NULL,NULL,NULL,0xA08,NULL },
  537. { &gadgetA[10],112,35,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  538.   NULL,NULL,NULL,0xA09,NULL },
  539. { &gadgetA[11],112,44,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  540.   NULL,NULL,NULL,0xA0A,NULL },
  541. { &gadgetA[12],112,53,40,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  542.   NULL,NULL,NULL,0xA0B,NULL },
  543. { &gadgetA[13],156,26,5,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  544.   NULL,NULL,NULL,0xA0C,NULL },    /* Soiton transp.: - */
  545. { &gadgetA[14],163,26,57,6,GADGHCOMP|GADGIMAGE,RELVERIFY,PROPGADGET,
  546.   (APTR)&autoknobimg[4],NULL,NULL,NULL,(APTR)&propinfo[4],0xA0D,NULL },
  547. { &gadgetA[15],222,26,5,6,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  548.   NULL,NULL,NULL,0xA0E,NULL },    /* transp.: + */
  549. { &gadgetA[16],155,44,37,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  550.   NULL,NULL,NULL,0xA0F,NULL },
  551. { &gadgetA[17],194,44,33,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  552.   NULL,NULL,NULL,0xA10,NULL },
  553. { &gadgetA[18],168,53,21,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  554.   NULL,NULL,NULL,0x1A11,NULL },
  555. { NULL,191,53,36,7,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  556.   NULL,NULL,NULL,0xA12,NULL }
  557. };
  558.  
  559. struct Gadget far gadgetB[] = {
  560. { &gadgetB[1],137,31,6,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  561.   NULL,NULL,NULL,0xB00,NULL },    /* ^ */
  562. { &gadgetB[2],137,20,6,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,
  563.   NULL,NULL,NULL,NULL,NULL,0xB01,NULL }, /* top */
  564. { &gadgetB[3],137,51,6,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,
  565.   NULL,NULL,NULL,NULL,NULL,0xB0C,NULL }, /* bottom */
  566. { &gadgetB[4],137,41,6,8,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  567.   NULL,NULL,NULL,0xB02,NULL },    /* v */
  568. { &gadgetB[5],147,30,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  569.   NULL,NULL,NULL,0xB03,NULL },    /* <- */
  570. { &gadgetB[6],168,30,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  571.   NULL,NULL,NULL,0xB04,NULL },    /* -> */
  572. { &gadgetB[7],147,41,30,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  573.   NULL,NULL,NULL,0xB05,NULL },    /* Lataa s. */
  574. { &gadgetB[8],155,52,10,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  575.   NULL,NULL,NULL,0xB06,NULL },    /* L->CD */
  576. { &gadgetB[9],167,52,10,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  577.   NULL,NULL,NULL,0xB07,NULL },    /* L->S: */
  578. { &gadgetB[10],195,41,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  579.   NULL,NULL,NULL,0xB08,NULL },    /* Lis nimi */
  580. { &gadgetB[11],216,41,11,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  581.   NULL,NULL,NULL,0xB09,NULL },    /* Lis hak */
  582. { &gadgetB[12],195,51,19,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  583.   NULL,NULL,NULL,0xB0A,NULL },    /* Pois nimi */
  584. { NULL,216,51,11,9,GADGHNONE,GADGIMMEDIATE,BOOLGADGET,NULL,NULL,
  585.   NULL,NULL,NULL,0xB0B,NULL }    /* Pois hak */
  586. };
  587.  
  588. struct Gadget far *glists[] = { NULL,gadget1,gadget2,gadget3,gadget4,
  589.     gadget5,gadget6,gadget7,gadget8,gadget9,gadgetA,gadgetB };
  590. extern char title[]; /* med-rev.c:ssΣ */
  591. struct TextAttr far nsfont = { "topaz.font",8,0,0 };
  592. struct NewScreen far ns = { 0,0,320,STDSCREENHEIGHT,3,0,1,0,CUSTOMSCREEN,
  593.     &nsfont,title,NULL,NULL };
  594. struct NewWindow far nw = { 0,0,320,200,-1,-1,GADGETDOWN|RAWKEY|GADGETUP|
  595.     MOUSEBUTTONS,SMART_REFRESH|BACKDROP|BORDERLESS|ACTIVATE|NOCAREREFRESH|RMBTRAP,
  596.     &gadget1[0],NULL,NULL,NULL,NULL,0,0,0,0,CUSTOMSCREEN };
  597. struct NewWindow far pnw = { 0,16,320,56,-1,-1,NULL,NOCAREREFRESH|
  598.     SMART_REFRESH|BORDERLESS|RMBTRAP,NULL,NULL,NULL,NULL,NULL,0,0,0,0,
  599.     CUSTOMSCREEN }; /* eqalizerikkuna - kΣyt÷ssΣ vain NTSC-Amigoissa */
  600.