Advertisement
Guest User

Untitled

a guest
Oct 22nd, 2016
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.61 KB | None | 0 0
  1. @name Holo-Whip by DogeKing
  2. @persist T
  3. @model models/hunter/plates/plate8x8.mdl
  4. #runOnTick(1)
  5. # i got dis doop from dogeking, most credits go to him
  6. interval(20)
  7. Kinks = 90
  8. KLength = 15
  9. Thick = 100
  10. Bend = 30
  11. entity():setPos(owner():pos())
  12. if(first()) {
  13. entity():propNotSolid(1)
  14. #print(entity():boxSize():toString())
  15. for(I=1,30) {
  16.  
  17. holoCreate(I)
  18. holoModel(I,"hqcylinder2")
  19. holoScale(I,vec(Thick,Thick,KLength))
  20. holoColor(I,hsv2rgb((I/Kinks)*360,1,1))
  21. #A:pushEntity(holoEntity(I))
  22. if(holoEntity(I)){
  23. T++
  24. } else { break }
  25. }
  26. }
  27.  
  28. if(T<Kinks) {
  29. #timer("c",1000)
  30. #if(clk("c"))
  31. #{
  32. T++
  33. holoCreate(T)
  34. holoModel(T,"hqcylinder2")
  35. holoScale(T,vec(Thick,Thick,KLength))
  36. holoColor(T,hsv2rgb((T/Kinks)*360,1,1))
  37. if(!holoEntity(T)) {
  38. T--
  39. }
  40. }
  41.  
  42. for(I=1,Kinks) {
  43. if(I==1) {
  44. holoPos(I,entity():pos()+entity():up()*6)
  45. Ang = (holoEntity(I+1):pos()-entity():pos()):toAngle()+ang(90,0,0)
  46. holoAng(I,Ang)
  47. } elseif(I==Kinks) {
  48. holoPos(I,holoEntity(I-1):pos()+holoEntity(I-1):up()*KLength*12)
  49. Ang = (holoEntity(I-1):pos()-holoEntity(I):pos()):toAngle()+ang(90,0,0)
  50. holoAng(I,Ang)
  51. } else {
  52. holoPos(I,holoEntity(I-1):pos()+holoEntity(I-1):up()*KLength*12)
  53. Ang = (holoEntity(I+1):pos()-holoEntity(I-1):pos()):toAngle()+ang(90,0,0)
  54. holoAng(I,Ang)
  55. }
  56.  
  57. #P = holoEntity(I):angles():pitch()/360*255
  58. #Y = holoEntity(I):angles():yaw()/360*255
  59. #R = holoEntity(I):angles():roll()/360*255
  60.  
  61. #holoColor(I,vec(P,Y,R))
  62. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement