Callexpa

Untitled

Nov 9th, 2017
183
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.09 KB | None | 0 0
  1. local antispam = false
  2. local time = 1
  3.  
  4.  
  5. local isChatOpen = false
  6.  
  7. hook.Add( "HUDPaint", "open_Emotes", function()
  8. if vgui.CursorVisible() then return end
  9.  
  10.  
  11. if input.IsKeyDown(KEY_G) and antispam == false then
  12. antispam = false
  13. toggle = draw.DrawText( "|| Wähle eine Aktion!", "TargetID", ScrW() * 0.1, ScrH() * 0.25, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT)
  14. toggle = draw.DrawText( "|| 1 - Winken", "TargetID", ScrW() * 0.1, ScrH() * 0.265, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT)
  15. toggle = draw.DrawText( "|| 2 - Lachen", "TargetID", ScrW() * 0.1, ScrH() * 0.28, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT)
  16. toggle = draw.DrawText( "|| 3 - Zustimmen", "TargetID", ScrW() * 0.1, ScrH() * 0.295, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT)
  17. toggle = draw.DrawText( "|| 4 - Ablehnen", "TargetID", ScrW() * 0.1, ScrH() * 0.31, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT)
  18. toggle = draw.DrawText( "|| 5 - Herbeiwinken", "TargetID", ScrW() * 0.1, ScrH() * 0.325, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT)
  19. toggle = draw.DrawText( "'G' gedrückt halten und Taste des Emotes drücken", "TargetID", ScrW() * 0.07, ScrH() * 0.34, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT)
  20. end
  21.  
  22.  
  23.  
  24. if input.IsKeyDown(KEY_1) and antispam == false then
  25. antispam = true
  26. LocalPlayer():ConCommand( "_DarkRP_DoAnimation 1615", Winken)
  27. end
  28.  
  29. if input.IsKeyDown(KEY_2) and antispam == false then
  30. antispam = true
  31. LocalPlayer():ConCommand( "_DarkRP_DoAnimation 1618", Lachen)
  32. end
  33.  
  34. if input.IsKeyDown(KEY_3) and antispam == false then
  35. antispam = true
  36. LocalPlayer():ConCommand( "_DarkRP_DoAnimation 1610", Zustimmen)
  37. end
  38.  
  39. if input.IsKeyDown(KEY_4) and antispam == false then
  40. antispam = true
  41. LocalPlayer():ConCommand( "_DarkRP_DoAnimation 1613", Ablehnen)
  42. end
  43.  
  44. if input.IsKeyDown(KEY_5) and antispam == false then
  45. antispam = true
  46. LocalPlayer():ConCommand( "_DarkRP_DoAnimation 1611", Herbeiwinken)
  47. end
  48.  
  49. timer.Simple(time, function()
  50. antispam = false
  51. end)
  52.  
  53. end)
Advertisement
Add Comment
Please, Sign In to add comment