Advertisement
slp13at420

WD wc-box login

Jan 4th, 2013
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 0.66 KB | None | 0 0
  1. -- I dunno who made this but was in grims repack. very handy for a few mg scripts
  2. -- so rep grim for this
  3.  
  4. function WelcomeBoxLogin(event, player)
  5.  
  6. RegisterTimedEvent("RevivePlayerNext", 1000, 1, player)
  7.  
  8.  
  9. function RevivePlayerNext(player)
  10.  
  11. if player:IsDead() then
  12. player:SendBroadcastMessage("system is helping you.. revived")
  13. player:ResurrectPlayer()
  14.  
  15. WorldDBQuery("UPDATE logon.accounts SET `wc_box` = '1' WHERE `login` = '"..player:GetAccountName().."' LIMIT 1; ");
  16.  
  17. else
  18.  
  19. WorldDBQuery("UPDATE logon.accounts SET `wc_box` = '1' WHERE `login` = '"..player:GetAccountName().."' LIMIT 1; ");
  20.  
  21. end
  22. end
  23. end
  24.  
  25. RegisterServerHook(4, "WelcomeBoxLogin")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement