Artes-s

Snow_Man_by_Artes

Dec 30th, 2015
509
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.08 KB | None | 0 0
  1. @name Snow_Man_by_Artes
  2. @persist [O E Base]:entity Just N Table:table
  3. @model models/props_c17/oildrum001.mdl
  4. interval(100)
  5. if(first()){
  6. noDuplications()
  7. setName("Снеговик от Artes'a")
  8. E=entity()
  9. O=owner()
  10. E:setAlpha(0)
  11. List = "debug/debugdrawflat"
  12. Base = holoCreate(0,E:toWorld(vec(0,0,5)),vec(0.001),E:toWorld(ang(0,0,0)),vec(255),"cube") holoParent(0,E)
  13. Table:pushArray(array(Base:toWorld(vec(0,0,-9)),vec(8,8,1),Base:toWorld(ang(0,0,0)),vec(240),"icosphere3","debug/debugdrawflat"))
  14. for(I=1,3){
  15. Table:pushArray(array(Base:toWorld(vec(0,0,-5+20*I)),vec(4-I/1.5),Base:toWorld(ang(0,0,0)),vec(255-I*2),"icosphere3",List))
  16. }
  17. #Pygovki
  18. Table:pushArray(array(Base:toWorld(vec(0,-19,20)),vec(0.15),Base:toWorld(ang(0,0,0)),vec(50),"icosphere3"))
  19. Table:pushArray(array(Base:toWorld(vec(0,-14.5,30)),vec(0.16),Base:toWorld(ang(0,0,0)),vec(50),"icosphere3"))
  20. Table:pushArray(array(Base:toWorld(vec(0,-14.5,40)),vec(0.17),Base:toWorld(ang(0,0,0)),vec(50),"icosphere3"))
  21. #Ylibka
  22. Table:pushArray(array(Base:toWorld(vec(-6,-9,52)),vec(0.2),Base:toWorld(ang(0,0,0)),vec(25),"icosphere3"))
  23. Table:pushArray(array(Base:toWorld(vec(-3,-10,50.2)),vec(0.2),Base:toWorld(ang(0,0,0)),vec(25),"icosphere3"))
  24. Table:pushArray(array(Base:toWorld(vec(0,-10,50)),vec(0.2),Base:toWorld(ang(0,0,0)),vec(25),"icosphere3"))
  25. Table:pushArray(array(Base:toWorld(vec(3,-10,50.5)),vec(0.2),Base:toWorld(ang(0,0,0)),vec(25),"icosphere3"))
  26. Table:pushArray(array(Base:toWorld(vec(6,-9,52)),vec(0.2),Base:toWorld(ang(0,0,0)),vec(25),"icosphere3"))
  27. #Nos
  28. Table:pushArray(array(Base:toWorld(vec(0,-15,55)),vec(0.4,0.4,1),Base:toWorld(ang(0,0,90)),vec(255,0,0),"cone"))
  29. #Glaza
  30. Table:pushArray(array(Base:toWorld(vec(5,-9,58)),vec(0.4),Base:toWorld(ang(0,0,0)),vec(25),"icosphere3"))
  31. Table:pushArray(array(Base:toWorld(vec(-5,-9,58)),vec(0.4),Base:toWorld(ang(0,0,0)),vec(25),"icosphere3"))
  32. #Brovi
  33. Table:pushArray(array(Base:toWorld(vec(-5,-9,61)),vec(0.05,0.05,0.5),Base:toWorld(ang(0,90,80)),vec(25),"cube"))
  34. Table:pushArray(array(Base:toWorld(vec(5,-9,61)),vec(0.05,0.05,0.5),Base:toWorld(ang(0,90,100)),vec(25),"cube"))
  35. #Chelinder
  36. Table:pushArray(array(Base:toWorld(vec(0,0,63)),vec(2,2,0.2),Base:toWorld(ang(0,0,0)),vec(25),"cylinder"))
  37. Table:pushArray(array(Base:toWorld(vec(0,0,63)),vec(1.5),Base:toWorld(ang(0,0,0)),vec(25),"cylinder"))
  38. #Ruki
  39. Table:pushArray(array(Base:toWorld(vec(0,0,40)),vec(0.2,0.2,2.5),Base:toWorld(ang(0,90,90)),vec(25),"cube"))
  40. Table:pushArray(array(Base:toWorld(vec(-21,0,31)),vec(0.2,0.2,2),Base:toWorld(ang(0,90,40)),vec(25),"cube"))
  41. Table:pushArray(array(Base:toWorld(vec(21,0,31)),vec(0.2,0.2,2),Base:toWorld(ang(0,90,140)),vec(25),"cube"))
  42. }
  43. if(Table:count() > N) {
  44. while(holoCanCreate() & perf(1)) {
  45. N++
  46. local Holo = Table[N, array]
  47. holoCreate(N, Holo:vector(1), Holo:vector(2), Holo:angle(3), Holo:vector(4), Holo:string(5))
  48. holoMaterial(N, Holo:string(6))
  49. holoParent(N, Base)
  50. }
  51. } else { }
Add Comment
Please, Sign In to add comment