ANSITIVE [source code]

local memrec = getAddressList().getMemoryRecordByDescription

function reopenProcessThreadFunc(thread, processName)
  thread.name = '"reopenProcessThread"'

  while true do
    if readInteger(processName)==nil then
      if openProcess(processName) then
      autoAssemble[[
Growtopia.exe+13850D:
db 90 90
      ]]
      UDF1.CELabel46.Caption = "Injected"
      UDF1.CELabel46.Font.Color = 0x0000FF80
      else
      UDF1.CELabel46.Caption = "Not Injected"
      UDF1.CELabel46.Font.Color = 0x000000FE
end
end
sleep(100)
end
end
createNativeThread(reopenProcessThreadFunc,"Growtopia.exe")
function antiTaskmanager(thread, processName)
  thread.name = '"reopenProcessThread"'

  while true do
    if readInteger(processName)==nil then
      if openProcess(processName) then
      closeCE()
   end
end
end
end
local i = 0
local rainbowredhex = "FF"
local rainbowbluehex = "00"
local rainbowgreenhex = "00"
local transparency = "FF"
function opengt(thread, pname)
  thread.name = "opengt"

  while true do
    if readInteger(pname) == nil then
      if openProcess(pname) then
      autoAssemble[[
      Growtopia.exe+13850D:
      db 90 90
      ]]
      end
    end
    sleep(1000)
  end
end
function RainbowTimer(sender)
  --first
  if i < 256 and i > -1 then
    i = i+5
    if i < 16 then
      rainbowgreenhex = ("0"..(string.format("%X", i)))
    else
      rainbowgreenhex = (string.format("%X", i))
      if i == 255 then
        i = 755
      end
    end
  end

  --second
  if i > 499 and i < 756 then
    i = i-5
    if i < 516 then
      rainbowredhex = ("0"..(string.format("%X", i-500)))
      if i == 500 then
        i = 1000
      end
    else
      rainbowredhex = (string.format("%X", i-500))
    end
  end

  --third
  if i > 999 and i < 1256 then
    i = i+5
    if i < 1016 then
      rainbowbluehex = ("0"..(string.format("%X", i-1000)))
    else
      rainbowbluehex = (string.format("%X", i-1000))
      if i == 1255 then
        i = 2255
      end
    end
  end

  --fourth
  if i > 1999 and i < 2256 then
    i = i-5
    if i < 2016 then
      rainbowgreenhex = ("0"..(string.format("%X", i-2000)))
      if i == 2000 then
        i = 3000
      end
    else
      rainbowgreenhex = (string.format("%X", i-2000))
    end
  end

  --fifth
  if i > 2999 and i < 3256 then
    i = i+5
    if i < 3016 then
      rainbowredhex = ("0"..(string.format("%X", i-3000)))
    else
      rainbowredhex = (string.format("%X", i-3000))
      if i == 3255 then
        i = 4255
      end
    end
  end

  --sixth
  if i > 3999 and i < 4256 then
    i = i-5
    if i < 4016 then
      rainbowbluehex = ("0"..(string.format("%X", i-4000)))
      if i == 4000 then
        i = 0
      end
    else
      rainbowbluehex = (string.format("%X", i-4000))
    end
  end
  UDF1.CELabel29.Font.Color = ("0x00"..rainbowbluehex..rainbowgreenhex..rainbowredhex)
  UDF1.CELabel89.Font.Color = ("0x00"..rainbowbluehex..rainbowgreenhex..rainbowredhex)
  UDF1.CELabel90.Font.Color = ("0x00"..rainbowbluehex..rainbowgreenhex..rainbowredhex)
  UDF1.CELabel91.Font.Color = ("0x00"..rainbowbluehex..rainbowgreenhex..rainbowredhex)
  if UDF1.CECheckbox28.Checked == true then
  if UDF1.CECheckbox29.Checked == true then
  memrec("Skin").Value = (rainbowbluehex..rainbowgreenhex..rainbowredhex..transparency)
  UDF1.CEPanel21.Color = ("0x00"..rainbowbluehex..rainbowgreenhex..rainbowredhex)
 end
 end
 end
local colors = {"1","2","3","4","5","6","7","8","9","b","w","p","o","^","$","#","@","!","q","e","r","t","a","s"}
local number = 1
local timer = createTimer(getMainForm())
timer.Interval = 250
timer.OnTimer = function(timer)
memrec("isactive").Value = 256
memrec("xd").Value = "`"..colors[number].."\n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n \n   ANSITIVE FOR GT V2.85"
number = number+1
if number > 24 then number = 1
end
end
function FormMouseDown(sender, button, x, y)
UDF1.DragNow()
end
function CEPanel1MouseDown(sender, button, x, y)
UDF1.DragNow()
end
function CEPanel2Click(sender)
closeCE()
end
function CEPanel2MouseEnter(sender)
UDF1.CEPanel2.Color = "$000000BB"
end
function CEPanel2MouseLeave(sender)
UDF1.CEPanel2.Color = "~"
end
function CEPanel4Click(sender)
UDF1.CEPanel4.color = "~"
UDF1.CEPanel3.color = "$00232323"
UDF1.CEPanel18.Color = "$00232323"
UDF1.CEPanel7.Color = "$00232323"
UDF1.CEPanel23.Color = "$00232323"
UDF1.CEPanel5.Visible = false
UDF1.CEPanel6.Visible = true
UDF1.CEPanel24.Visible = false
UDF1.CEPanel19.Visible = false
UDF1.CEPanel25.Visible = false
end
function CEPanel3Click(sender)
UDF1.CEPanel3.Color = "~"
UDF1.CEPanel4.Color = "$00232323"
UDF1.CEPanel23.Color = "$00232323"
UDF1.CEPanel18.Color = "$00232323"
UDF1.CEPanel7.Color = "$00232323"
UDF1.CEPanel5.Visible = true
UDF1.CEPanel6.Visible = false
UDF1.CEPanel24.Visible = false
UDF1.CEPanel19.Visible = false
UDF1.CEPanel25.Visible = false
end
function CEPanel23Click(sender)
UDF1.CEPanel23.Color = "~"
UDF1.CEPanel18.Color = "$00232323"
UDF1.CEPanel4.Color = "$00232323"
UDF1.CEPanel3.Color = "$00232323"
UDF1.CEPanel7.Color = "$00232323"
UDF1.CEPanel5.Visible = false
UDF1.CEPanel6.Visible = false
UDF1.CEPanel24.Visible = false
UDF1.CEPanel19.Visible = false
UDF1.CEPanel25.Visible = true
end
function CEPanel7Click(sender)
UDF1.CEPanel18.Color = "$00232323"
UDF1.CEPanel4.Color = "$00232323"
UDF1.CEPanel3.Color = "$00232323"
UDF1.CEPanel23.Color = "$00232323"
UDF1.CEPanel7.Color = "~"
UDF1.CEPanel24.Visible = true
UDF1.CEPanel5.Visible = false
UDF1.CEPanel6.Visible = false
UDF1.CEPanel19.Visible = false
UDF1.CEPanel25.Visible = false
end
function CEPanel18Click(sender)
UDF1.CEPanel18.Color = "~"
UDF1.CEPanel4.Color = "$00232323"
UDF1.CEPanel3.Color = "$00232323"
UDF1.CEPanel23.Color = "$00232323"
UDF1.CEPanel7.Color = "$00232323"
UDF1.CEPanel24.Visible = false
UDF1.CEPanel5.Visible = false
UDF1.CEPanel6.Visible = false
UDF1.CEPanel19.Visible = true
UDF1.CEPanel25.Visible = false
end
function CEPanel4MouseEnter(sender)
end
function CEPanel4MouseLeave(sender)
end
function CEPanel18MouseEnter(sender)
end
function CEPanel18MouseLeave(sender)
end
function CETimer1Timer(sender)
RainbowTimer()
end
function CECheckbox1Change(sender)
if sender.checked == true then
autoAssemble[[
LUACALL(speedhack_setSpeed(5))
]]
else
autoAssemble[[
LUACALL(speedhack_setSpeed(1.0))
]]
end
end
function CECheckbox2Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1F9540:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+1F9540:
db 75 0D
]]
end
end
function CECheckbox3Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1BA420:
db 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+1BA420:
db F3 0F 10 49 0C
]]
end
end
function CECheckbox5Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1AE8D5:
db 90 90 90 90 90 90
Growtopia.exe+1AE8C3:
db 90 90 90 90 90 90 90 90 90 90
Growtopia.exe+A7A6A:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+1AE8D5:
db 0F 85 C3 00 00 00
Growtopia.exe+1AE8C3:
db C7 83 50 01 00 00 CD CC 4C 3E
Growtopia.exe+A7A6A:
db 75 06
]]
end
end
function CECheckbox4Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+299358:
db 7A 4F
Growtopia.exe+1EB4AA:
db 90 90
Growtopia.exe+1F9144:
db 90 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+299358:
db 4F 6E
Growtopia.exe+1EB4AA:
db 75 07
Growtopia.exe+1F9144:
db 0F 84 8B 00 00 00
]]
end
end
function CECheckbox7Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+136AAA:
db 90 90 90 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+26A998:
db F3 0F 10 3D CA 22 15 00
]]
end
end
function CECheckbox6Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1374F6:
db 83 C0 70
]]
else
autoAssemble[[
Growtopia.exe+1374F6:
db 83 C0 02
]]
end
end
function CECheckbox9Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+299358:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+299358:
db 4F 6E
]]
end
end
function CECheckbox8Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1EB4AA:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+1EB4AA:
db 75 07
]]
end
end
function CECheckbox14Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+2992D5:
db 90
]]
else
autoAssemble[[
Growtopia.exe+2992D5:
db 6E
]]
end
end
function CECheckbox10Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+145019:
db 90 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+145019:
db 0F 84 DF 00 00 00
]]
end
end
function CECheckbox11Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1BA6DA:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+1BA6DA:
db 74 39
]]
end
end
function CECheckbox12Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+5CA25:
db 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+5CA25:
db 80 7B 24 00
]]
end
end
function CECheckbox13Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+9E12A:
db 90 90 90 90
Growtopia.exe+1ACE7C:
db 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+9E12A:
db F3 0F 11 11
Growtopia.exe+1ACE7C:
db F3 0F 11 53 20
]]
end
end
function CECheckbox15Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1AAED0:
db 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+1AAED0:
db F3 0F 5C D1
]]
end
end
function CECheckbox16Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1B3E40:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1B3E40:
db 74
]]
end
end
function CECheckbox17Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1AE8C3:
db 90 90 90 90 90 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+1AE8C3:
db C7 83 50 01 00 00 CD CC 4C 3E
]]
end
end
function CECheckbox18Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+6866C:
db 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+6866C:
db 66 41 39 40 04
]]
end
end
function CECheckbox19Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1EEC88:
db 74
]]
else
autoAssemble[[
Growtopia.exe+1EEC88:
db 75
]]
end
end
function CECheckbox22Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1382CD:
db 74
]]
else
autoAssemble[[
Growtopia.exe+1382CD:
db 75
]]
end
end
function CECheckbox25Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1F9144:
db 90 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+1F9144:
db 0F 84 8B 00 00 00
]]
end
end
function CECheckbox26Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1B1C24:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1B1C24:
db 74
]]
end
end
function CECheckbox23Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+14029C:
db 75
]]
else
autoAssemble[[
Growtopia.exe+14029C:
db 74
]]
end
end
function CECheckbox24Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1BA42E:
db F3 0F 11 4A 06
]]
else
autoAssemble[[
Growtopia.exe+1BA42E:
db F3 0F 11 4A 04
]]
end
end
function CECheckbox27Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1B1DF2:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1B1DF2:
db 74
]]
end
end
function CECheckbox30Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+BC9DD:
db 0F 84
]]
else
autoAssemble[[
Growtopia.exe+BC9DD:
db 0F 85
]]
end
end
function CECheckbox31Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1E81C7:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1E81C7:
db 74
]]
end
end
function CECheckbox32Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1B5046:
db 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+1B5046:
db 45 8A E5
]]
end
end
function CECheckbox33Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+28719C:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+28719C:
db 70 6F
]]
end
end
function CECheckbox34Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+61A9F:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+61A9F:
db 77 69
]]
end
end
function CECheckbox35Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1ADFC9:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1ADFC9:
db 74
]]
end
end
function CECheckbox36Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1AE026:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+1AE026:
db 75 13
]]
end
end
function CECheckbox37Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1B32D3:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+1B32D3:
db 74 29
]]
end
end
function CECheckbox39Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1EB4AA:
db 74
]]
else
autoAssemble[[
Growtopia.exe+1EB4AA:
db 75
]]
end
end
function CECheckbox38Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1EABBB:
db 74
]]
else
autoAssemble[[
Growtopia.exe+1EABBB:
db 75
]]
end
end
function CECheckbox41Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+145019:
db 90 90 90 90 90 90
]]
else
autoAssemble[[
Growtopia.exe+145019:
db 0F 84 DF 00 00 00
]]
end
end
function CECheckbox40Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+28719C:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+28719C:
db 70 6F
]]
end
end
function CECheckbox43Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+299368:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+299368:
db 4F 6E
]]
end
end
function CECheckbox42Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1BACC8:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+1BACC8:
db 74 E7
]]
end
end
function CECheckbox48Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1B32D3:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1B32D3:
db 74
]]
end
end
function CECheckbox44Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1ADE4A:
db 75
Growtopia.exe+1ADE7D:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1ADE4A:
db 74
Growtopia.exe+1ADE7D:
db 74
]]
end
end
function CECheckbox45Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+1AAF12:
db 75
]]
else
autoAssemble[[
Growtopia.exe+1AAF12:
db 74
]]
end
end
function CECheckbox46Change(sender)
if sender.checked == true then
autoAssemble[[
Growtopia.exe+61A9F:
db 90 90
]]
else
autoAssemble[[
Growtopia.exe+61A9F:
db 77 69
]]
end
end
function CEPanel10Click(sender)
memrec("Name").Value = UDF1.CEEdit1.Text
memrec("Name").Active = true
end
function CEPanel11Click(sender)
memrec("Hat").Value = UDF1.CEEdit4.Text
memrec("Hat").Active = true
end
function CEPanel9Click(sender)
memrec("Wings").Value = UDF1.CEEdit5.Text
memrec("Wings").Active = true
end
function CEPanel8Click(sender)
memrec("Hair").Value = UDF1.CEEdit6.Text
memrec("Hair").Active = true
end
function CEPanel13Click(sender)
memrec("Hand").Value = UDF1.CEEdit3.Text
memrec("Hand").Active = true
end
function CEPanel14Click(sender)
memrec("Eye").Value = UDF1.CEEdit7.Text
memrec("Eye").Active = true
end
function CEPanel15Click(sender)
memrec("Shirt").Value = UDF1.CEEdit2.Text
memrec("Shirt").Active = true
end
function CEPanel16Click(sender)
memrec("Seed").Value = UDF1.CEEdit8.Text
end
function CEPanel12Click(sender)
memrec("Shoes").Value = UDF1.CEEdit9.Text
memrec("Shoes").Active = true
end
function CEPanel17Click(sender)
memrec("Pants").Value = UDF1.CEEdit10.Text
memrec("Pants").Active = true
end
x,y = getMousePos()
function CETimer2Timer(sender)
if UDF1.CECheckbox29.Checked == false then
  if x-UDF1.Left-UDF1.CEImage2.Left-UDF1.CEPanel20.Left > 340 or x-UDF1.Left-UDF1.CEImage2.Left-UDF1.CEPanel20.Left < 35 or y-UDF1.Top-UDF1.CEImage2.Top-UDF1.CEPanel20.Top > 285 or y-UDF1.Top-UDF1.CEImage2.Top-UDF1.CEPanel20.Top < 100 then
  else
    UDF1.CEPanel21.Color = (UDF1.CEImage2.Canvas.GetPixel(x-UDF1.Left-UDF1.CEImage2.Left-UDF1.CEPanel20.Left-32,y-UDF1.Top-UDF1.CEImage2.Top-UDF1.CEPanel20.Top-97))
  end
end
end
function CEImage2MouseDown(sender, button, x, y)
  UDF1.CETimer2.Enabled = true
  UDF1.CETimer5.Enabled = true
  UDF1.CEImage2.Cursor = UDF1.crno.Cursor
  UDF1.CEImage3.Cursor = UDF1.crno.Cursor
end
function CEImage2MouseUp(sender, button, x, y)
  UDF1.CETimer2.Enabled = false
  UDF1.CETimer5.Enabled = false
  UDF1.CEImage2.Cursor = UDF1.crhp.Cursor
  UDF1.CEImage3.Cursor = UDF1.crhp.Cursor
end
function CECheckbox28Change(sender)
  if UDF1.CECheckbox28.Checked == true then
    prevskin = memrec("Skin").Value
    UDF1.CETimer3.Enabled = true
  else
    UDF1.CETimer3.Enabled = false
    memrec("Skin").Value = prevskin
  end
end
function CETimer3Timer(sender)
  memrec("Skin").Value = (string.format("%X", (UDF1.CEPanel21.Color))..transparency)
end
local prevtext = 0
function CEEdit11Change(sender)
  if UDF1.CEEdit11.Text == "" then
    transparency = "FF"
  else
    if not tonumber(UDF1.CEEdit11.Text) then
      UDF1.CEEdit11.Text = prevtext
    else
      if tonumber(UDF1.CEEdit11.Text) > 255 then
        UDF1.CEEdit11.Text = prevtext
      else
        prevtext = UDF1.CEEdit11.Text
        if tonumber(UDF1.CEEdit11.Text) < 16 then
          transparency = ("0"..string.format("%X", (UDF1.CEEdit11.Text)))
        else
          transparency = (string.format("%X", (UDF1.CEEdit11.Text)))
        end
      end
    end
  end
end
function CETimer4Timer(sender)
  x,y = getMousePos()
end
function CETimer5Timer(sender)
  if x-UDF1.Left-UDF1.CEImage2.Left-UDF1.CEPanel20.Left > 340 or x-UDF1.Left-UDF1.CEImage2.Left-UDF1.CEPanel20.Left < 35 or y-UDF1.Top-UDF1.CEImage2.Top-UDF1.CEPanel20.Top > 285 or y-UDF1.Top-UDF1.CEImage2.Top-UDF1.CEPanel20.Top < 100 then
  else
    UDF1.CEImage3.Top = (y-UDF1.Top-UDF1.CEPanel20.Top-UDF1.CEImage2.Top-100)
    UDF1.CEImage3.Left = (x-UDF1.Left-UDF1.CEPanel20.Left-UDF1.CEImage2.Left-35)
  end
end
function CEImage2Click(sender)
  UDF1.CEImage2.Cursor = UDF1.crno.Cursor
  UDF1.CEImage3.Cursor = UDF1.crno.Cursor
end
function CEPanel22Click(sender)
memrec("Punch").Value = UDF1.CEEdit12.Text
memrec("Punch").Active = true
end
function CELabel47MouseDown(sender, button, x, y)
UDF1.DragNow()
end
function CELabel29MouseDown(sender, button, x, y)
UDF1.DragNow()
end
function CELabel28MouseDown(sender, button, x, y)
UDF1.DragNow()
end
function CEImage1MouseDown(sender, button, x, y)
UDF1.DragNow()
end
--showMessage("This trainer was made with the help of BlueHaxorz. Please consider subscribing to him, and if you want stuff like Antibounce V3, 1 hit 3 far punch, and Mod Fly V3, buy his trainer.")
UDF2.Show()
UDF1.Hide()
function cmdHttpGet(url,file)
  assert(type(url)=='string','has to specific url string')
  file = type(file)=='string' and file or '_dummy.tmp'
  local cmd = string.format([[powershell -command "& { (New-Object Net.WebClient).DownloadFile('%s', '%s') }"]],url,file)
  cmd = assert(io.popen(cmd,'r'))
  cmd:read('*all')
  cmd:close()
  cmd = assert(io.open(file,'rb'))
  local result = cmd:read('*all')
  cmd:close()
  return result
end

function gethwid()
  local cmd = [[cmd /C "REG QUERY "HKLM\SYSTEM\CurrentControlSet\Control\IDConfigDB\Hardware Profiles\0001" /z /v HwProfileGuid"]]
  cmd = assert(io.popen(cmd,'r'))
 -- print(string.match(cmd:read('*all'),"({%w+-%w+-%w+-%w+-%w+})"))
  local result = tostring(string.match(cmd:read('*all'),"({%w+-%w+-%w+-%w+-%w+})"))
  cmd:close()
  return result
end

function UDF2Panel1Click(sender)
if cmdHttpGet([[http://ansitive.xyz/auth2.php?hwid=]]..gethwid().."&username="..tostring(UDF2.CEEdit1.Text).."&password="..tostring(UDF2.CEEdit2.Text).."&disc1=&disc2=&register=0&ansitive=1") == "Authenticated" then
showMessage("Welcome to ANSITIVE!")
UDF1.Show()
UDF2.Hide()
UDF3.Hide()
elseif cmdHttpGet([[http://ansitive.xyz/auth2.php?hwid=]]..gethwid().."&username="..tostring(UDF2.CEEdit1.Text).."&password="..tostring(UDF2.CEEdit2.Text).."&disc1=&disc2=&register=0&ansitive=1)") == "Wrong" then
showMessage("Wrong username/password!\nDid you register?")
else
showMessage("You're banned from ANSITIVE!")
end
end
function UDF2Panel2Click(sender)
UDF2.Hide()
showMessage("This is a HWID authentacion method. Any attempt at providing a fake discord will get you blacklisted.\nIf you forget your password, there's a really low chance that we'll actually help you.\nYou have been warned.")
UDF3.Show()
end
function UDF3Panel1Click(sender)
if UDF3.CEEdit2.Text ~= UDF3.CEEdit3.Text then showMessage("The passwords should match each other!") return end
if not string.match(UDF3.CEEdit4.Text, "#") then showMessage('The correct context is: Name#0000') return end
if UDF3.CEEdit4.Text == "" or UDF3.CEEdit4.Text == " " or UDF3.CEEdit4.Text == " #" or UDF3.CEEdit4.Text == "# " or UDF3.CEEdit4.Text == "#" then showMessage('The correct context is: Name#0000') return end
if type(UDF3.CEEdit4.Text) ~= "string" then showMessage("Please provide a taggable (a-z, A-Z, 1-9) discord username. If nessesary, change your name.") return end
local disc1 = tostring(string.match(tostring(UDF3.CEEdit4.Text), "%w+"))
local disc2 = tostring(string.gsub(string.match(tostring(UDF3.CEEdit4.Text), "#%w+"), "#", ""))
--print(disc1.."#"..disc2)
if cmdHttpGet([[http://ansitive.xyz/auth2.php?hwid=]]..gethwid().."&username="..tostring(UDF3.CEEdit1.Text).."&password="..tostring(UDF3.CEEdit2.Text).."&disc1="..disc1.."&disc2="..disc2.."&register=1&ansitive=1") == "Registered" then
showMessage("Successfully registered, please log in")
UDF3.Hide()
UDF2.Show()
elseif cmdHttpGet([[http://ansitive.xyz/auth2.php?hwid=]]..gethwid().."&username="..tostring(UDF3.CEEdit1.Text).."&password="..tostring(UDF3.CEEdit2.Text).."&disc1="..disc1.."&disc2="..disc2.."&register=1&ansitive=1") == "Alreadyregistered" then
showMessage("You're already registered. Please log in.\nForgot your password? Contact Lapada#1337 on discord.")
UDF3.Hide()
UDF2.Show()
else
showMessage("Something went wrong. Couldn't connect to server.")
UDF3.Hide()
UDF2.Show()
end
end
function UDF3Panel2Click(sender)
UDF3.Hide()
UDF2.Show()
end