Advertisement
Guest User

Untitled

a guest
Jul 25th, 2014
213
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.62 KB | None | 0 0
  1. @name EGP AutoFading Door
  2. @inputs EGP:wirelink
  3. @outputs Door
  4. @persist Players:array D Z
  5. @trigger
  6.  
  7. interval(600)
  8.  
  9. if (first()|duped()|changed(EGP))
  10. {
  11. runOnChat(1)
  12.  
  13.  
  14. # Distance
  15. D = 60
  16. Door = 0
  17.  
  18. EGP:egpClear()
  19.  
  20. # Hintergrund
  21. EGP:egpBoxOutline(2,vec2(256,256),vec2(512,512))
  22. EGP:egpColor(2,vec(150,0,50))
  23. EGP:egpSize(2,5)
  24.  
  25. # Title
  26. EGP:egpText(3,"Auto Door Opener",vec2(10,15))
  27. EGP:egpFont(3,"Arial")
  28.  
  29. EGP:egpText(5,"Spieler Erlaubt:",vec2(10,35))
  30. EGP:egpFont(5,"Arial")
  31.  
  32. EGP:egpText(4,"Made By Thomas Gerter",vec2(10,480))
  33. EGP:egpFont(4,"Arial")
  34.  
  35.  
  36. print("--- [Auto Door Opener] ---")
  37. print("Hinzufuegen: -add <Spielername>")
  38. print("Entfernen: -rem <Spielername>")
  39. print("Made by Thomas Gerter")
  40. }
  41.  
  42. if (changed(Players:count()) || changed(Door))
  43. {
  44.  
  45. EGP:egpClear()
  46. EGP:egpBoxOutline(2,vec2(256,256),vec2(512,512))
  47. EGP:egpColor(2,vec(150,0,50))
  48. EGP:egpSize(2,5)
  49.  
  50. EGP:egpText(3,"Auto Door Opener",vec2(10,15))
  51. EGP:egpFont(3,"Arial")
  52.  
  53. EGP:egpText(5,"Spieler Erlaubt:",vec2(10,35))
  54. EGP:egpFont(5,"Arial")
  55.  
  56. EGP:egpText(4,"Made By Thomas Gerter",vec2(10,480))
  57. EGP:egpFont(4,"Arial")
  58. if(Door == 1)
  59. {
  60. soundPlay(1,1,"/hl1/fvox/acquired.wav")
  61. EGP:egpText(3,"Auto Door Opener - OPEN",vec2(10,15))
  62.  
  63. }
  64. else
  65. {
  66. EGP:egpText(3,"Auto Door Opener - CLOSED",vec2(10,15))
  67.  
  68. }
  69.  
  70.  
  71. for (X=1,Players:count())
  72. {
  73. C1 = X*10+1
  74. PL = Players[X,entity]
  75. if (PL:isPlayer())
  76. {
  77.  
  78.  
  79. EGP:egpText(C1,"" + PL:name() + " - " + teamName(PL:team()),vec2(15,35+19*X))
  80. EGP:egpFont(C1,"Arial")
  81. EGP:egpColor(C1,teamColor(PL:team()))
  82. EGP:egpSize(C1,24)
  83. EGP:egpAlpha(C1,255)
  84.  
  85.  
  86. EGP:egpText(4,"Made By Thomas Gerter Spieler Erlaubt: " + Players:count(),vec2(10,480))
  87.  
  88. }
  89. else
  90. {
  91. print("--- [Auto Door Opener] ---")
  92. print("Entferne Offline Spieler")
  93. EGP:egpAlpha(C1,0)
  94. EGP:egpRemove(C1)
  95. Players:remove(X)
  96.  
  97. }
  98. }
  99. }
  100.  
  101. if (clk("reset")) { Door = 0 }
  102.  
  103.  
  104. if (chatClk(owner()))
  105. {
  106.  
  107. Str = owner():lastSaid():explode(" ")
  108.  
  109.  
  110. if(Str[1,string]=="-add")
  111. {
  112. TP = findPlayerByName(Str[2,string])
  113. if(TP:isPlayer())
  114. {
  115. print("--- [Auto Door Opener] ---")
  116. print("Added: " + TP:name())
  117. Players:pushEntity(TP)
  118. soundPlay(2,1,"/hl1/fvox/activated.wav")
  119. }
  120.  
  121. }
  122.  
  123.  
  124. if(Str[1,string]=="-rem")
  125. {
  126. TP = findPlayerByName(Str[2,string])
  127. if(TP:isPlayer())
  128. {
  129. while(Z < 20)
  130. {
  131. if(TP == Players[Z,entity])
  132. {
  133. print("--- [Auto Door Opener] ---")
  134. print("Removed: " + TP:name())
  135. Players:remove(Z)
  136. soundPlay(2,1,"/hl1/fvox/deactivated.wav")
  137. EGP:egpText(4,"Made By Thomas Gerter Spieler Erlaubt: " + Players:count(),vec2(10,480))
  138.  
  139. }
  140. Z++
  141. }
  142. }
  143. Z = 0
  144. }
  145. }
  146.  
  147.  
  148. for (X=1,Players:count())
  149. {
  150. PL = Players[X,entity]
  151. if (round(((entity():pos() - PL:pos()):length()) < D))
  152. {
  153. Door = 1
  154.  
  155.  
  156. timer("reset",100)
  157. }
  158. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement