Advertisement
Guest User

Minge Tool

a guest
Apr 21st, 2017
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.05 KB | None | 0 0
  1. @name Minge blind
  2. @persist Player:entity Sounds:array HoloIndex
  3. if (first()) {
  4. function number blind(Player:entity){
  5. Start = randint(1,500)
  6. Ang = Player:angles()
  7. for (X=Start,Start+3){
  8. holoCreate(X)
  9. holoModel(X,"hq_hdome_thin")
  10. holoPos(X,entity():pos())
  11. holoMaterial(X,"debug/env_cubemap_model")
  12. holoPos(X,Player:pos()+vec(0,0,40))
  13. holoAng(X,Ang)
  14. holoParent(X,Player)
  15. }
  16. holoScale(Start,vec(8,8,8))
  17. holoScale(Start+1,vec(8,8,8))
  18. holoAng(Start+1,Ang+ang(vec(180,0,0)))
  19.  
  20. holoScale(Start+2,vec(15,15,15))
  21. holoScale(Start+3,vec(15,15,15))
  22. holoAng(Start+3,Ang+ang(vec(180,0,0)))
  23.  
  24. return Start
  25. }
  26. function unblind(Start){
  27. for (X=Start,Start+3){
  28. holoDelete(X)
  29. }
  30. }
  31.  
  32. runOnChat(1)
  33. }
  34. if (chatClk(owner())) {
  35. M = lastSaid():explode(" ") #Split what you said into an array
  36. if (M[1,string] == ".blind") { #If you said ".blind"
  37. hideChat(1) #Hide your message
  38. if (M[2,string]) {
  39. Ply = findPlayerByName(M[2,string]) #find the player..
  40. if (Ply) {
  41.  
  42. Sounds = array("npc/fast_zombie/fz_scream1.wav","npc/fast_zombie/fz_frenzy1.wav","npc/fast_zombie/leap1.wav")
  43.  
  44. Player = Ply
  45.  
  46. HoloIndex = blind(Ply)
  47.  
  48. holoEntity(HoloIndex):soundPlay(0,0,"hahayoufool.wav")
  49.  
  50. dsJoinGroup("Security")
  51. dsSetScope(2)
  52.  
  53. timer("MingeSound",2000)
  54. }else {print("Player '" + M[2,string] + "' not found.")}
  55. } else {print("You must enter a name.")}
  56. } elseif (M[1,string] == ".unblind") { #If you said ".unblind"
  57. hideChat(1)
  58. unblind(HoloIndex)
  59. print("Unblinded.")
  60. }
  61. }
  62. if (clk("MingeSound")){
  63. soundPurge()
  64. Sound = Sounds[randint(1,Sounds:count()),string]
  65. Duration = soundDuration(Sound)
  66. holoEntity(HoloIndex):soundPlay(0,0,Sound)
  67. if (Player:lastSaid()=="42"){unblind(HoloIndex)}
  68. elseif (Duration!=60){
  69. timer("MingeSound",Duration*1000)
  70. }
  71. else{
  72. timer("MingeSound",3000)
  73. }
  74. }
  75.  
  76. runOnChat(1)
  77. if (dsClk("KillAll")){
  78. unblind(HoloIndex)
  79. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement