data/qcsrc/menu/item/slider.c

   1 // Note:\r
   2 //   to use this, you FIRST call configureSliderVisuals, then configureSliderValues\r
   3 #ifdef INTERFACE\r
   4 CLASS(Slider) EXTENDS(Label)\r
   5         METHOD(Slider, resizeNotify, void(entity, vector, vector, vector, vector))\r
   6         METHOD(Slider, configureSliderVisuals, void(entity, float, float, float, string))\r
   7         METHOD(Slider, configureSliderValues, void(entity, float, float, float, float, float, float))\r
   8         METHOD(Slider, draw, void(entity))\r
   9         METHOD(Slider, keyDown, float(entity, float, float, float))\r
  10         METHOD(Slider, mousePress, float(entity, vector))\r
  11         METHOD(Slider, mouseDrag, float(entity, vector))\r
  12         METHOD(Slider, mouseRelease, float(entity, vector))\r
  13         METHOD(Slider, valueToText, string(entity, float))\r
  14         METHOD(Slider, toString, string(entity))\r
  15         METHOD(Slider, setValue, void(entity, float))\r
  16         METHOD(Slider, showNotify, void(entity))\r
  17         ATTRIB(Slider, src, string, string_null)\r
  18         ATTRIB(Slider, focusable, float, 1)\r
  19         ATTRIB(Slider, value, float, 0)\r
  20         ATTRIB(Slider, valueMin, float, 0)\r
  21         ATTRIB(Slider, valueMax, float, 0)\r
  22         ATTRIB(Slider, valueStep, float, 0)\r
  23         ATTRIB(Slider, valueDigits, float, 0)\r
  24         ATTRIB(Slider, valueKeyStep, float, 0)\r
  25         ATTRIB(Slider, valuePageStep, float, 0)\r
  26         ATTRIB(Slider, valueDisplayMultiplier, float, 1.0)\r
  27         ATTRIB(Slider, textSpace, float, 0)\r
  28         ATTRIB(Slider, controlWidth, float, 0)\r
  29         ATTRIB(Slider, pressed, float, 0)\r
  30         ATTRIB(Slider, pressOffset, float, 0)\r
  31         ATTRIB(Slider, previousValue, float, 0)\r
  32         ATTRIB(Slider, tolerance, vector, '0 0 0')\r
  33         ATTRIB(Slider, disabled, float, 0)\r
  34         ATTRIB(Slider, color, vector, '1 1 1')\r
  35         ATTRIB(Slider, color2, vector, '1 1 1')\r
  36         ATTRIB(Slider, colorD, vector, '1 1 1')\r
  37         ATTRIB(Slider, colorC, vector, '1 1 1')\r
  38         ATTRIB(Slider, colorF, vector, '1 1 1')\r
  39         ATTRIB(Slider, disabledAlpha, float, 0.3)\r
  40 ENDCLASS(Slider)\r
  41 #endif\r
  42 \r
  43 #ifdef IMPLEMENTATION\r
  44 void setValueSlider(entity me, float val)\r
  45 {\r
  46         me.value = val;\r
  47 }\r
  48 string toStringSlider(entity me)\r
  49 {\r
  50         return strcat(ftos(me.value), " (", me.valueToText(me, me.value), ")");\r
  51 }\r
  52 void resizeNotifySlider(entity me, vector relOrigin, vector relSize, vector absOrigin, vector absSize)\r
  53 {\r
  54         resizeNotifyLabel(me, relOrigin, relSize, absOrigin, absSize);\r
  55         me.controlWidth = absSize_y / absSize_x;\r
  56 }\r
  57 string valueToTextSlider(entity me, float val)\r
  58 {\r
  59         if(almost_in_bounds(me.valueMin, val, me.valueMax))\r
  60                 return ftos_decimals(val * me.valueDisplayMultiplier, me.valueDigits);\r
  61         return "";\r
  62 }\r
  63 void configureSliderVisualsSlider(entity me, float sz, float theAlign, float theTextSpace, string gfx)\r
  64 {\r
  65         configureLabelLabel(me, string_null, sz, theAlign);\r
  66         me.textSpace = theTextSpace;\r
  67         me.keepspaceLeft = (theTextSpace == 0) ? 0 : (1 - theTextSpace);\r
  68         me.src = gfx;\r
  69 }\r
  70 void configureSliderValuesSlider(entity me, float theValueMin, float theValue, float theValueMax, float theValueStep, float theValueKeyStep, float theValuePageStep)\r
  71 {\r
  72         me.value = theValue;\r
  73         me.valueStep = theValueStep;\r
  74         me.valueMin = theValueMin;\r
  75         me.valueMax = theValueMax;\r
  76         me.valueKeyStep = theValueKeyStep;\r
  77         me.valuePageStep = theValuePageStep;\r
  78         me.valueDigits = 3;\r
  79         if(fabs(floor(me.valueStep * 100 + 0.5) - (me.valueStep * 100)) < 0.01) // about a whole number of 100ths\r
  80                 me.valueDigits = 2;\r
  81         if(fabs(floor(me.valueStep * 10 + 0.5) - (me.valueStep * 10)) < 0.01) // about a whole number of 10ths\r
  82                 me.valueDigits = 1;\r
  83         if(fabs(floor(me.valueStep * 1 + 0.5) - (me.valueStep * 1)) < 0.01) // about a whole number\r
  84                 me.valueDigits = 0;\r
  85 }\r
  86 float keyDownSlider(entity me, float key, float ascii, float shift)\r
  87 {\r
  88         float inRange;\r
  89         if(me.disabled)\r
  90                 return 0;\r
  91         inRange = (almost_in_bounds(me.valueMin, me.value, me.valueMax));\r
  92         if(key == K_LEFTARROW)\r
  93         {\r
  94                 if(inRange)\r
  95                         me.setValue(me, median(me.valueMin, me.value - me.valueKeyStep, me.valueMax));\r
  96                 else\r
  97                         me.setValue(me, me.valueMax);\r
  98                 return 1;\r
  99         }\r
 100         if(key == K_RIGHTARROW)\r
 101         {\r
 102                 if(inRange)\r
 103                         me.setValue(me, median(me.valueMin, me.value + me.valueKeyStep, me.valueMax));\r
 104                 else\r
 105                         me.setValue(me, me.valueMin);\r
 106                 return 1;\r
 107         }\r
 108         if(key == K_PGUP)\r
 109         {\r
 110                 if(inRange)\r
 111                         me.setValue(me, median(me.valueMin, me.value - me.valuePageStep, me.valueMax));\r
 112                 else\r
 113                         me.setValue(me, me.valueMax);\r
 114                 return 1;\r
 115         }\r
 116         if(key == K_PGDN)\r
 117         {\r
 118                 if(inRange)\r
 119                         me.setValue(me, median(me.valueMin, me.value + me.valuePageStep, me.valueMax));\r
 120                 else\r
 121                         me.setValue(me, me.valueMin);\r
 122                 return 1;\r
 123         }\r
 124         if(key == K_HOME)\r
 125         {\r
 126                 me.setValue(me, me.valueMin);\r
 127                 return 1;\r
 128         }\r
 129         if(key == K_END)\r
 130         {\r
 131                 me.setValue(me, me.valueMax);\r
 132                 return 1;\r
 133         }\r
 134         // TODO more keys\r
 135         return 0;\r
 136 }\r
 137 float mouseDragSlider(entity me, vector pos)\r
 138 {\r
 139         float hit;\r
 140         float v;\r
 141         if(me.disabled)\r
 142                 return 0;\r
 143         if(me.pressed)\r
 144         {\r
 145                 hit = 1;\r
 146                 if(pos_x < 0 - me.tolerance_x) hit = 0;\r
 147                 if(pos_y < 0 - me.tolerance_y) hit = 0;\r
 148                 if(pos_x >= 1 - me.textSpace + me.tolerance_x) hit = 0;\r
 149                 if(pos_y >= 1 + me.tolerance_y) hit = 0;\r
 150                 if(hit)\r
 151                 {\r
 152                         v = median(0, (pos_x - me.pressOffset - 0.5 * me.controlWidth) / (1 - me.textSpace - me.controlWidth), 1) * (me.valueMax - me.valueMin) + me.valueMin;\r
 153                         if(me.valueStep)\r
 154                                 v = floor(0.5 + v / me.valueStep) * me.valueStep;\r
 155                         me.setValue(me, v);\r
 156                 }\r
 157                 else\r
 158                         me.setValue(me, me.previousValue);\r
 159         }\r
 160         return 1;\r
 161 }\r
 162 float mousePressSlider(entity me, vector pos)\r
 163 {\r
 164         float controlCenter;\r
 165         if(me.disabled)\r
 166                 return 0;\r
 167         if(pos_x < 0) return 0;\r
 168         if(pos_y < 0) return 0;\r
 169         if(pos_x >= 1 - me.textSpace) return 0;\r
 170         if(pos_y >= 1) return 0;\r
 171         controlCenter = (me.value - me.valueMin) / (me.valueMax - me.valueMin) * (1 - me.textSpace - me.controlWidth) + 0.5 * me.controlWidth;\r
 172         if(fabs(pos_x - controlCenter) <= 0.5 * me.controlWidth)\r
 173         {\r
 174                 me.pressed = 1;\r
 175                 me.pressOffset = pos_x - controlCenter;\r
 176                 me.previousValue = me.value;\r
 177                 //me.mouseDrag(me, pos);\r
 178         }\r
 179         else\r
 180         {\r
 181                 float clickValue, pageValue, inRange;\r
 182                 clickValue = median(0, (pos_x - me.pressOffset - 0.5 * me.controlWidth) / (1 - me.textSpace - me.controlWidth), 1) * (me.valueMax - me.valueMin) + me.valueMin;\r
 183                 inRange = (almost_in_bounds(me.valueMin, me.value, me.valueMax));\r
 184                 if(pos_x < controlCenter)\r
 185                 {\r
 186                         pageValue = me.value - me.valuePageStep;\r
 187                         if(me.valueStep)\r
 188                                 clickValue = floor(clickValue / me.valueStep) * me.valueStep;\r
 189                         pageValue = max(pageValue, clickValue);\r
 190                         if(inRange)\r
 191                                 me.setValue(me, median(me.valueMin, pageValue, me.valueMax));\r
 192                         else\r
 193                                 me.setValue(me, me.valueMax);\r
 194                 }\r
 195                 else\r
 196                 {\r
 197                         pageValue = me.value + me.valuePageStep;\r
 198                         if(me.valueStep)\r
 199                                 clickValue = ceil(clickValue / me.valueStep) * me.valueStep;\r
 200                         pageValue = min(pageValue, clickValue);\r
 201                         if(inRange)\r
 202                                 me.setValue(me, median(me.valueMin, pageValue, me.valueMax));\r
 203                         else\r
 204                                 me.setValue(me, me.valueMax);\r
 205                 }\r
 206                 if(pageValue == clickValue)\r
 207                 {\r
 208                         controlCenter = (me.value - me.valueMin) / (me.valueMax - me.valueMin) * (1 - me.textSpace - me.controlWidth) + 0.5 * me.controlWidth;\r
 209                         me.pressed = 1;\r
 210                         me.pressOffset = pos_x - controlCenter;\r
 211                         me.previousValue = me.value;\r
 212                         //me.mouseDrag(me, pos);\r
 213                 }\r
 214         }\r
 215         if(cvar("menu_sounds"))\r
 216                 localsound("sound/misc/menu2.wav");\r
 217         return 1;\r
 218 }\r
 219 float mouseReleaseSlider(entity me, vector pos)\r
 220 {\r
 221         me.pressed = 0;\r
 222         if(me.disabled)\r
 223                 return 0;\r
 224         return 1;\r
 225 }\r
 226 void showNotifySlider(entity me)\r
 227 {\r
 228         me.focusable = !me.disabled;\r
 229 }\r
 230 void drawSlider(entity me)\r
 231 {\r
 232         float controlLeft;\r
 233         float save;\r
 234         me.focusable = !me.disabled;\r
 235         save = draw_alpha;\r
 236         if(me.disabled)\r
 237                 draw_alpha *= me.disabledAlpha;\r
 238         draw_ButtonPicture('0 0 0', strcat(me.src, "_s"), eX * (1 - me.textSpace) + eY, me.color2, 1);\r
 239         if(almost_in_bounds(me.valueMin, me.value, me.valueMax))\r
 240         {\r
 241                 controlLeft = (me.value - me.valueMin) / (me.valueMax - me.valueMin) * (1 - me.textSpace - me.controlWidth);\r
 242                 if(me.disabled)\r
 243                         draw_Picture(eX * controlLeft, strcat(me.src, "_d"), eX * me.controlWidth + eY, me.colorD, 1);\r
 244                 else if(me.pressed)\r
 245                         draw_Picture(eX * controlLeft, strcat(me.src, "_c"), eX * me.controlWidth + eY, me.colorC, 1);\r
 246                 else if(me.focused)\r
 247                         draw_Picture(eX * controlLeft, strcat(me.src, "_f"), eX * me.controlWidth + eY, me.colorF, 1);\r
 248                 else\r
 249                         draw_Picture(eX * controlLeft, strcat(me.src, "_n"), eX * me.controlWidth + eY, me.color, 1);\r
 250         }\r
 251         me.setText(me, me.valueToText(me, me.value));\r
 252         draw_alpha = save;\r
 253         drawLabel(me);\r
 254         me.text = string_null; // TEMPSTRING!\r
 255 }\r
 256 #endif