RaZgRiZ

bind ref wip

Sep 14th, 2019
191
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 14.29 KB | None | 0 0
  1.  
  2. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  3. //  Master Scroll Controller                                                                                //
  4. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  5.  
  6. msc_multiplier = 8
  7.  
  8. msc_delta = [
  9.     cond $editing [
  10.         if $.followplayer [ follownext $arg1 ] [
  11.             cond [&& $enthavesel [||iskeyheld "1" "2" "3" "4" "5"]] [
  12.                 loop i 5 [ if (iskeyheld (+ $i 1)) [ entattrdelta $i $arg1 ] ]
  13.             ] [iskeyheld "G"] [                                                       // Change grid power
  14.                 gridpower (max 0 (min 12 (+ $arg1 $gridpower) (- $mapscale 1)))
  15.             ] [iskeyheld "R"] [                                                       // Selection rotate / blend brush rotate
  16.                 if $blendpaintmode [ rotateblendbrush $arg1 ] [ editrotate $arg1 ]
  17.             ] [iskeyheld "Q"] [                                                       // Push corner closest to the cursor
  18.                 editfacewsel $arg1 2
  19.             ] [iskeyheld "F"] [                                                       // Push selected face/corners
  20.                 editfacewsel $arg1 0
  21.             ] [iskeyheld "Y"] [                                                       // Change MRU textures
  22.                 edittex $arg1
  23.             ] [iskeyheld "Z"] [                                                       // Change floatspeed
  24.                 floatspeed (clampf (+ $floatspeed (* 50 $arg1)) 50 5000)
  25.             ] [&& $hmapedit [iskeyheld "H"]] [                                        // Change heightmap brush
  26.                 selecthbrush $arg1
  27.             ] $blendpaintmode [                                                       // Change blendmap mode / blend brush
  28.                 if (iskeyheld "B") [
  29.                     arg1 = (+ $blendpaintmode $arg1)
  30.                     cond [< $arg1 1] [ blendpaintmode = 5 ] [> $arg1 5] [ blendpaintmode = 1 ] [ blendpaintmode $arg1 ]
  31.                 ] [ nextblendbrush $arg1 ]
  32.             ] [ editfacewsel $arg1 1 ]
  33.         ]
  34.     ] $mainmenu [
  35.         // NOTHING HERE YET
  36.     ] [isspectator $getclientnum] [
  37.         if $thirdperson [
  38.             loop i 10 [ sleep (* $i 10) [
  39.                 thirdpersondistance (clampf (+f $thirdpersondistance (*f $arg1 0.25)) 10 50)
  40.             ] ]
  41.         ] [ nextfollow $arg1 ]
  42.     ] [ nextweapon $arg1 ]
  43. ]
  44.  
  45.  
  46.  
  47. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  48. //  Game Binds                                                                                              //
  49. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  50.  
  51. // Mouse Keys
  52.     defnormkey "MOUSELEFT"      [ shoot ]
  53.     defnormkey "MOUSEMIDDLE"    [ melee ]
  54.     defnormkey "MOUSERIGHT"     [ dozoom ]
  55.     defnormkey "MOUSEWHEELUP"   [ msc_delta  1 ]
  56.     defnormkey "MOUSEWHEELDOWN" [ msc_delta -1 ]
  57.  
  58.  
  59. // Function Keys
  60.     defnormkey "F1"  [ toggleui "cci" ]                // Client Control Interface
  61.     defnormkey "F5"  [                                 // Savemap
  62.         if (! $mapname) [ toggleui "dialog_savemap" ] [
  63.             if (iskeyheld "LCTRL") [ toggleui "dialog_savemap" ] savemap
  64.         ]
  65.     ]
  66.     defnormkey "F6"  [ toggleui "map_browser" ]        // Map List
  67.     defnormkey "F9"  [ thirdperson (! $thirdperson) ]  // Toggle thirdperson view
  68.     defnormkey "F11" [ togglefullcon ]
  69.     defnormkey "F12" [ screenshot ]
  70.  
  71. // Special Keys (left)
  72.     defnormkey "ESCAPE"   [ togglemainmenu ]
  73.     defnormkey "TAB"      [ if $mainmenu [ showui "servers" ] [ holdui "scoreboard" ] ]
  74.     defnormkey "LSHIFT"   [ crouch ]
  75.     defnormkey "SPACE"    [ jump ]
  76.     defnormkey "MENU"     [ togglemainmenu ]
  77.  
  78. // Special Keys (right)
  79.     defnormkey "PAUSE"     [ paused (! $paused) ]
  80.     defnormkey "PAGEUP"    [ if $fullconsole [ conskip 5 ] addbot ]
  81.     defnormkey "PAGEDOWN"  [ if $fullconsole [ conskip -5 ] delbot ]
  82.  
  83.     defnormkey "UP"        [ forward ]
  84.     defnormkey "LEFT"      [ left ]
  85.     defnormkey "DOWN"      [ backward ]
  86.     defnormkey "RIGHT"     [ right ]
  87.  
  88. // Punctuation Keys
  89.     defnormkey "BACKQUOTE"    [ chatexec ]
  90.  
  91.     defnormkey "LEFTBRACKET"  [
  92.         if (|| [m_edit $getmode] [! $isconnected]) [ showwaypoints (! $showwaypoints) ]
  93.     ]
  94.     defnormkey "RIGHTBRACKET" [
  95.         if (|| [m_edit $getmode] [! $isconnected]) [ dropwaypoints (! $dropwaypoints) ]
  96.     ]
  97.     defnormkey "SLASH"        [ chatexec ]
  98.  
  99. // Alphanumerical Keys
  100.     defnormkey "1" [ setweapon "rail"  ]
  101.     defnormkey "2" [ setweapon "pulse" ]
  102.     defnormkey "A" [ left ]
  103.     defnormkey "D" [ right ]
  104.     defnormkey "E" [                     // Toggle Edit mode / teleport to location
  105.         if (m_edit $getmode) [
  106.             if (iskeyheld "LCTRL") [
  107.                 gridpower 0// ; hidehud 1
  108.                 edittoggle
  109.                 sleep 1 [
  110.                     gotosel ; edittoggle
  111.                     gridpower @@gridpower
  112.                     //hidehud @@hidehud
  113.                 ]
  114.             ] [ edittoggle ]
  115.         ]
  116.     ]
  117.     defnormkey "F" [ melee ]
  118.     defnormkey "J" [ taunt ]
  119.     defnormkey "P" [ if $mainmenu [] [ toggleui "postfx" ] ]
  120.     defnormkey "Q" [ if (m_edit $getmode) [ edittoggle ; followplayer ] ]
  121.     defnormkey "R" [ dropflag ]
  122.     defnormkey "S" [ backward ]
  123.     defnormkey "T" [ chatsay ]
  124.     defnormkey "W" [ forward ]
  125.     defnormkey "Y" [ chatteamsay ]
  126.     defnormkey "Z" [ if (iskeyheld "LCTRL") [ history 0 ] ] // Repeat last saycommand
  127.  
  128.  
  129.  
  130.  
  131. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  132. //  Edit Binds                                                                                              //
  133. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  134.  
  135. // Mouse Keys
  136.     defeditkey "MOUSELEFT"      [ if $blendpaintmode paintblendmap editdrag ]
  137.     defeditkey "MOUSEMIDDLE"    [ if (iskeyheld "Z") [ floatspeed 200 ] selcorners ]
  138.     defeditkey "MOUSERIGHT"     [ if $blendpaintmode rotateblendbrush editextend ]
  139.     defeditkey "MOUSEBACK"      [ undo ]
  140.     defeditkey "MOUSEFORWARD"   [ redo ]
  141.     defeditkey "MOUSEWHEELUP"   [ msc_delta  1 ]
  142.     defeditkey "MOUSEWHEELDOWN" [ msc_delta -1 ]
  143.  
  144.  
  145. // Function Keys
  146.     defeditkey "F1"  [ toggleui "cci" ]                // Client Control Interface
  147.     defeditkey "F2"  [ toggleui "texture_browser" ]    // Texture List
  148.     defeditkey "F3"  [ toggleui "mapmodel_browser" ]   // Add Mapmodel
  149.     defeditkey "F4"  [ toggleui "material" ]           // Edit Material
  150.     defeditkey "F5"  [                                 // Savemap
  151.         if (! $mapname) [ toggleui "dialog_savemap" ] [
  152.             if (iskeyheld "LCTRL") [ toggleui "dialog_savemap" ] savemap
  153.         ]
  154.     ]
  155.     defeditkey "F6"  [ toggleui "map_browser" ]        // Map List
  156.     defeditkey "F7"  [ toggleui "env_settings" ]       // Environment Settings
  157.     defeditkey "F8"  [ toggleui "geo_prefab" ]         // World Geometry Prefab
  158.     defeditkey "F9"  [ thirdperson (! $thirdperson) ]  // Toggle thirdperson view
  159.     defeditkey "F11" [ togglefullcon ]
  160.     defeditkey "F12" [ screenshot ]
  161.  
  162.  
  163. // Special Keys (left)
  164.     defeditkey "ESCAPE"   [ togglemainmenu ]
  165.     defeditkey "TAB"      [ if (uivisible "main") [ showui "server_browser" ] [ holdui "scoreboard" ] ]
  166.     defeditkey "LSHIFT"   [ editcut ]
  167.     defeditkey "LCTRL"    [ if $enthavesel [ entcancel]  [ entselect insel ] ]
  168.     defeditkey "SPACE"    [ cancelsel ]
  169.     defeditkey "MENU"     [ togglemainmenu ]
  170.     defeditkey "RCTRL"    [ msc_multiplier = 32 ; onrelease [ msc_multiplier = 8 ] ]
  171.  
  172. // Special Keys (right)
  173.     defeditkey "PAUSE"     [ paused (! $paused) ]
  174.     defeditkey "PAGEUP"    [
  175.         if $fullconsole [ conskip 5 ] [
  176.             if $enthavesel [ entautoview 1 ] [
  177.                 vdelta [ vscale 2 ]
  178.             ]
  179.         ]
  180.     ]
  181.     defeditkey "DELETE"    [ editdel ]
  182.     defeditkey "END"      
  183.     defeditkey "PAGEDOWN"  [
  184.         if $fullconsole [ conskip -5 ] [
  185.             if $enthavesel [ entautoview -1 ] [
  186.                 vdelta [ vscale 0.5 ]
  187.             ]
  188.         ]
  189.     ]
  190.  
  191.     defeditkey "UP"        [
  192.         if (iskeyheld "LCTRL") [
  193.             if $enthavesel [] [
  194.                 if (iskeyheld "LSHIFT") [
  195.                     vdelta [ vscroll 0 0.02 ]
  196.                 ] [
  197.                     vdelta [ voffset 0 $msc_multiplier ]
  198.                 ]
  199.             ]
  200.         ]
  201.     ]
  202.     defeditkey "LEFT"      [
  203.         if (iskeyheld "LCTRL") [
  204.             if $enthavesel [] [
  205.                 if (iskeyheld "LSHIFT") [
  206.                     vdelta [ vscroll -0.02 0 ]
  207.                 ] [
  208.                     vdelta [ voffset (- 0 $msc_multiplier) 0 ]
  209.                 ]
  210.             ]
  211.         ]
  212.     ]
  213.     defeditkey "DOWN"      [
  214.         if (iskeyheld "LCTRL") [
  215.             if $enthavesel [] [
  216.                 if (iskeyheld "LSHIFT") [
  217.                     vdelta [ vscroll 0 -0.02 ]
  218.                 ] [
  219.                     vdelta [ voffset 0 (- 0 $msc_multiplier) ]
  220.                 ]
  221.             ]
  222.         ]
  223.     ]
  224.     defeditkey "RIGHT"     [
  225.         if (iskeyheld "LCTRL") [
  226.             if $enthavesel [] [
  227.                 if (iskeyheld "LSHIFT") [
  228.                     vdelta [ vscroll 0.02 0 ]
  229.                 ] [
  230.                     vdelta [ voffset $msc_multiplier 0 ]
  231.                 ]
  232.             ]
  233.         ]
  234.     ]
  235.  
  236. // Punctuation Keys
  237.     defeditkey "BACKQUOTE" [ chatexec ]
  238.     defeditkey "MINUS"     [ outline (! $outline) ]
  239.     defeditkey "EQUALS"    [ wireframe (! $wireframe) ]
  240.     defeditkey "LEFTBRACKET"  [ showwaypoints (! $showwaypoints) ]
  241.     defeditkey "RIGHTBRACKET" [ dropwaypoints (! $dropwaypoints) ]
  242.     defeditkey "BACKSLASH"    [ nompedit (! $nompedit) ]
  243.     defeditkey "SLASH"  [ chatexec ]
  244.  
  245. // Numpad Keys
  246.     defeditkey "KP0"         [ blendpaintmode 0 ]  // Exit paint blendmap mode
  247.     defeditkey "KP1"         [ blendpaintmode 1 ]
  248.     defeditkey "KP2"         [ blendpaintmode 2 ]  // Paint
  249.     defeditkey "KP3"         [ blendpaintmode 3 ]
  250.     defeditkey "KP4"         [ blendpaintmode 4 ]
  251.     defeditkey "KP5"         [ blendpaintmode 5 ]  // Erase
  252.  
  253. // Alphanumeric Keys
  254.     defeditkey "0" [ if (uivisible "material") [ editmat "air"      ] ]
  255.     defeditkey "1" [ if (uivisible "material") [ editmat "clip"     ] ]
  256.     defeditkey "2" [ if (uivisible "material") [ editmat "noclip"   ] ]
  257.     defeditkey "3" [ if (uivisible "material") [ editmat "gameclip" ] ]
  258.     defeditkey "4" [ if (uivisible "material") [ editmat "death"    ] ]
  259.     defeditkey "5" [ if (uivisible "material") [ editmat "alpha"    ] ]
  260.     defeditkey "6" [ if (uivisible "material") [ editmat "nogi"     ] [ allfaces (! $allfaces) ] ]
  261.     defeditkey "7" [
  262.         if (uivisible "material") [
  263.             editmat (concatword "glass" $mat_glass)
  264.             mat_glass = (+ (mod $mat_glass 4) 1)
  265.         ] [ entselsnap (! $entselsnap) ]
  266.     ]
  267.     defeditkey "8" [
  268.         if (uivisible "material") [
  269.             editmat (concatword "water" $mat_water)
  270.             mat_water = (+ (mod $mat_water 4) 1)
  271.         ] [ entediting (! $entediting) ]
  272.     ]
  273.     defeditkey "9" [
  274.         if (uivisible "material") [
  275.             editmat (concatword "lava" $mat_lava)
  276.             mat_lava = (+ (mod $mat_lava 4) 1)
  277.         ] [ fullbright (! $fullbright) ]
  278.     ]
  279.  
  280.     defeditkey "A" [ left ]
  281.     defeditkey "B" [                     // Toggle blending
  282.         if (iskeyheld "LCTRL") [
  283.             blendpaintmode (! $blendpaintmode)
  284.             if $blendpaintmode [ hmapedit 0  ]
  285.             passthrough $blendpaintmode
  286.         ]
  287.     ]
  288.     defeditkey "C" [ editcopy ]          // Copy selection
  289.     defeditkey "D" [ right ]
  290.     defeditkey "E" [                     // Toggle Edit mode / teleport to location
  291.         if (iskeyheld "LCTRL") [
  292.                 gridpower 0
  293.                 sleep 0 [
  294.                     gotosel
  295.                     gridpower @@gridpower
  296.                 ]
  297.         ] edittoggle
  298.     ]
  299.     defeditkey "H" [                     // Toggle heightmapping
  300.         if (iskeyheld "LCTRL") [
  301.             hmapedit (! $hmapedit)
  302.             if $hmapedit [ blendpaintmode 0 ]
  303.             passthrough $hmapedit
  304.         ]
  305.     ]
  306.     defeditkey "I" [ redo ]
  307.     defeditkey "K" [ remip ]             // Remip geometry
  308.     defeditkey "L" [                     // Smooth out lightmaps
  309.         if (iskeyheld "LCTRL") [ calclight ; recalc ]
  310.     ]
  311.     defeditkey "M" [                     // Toggle showmat & show material UI
  312.         if (iskeyheld "LCTRL") [ .showmat (! $.showmat) ; showmat $.showmat ] [
  313.             if (! $enthavesel) [ holdui "material" ]
  314.         ]
  315.     ]
  316.     defeditkey "N" [ entselect insel ]   // Find all entities in selection
  317.     defeditkey "P" [ toggleui "postfx" ]
  318.     defeditkey "S" [ backward ]
  319.     defeditkey "T" [ chatsay ]
  320.     defeditkey "U" [ undo ; passthroughsel 0 ]
  321.     defeditkey "V" [ editpaste ]         // Paste selection
  322.     defeditkey "W" [ forward ]
  323.     defeditkey "X" [ editflip ]          // Flip selection
  324.     defeditkey "Z" [                     // Repeat last saycommand
  325.         if (iskeyheld "LCTRL") [ history 0 ]
  326.     ]
  327.  
  328.  
  329.  
  330.  
  331. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  332. //  Spectator Binds                                                                                         //
  333. //////////////////////////////////////////////////////////////////////////////////////////////////////////////
  334.  
  335. // Mouse Keys
  336.     defspeckey "MOUSELEFT"      [ nextfollow  1 ]
  337.     defspeckey "MOUSEMIDDLE"    [ follow ]
  338.     defspeckey "MOUSERIGHT"     [ nextfollow -1 ]
  339.     defspeckey "MOUSEWHEELUP"   [ msc_delta  1 ]
  340.     defspeckey "MOUSEWHEELDOWN" [ msc_delta -1 ]
  341.  
  342. // Function Keys
  343.     defspeckey "F1"  [ toggleui "cci" ]                // Client Control Interface
  344.     defspeckey "F5"  [                                     // Savemap
  345.         if (! $mapname) [ toggleui "dialog_savemap" ] [
  346.             if (iskeyheld "LCTRL") [ toggleui "dialog_savemap" ] savemap
  347.         ]
  348.     ]
  349.     defspeckey "F6"  [ toggleui "map_browser" ]        // Map List
  350.     defspeckey "F9"  [ thirdperson (? $thirdperson 0 2) ]  // Toggle thirdperson 2 view
  351.     defspeckey "F11" [ togglefullcon ]
  352.     defspeckey "F12" [ screenshot ]
  353.  
  354. // Special Keys (left)
  355.     defspeckey "ESCAPE"   [ togglemainmenu ]
  356.     defspeckey "TAB"      [ if (uivisible "main") [ showui "server_browser" ] [ holdui "scoreboard" ] ]
  357.     defspeckey "SPACE"    [ follow ]
  358.     defspeckey "MENU"     [ togglemainmenu ]
  359.  
  360. // Special Keys (right)
  361.     defspeckey "PAUSE"     [ paused (! $paused) ]
  362.     defspeckey "PAGEUP"    [ if $fullconsole [ conskip 5 ] addbot ]
  363.     defspeckey "PAGEDOWN"  [ if $fullconsole [ conskip -5 ] delbot ]
  364.  
  365.     defspeckey "UP"        [ forward ]
  366.     defspeckey "LEFT"      [ left ]
  367.     defspeckey "DOWN"      [ backward ]
  368.     defspeckey "RIGHT"     [ right ]
  369.  
  370. // Punctuation Keys
  371.     defspeckey "BACKQUOTE"    [ chatexec ]
  372.     defspeckey "LEFTBRACKET"  [
  373.         if (|| [m_edit $getmode] [! $isconnected]) [ showwaypoints (! $showwaypoints) ]
  374.     ]
  375.     defspeckey "RIGHTBRACKET" [
  376.         if (|| [m_edit $getmode] [! $isconnected]) [ dropwaypoints (! $dropwaypoints) ]
  377.     ]
  378.     defspeckey "SLASH"        [ chatexec ]
  379.  
  380. // Alphanumerical Keys
  381.     defspeckey "A" [ left ]
  382.     defspeckey "D" [ right ]
  383.     defspeckey "K" [                     // Remip geometry
  384.         if (m_edit $getmode) [ remip ]
  385.     ]
  386.     defspeckey "L" [                     // Toggle fullbright / calclight
  387.         if (m_edit $getmode) [
  388.             if (iskeyheld "LCTRL") [ fullbright (! $fullbright) ] [
  389.                 calclight ; recalc
  390.             ]
  391.         ]
  392.     ]
  393.     defspeckey "P" [ toggleui "postfx" ]
  394.     defspeckey "S" [ backward ]
  395.     defspeckey "T" [ chatsay ]
  396.     defspeckey "W" [ forward ]
  397.     defspeckey "Y" [ chatsayteam ]
  398.     defspeckey "Z" [ if (iskeyheld "LCTRL") [ history 0 ] ] // Repeat last saycommand
Add Comment
Please, Sign In to add comment