home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 6 / AACD06.ISO / AACD / Programming / DOpus4-GPL / Config / screen_sliders.c < prev    next >
C/C++ Source or Header  |  2000-01-27  |  2KB  |  102 lines
  1. /*
  2.  
  3. Directory Opus 4
  4. Original GPL release version 4.12
  5. Copyright 1993-2000 Jonathan Potter
  6.  
  7. This program is free software; you can redistribute it and/or
  8. modify it under the terms of the GNU General Public License
  9. as published by the Free Software Foundation; either version 2
  10. of the License, or (at your option) any later version.
  11.  
  12. This program is distributed in the hope that it will be useful,
  13. but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15. GNU General Public License for more details.
  16.  
  17. You should have received a copy of the GNU General Public License
  18. along with this program; if not, write to the Free Software
  19. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  20.  
  21. All users of Directory Opus 4 (including versions distributed
  22. under the GPL) are entitled to upgrade to the latest version of
  23. Directory Opus version 5 at a reduced price. Please see
  24. http://www.gpsoft.com.au for more information.
  25.  
  26. The release of Directory Opus 4 under the GPL in NO WAY affects
  27. the existing commercial status of Directory Opus 5.
  28.  
  29. */
  30.  
  31. #include "config.h"
  32.  
  33. void show_slider_setup(x,y,num)
  34. int x,y,num;
  35. {
  36.     int pos,sx,bx;
  37.  
  38.     x+=x_off;
  39.     y+=y_off;
  40.  
  41.     if (config->slider_pos&(1<<num)) {
  42.         pos=1;
  43.         bx=x;
  44.         sx=x+171;
  45.     }
  46.     else {
  47.         pos=0;
  48.         bx=x+20;
  49.         sx=x;
  50.     }
  51.  
  52.     SetAPen(rp,screen_pens[1].pen);
  53.     SetBPen(rp,screen_pens[0].pen);
  54.  
  55.     DoCycleGadget(&screen_sliders_gadgets[num],Window,left_right_cycle,pos);
  56.  
  57.     Do3DBox(rp,
  58.         sx,y,
  59.         16,94,
  60.         screen_pens[config->gadgettopcol].pen,screen_pens[config->gadgetbotcol].pen);
  61.  
  62.     Do3DBox(rp,
  63.         sx,y+96,
  64.         16,13,
  65.         screen_pens[config->gadgettopcol].pen,screen_pens[config->gadgetbotcol].pen);
  66.  
  67.     Do3DBox(rp,
  68.         sx,y+111,
  69.         16,13,
  70.         screen_pens[config->gadgettopcol].pen,screen_pens[config->gadgetbotcol].pen);
  71.  
  72.     SetAPen(rp,screen_pens[config->sliderbgcol].pen);
  73.     RectFill(rp,
  74.         sx,y,
  75.         sx+15,y+93);
  76.  
  77.     SetAPen(rp,screen_pens[config->slidercol].pen);
  78.     RectFill(rp,
  79.         sx+2,y+1,
  80.         sx+13,y+92);
  81.  
  82.     DoArrow(rp,
  83.         sx,y+96,
  84.         16,13,
  85.         screen_pens[config->arrowfg].pen,screen_pens[config->arrowbg].pen,0);
  86.  
  87.     DoArrow(rp,
  88.         sx,y+111,
  89.         16,13,
  90.         screen_pens[config->arrowfg].pen,screen_pens[config->arrowbg].pen,1);
  91.  
  92.     Do3DBox(rp,
  93.         bx,y,
  94.         167,124,
  95.         screen_pens[config->gadgettopcol].pen,screen_pens[config->gadgetbotcol].pen);
  96.  
  97.     SetAPen(rp,screen_pens[config->filesbg].pen);
  98.     RectFill(rp,
  99.         bx,y,
  100.         bx+166,y+123);
  101. }
  102.