API tools faq
paste
Guest User

Untitled

a guest
Jan 10th, 2014
121
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.88 KB | None | 0 0
raw download clone embed print report
  1. -- Do not remove the green text!
  2. -- ><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><
  3.  
  4. -- Script by: Anil Celik
  5. -- Made in Austria
  6. -- Original language: German
  7. -- ><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><
  8. -- Do not remove the green text!
  9.  
  10.  
  11.  
  12. wdwLogin_Pannel = {}
  13. tabPannel_Main = {}
  14. tab_Login = {}
  15. tab_Register = {}
  16.  
  17. function open_log_reg_pannel()
  18. if not(isElement(wdwLogin_Pannel)) then
  19.  
  20. showChat(false)
  21.  
  22. x,y = guiGetScreenSize()
  23.  
  24. local sWidth,sHeight = guiGetScreenSize()
  25. local Width,Height = 350,350
  26. local X = (sWidth/2) - (Width/2)
  27. local Y = (sHeight/2) - (Height/2)
  28. local localPlayerName = getPlayerName(getLocalPlayer())
  29.  
  30.  
  31.  
  32. Image = guiCreateStaticImage( 0, 0, 1920, 1200, "login_bg.png", false )
  33. guiSetEnabled (Image, false)
  34.  
  35. Login_img = guiCreateStaticImage( X, Y + 50, 400, 400, "login_window.png", false )
  36. guiSetEnabled (Login_img, false)
  37.  
  38. --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  39. shLogin = guiCreateStaticImage( X + 160, Y + 340, 76, 23, "login.png", false )
  40. addEventHandler("onClientGUIClick",shLogin,onClickBtnLogin)
  41. addEventHandler( "onClientMouseEnter",shLogin,LoginSH)
  42. addEventHandler("onClientMouseLeave",shLogin,SErem)
  43.  
  44. edit_Login = guiCreateEdit(X + 110,Y + 210,180,35,"",false)
  45. edit_password = guiCreateEdit(X +110,Y + 290,180,35,"",false)
  46. guiEditSetMaxLength ( edit_Login,25)
  47. guiEditSetMaxLength ( edit_password,25)
  48. guiEditSetMasked ( edit_password, true )
  49.  
  50. lbl_about_legth = guiCreateLabel(142,42,184,18,"",false)
  51. guiLabelSetColor(lbl_about_legth,253,255,68)
  52. guiLabelSetVerticalAlign(lbl_about_legth,"center")
  53. guiLabelSetHorizontalAlign(lbl_about_legth,"center",false)
  54.  
  55. checkbox_save = guiCreateCheckBox(X + 250,Y + 170,100,20,"(Remember me!)",false,false)
  56. guiSetFont(checkbox_save,"default-small")
  57.  
  58.  
  59.  
  60. login_tab_error_msg = guiCreateLabel(X,Y + 310,364,31,"Error_login_tab",false)
  61. guiLabelSetColor(login_tab_error_msg,255,0,0)
  62. guiLabelSetVerticalAlign(login_tab_error_msg,"center")
  63. guiLabelSetHorizontalAlign(login_tab_error_msg,"center",false)
  64. guiSetFont(login_tab_error_msg,"default-bold-small")
  65.  
  66.  
  67. --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  68. shGuest = guiCreateStaticImage( X + 55, Y + 350, 18, 23, "guest.png", false ) -- A gomb
  69. addEventHandler("onClientGUIClick",shGuest,onClickGuest)
  70. addEventHandler( "onClientMouseEnter",shGuest,GuestSH)
  71. addEventHandler("onClientMouseLeave",shGuest,SErem)
  72.  
  73.  
  74. edit_account_name = guiCreateEdit(X +110 ,Y + 180,180,35,"",false)
  75. guiEditSetMaxLength ( edit_account_name,25)
  76. guiSetVisible(edit_account_name,false)
  77.  
  78. edit__reg_tab_password = guiCreateEdit(X + 110,Y + 240,180,35,"",false)
  79. guiEditSetMaxLength ( edit__reg_tab_password,25)
  80. guiEditSetMasked ( edit__reg_tab_password, true )
  81. guiSetVisible(edit__reg_tab_password,false)
  82.  
  83.  
  84. edit__reg_tab_Repassword = guiCreateEdit(X + 110,Y + 300,180,35,"",false)
  85. guiEditSetMaxLength ( edit__reg_tab_Repassword,25)
  86. guiEditSetMasked ( edit__reg_tab_Repassword, true )
  87. guiSetVisible(edit__reg_tab_Repassword,false)
  88. guiSetEnabled (edit__reg_tab_Repassword, true)
  89.  
  90. --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  91. shRegister = guiCreateStaticImage( X + 130, Y + 375, 132, 23, "register.png", false )
  92. addEventHandler("onClientGUIClick",shRegister,OnBtnRegister)
  93. addEventHandler( "onClientMouseEnter",shRegister,RegisterSH)
  94. addEventHandler("onClientMouseLeave",shRegister,SErem)
  95.  
  96. --!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  97. shRegister2 = guiCreateStaticImage( X + 130, Y + 365, 132, 23, "register2.png", false )
  98. addEventHandler("onClientGUIClick",shRegister2,onClickBtnRegister)
  99. addEventHandler( "onClientMouseEnter",shRegister2,Register2SH)
  100. addEventHandler("onClientMouseLeave",shRegister2,SErem)
  101.  
  102. guiSetVisible(shRegister2,false)
  103.  
  104. reg_tab_error_msg = guiCreateLabel(X + 10,Y + 310,364,31,"Error_reg_ttab",false)
  105. guiLabelSetColor(reg_tab_error_msg,255,20,0)
  106. guiLabelSetVerticalAlign(reg_tab_error_msg,"center")
  107. guiLabelSetHorizontalAlign(reg_tab_error_msg,"center",false)
  108. guiSetFont(reg_tab_error_msg,"default-bold-small")
  109.  
  110.  
  111. showCursor(true)
  112.  
  113. guiSetText(reg_tab_error_msg, "")
  114. guiSetText(login_tab_error_msg, "")
  115.  
  116.  
  117. local username, password = loadLoginFromXML()
  118.  
  119. if not( username == "" or password == "") then
  120. guiCheckBoxSetSelected ( checkbox_save, true )
  121. guiSetText ( edit_Login, tostring(username))
  122. guiSetText ( edit_password, tostring(password))
  123. else
  124. guiCheckBoxSetSelected ( checkbox_save, false )
  125. guiSetText ( edit_Login, tostring(username))
  126. guiSetText ( edit_password, tostring(password))
  127. end
  128. end
  129.  
  130. end
  131.  
  132. function LoginSH ()
  133. guiStaticImageLoadImage(shLogin, "sh.png" )
  134. end
  135.  
  136. function RegisterSH ()
  137. guiStaticImageLoadImage(shRegister, "shr.png" )
  138. end
  139.  
  140. function Register2SH ()
  141. guiStaticImageLoadImage(shRegister2, "shr2.png" )
  142. end
  143.  
  144. function GuestSH ()
  145. guiStaticImageLoadImage(shGuest, "shg.png" )
  146. end
  147.  
  148. function SErem ()
  149. guiStaticImageLoadImage(shLogin, "login.png" )
  150. guiStaticImageLoadImage(shRegister, "register.png" )
  151. guiStaticImageLoadImage(shGuest, "guest.png" )
  152. guiStaticImageLoadImage(shRegister2, "register2.png" )
  153. end
  154.  
  155.  
  156.  
  157.  
  158. function loadLoginFromXML()
  159. local xml_save_log_File = xmlLoadFile ("files/xml/userdata.xml")
  160. if not xml_save_log_File then
  161. xml_save_log_File = xmlCreateFile("files/xml/userdata.xml", "login")
  162. end
  163. local usernameNode = xmlFindChild (xml_save_log_File, "username", 0)
  164. local passwordNode = xmlFindChild (xml_save_log_File, "password", 0)
  165. if usernameNode and passwordNode then
  166. return xmlNodeGetValue(usernameNode), xmlNodeGetValue(passwordNode)
  167. else
  168. return "", ""
  169. end
  170. xmlUnloadFile ( xml_save_log_File )
  171. end
  172.  
  173.  
  174. function saveLoginToXML(username, password)
  175. local xml_save_log_File = xmlLoadFile ("files/xml/userdata.xml")
  176. if not xml_save_log_File then
  177. xml_save_log_File = xmlCreateFile("files/xml/userdata.xml", "login")
  178. end
  179. if (username ~= "") then
  180. local usernameNode = xmlFindChild (xml_save_log_File, "username", 0)
  181. if not usernameNode then
  182. usernameNode = xmlCreateChild(xml_save_log_File, "username")
  183. end
  184. xmlNodeSetValue (usernameNode, tostring(username))
  185. end
  186. if (password ~= "") then
  187. local passwordNode = xmlFindChild (xml_save_log_File, "password", 0)
  188. if not passwordNode then
  189. passwordNode = xmlCreateChild(xml_save_log_File, "password")
  190. end
  191. xmlNodeSetValue (passwordNode, tostring(password))
  192. end
  193. xmlSaveFile(xml_save_log_File)
  194. xmlUnloadFile (xml_save_log_File)
  195. end
  196. addEvent("saveLoginToXML", true)
  197. addEventHandler("saveLoginToXML", getRootElement(), saveLoginToXML)
  198.  
  199.  
  200.  
  201. function resetSaveXML()
  202. local xml_save_log_File = xmlLoadFile ("files/xml/userdata.xml")
  203. if not xml_save_log_File then
  204. xml_save_log_File = xmlCreateFile("files/xml/userdata.xml", "login")
  205. end
  206. if (username ~= "") then
  207. local usernameNode = xmlFindChild (xml_save_log_File, "username", 0)
  208. if not usernameNode then
  209. usernameNode = xmlCreateChild(xml_save_log_File, "username")
  210. end
  211. end
  212. if (password ~= "") then
  213. local passwordNode = xmlFindChild (xml_save_log_File, "password", 0)
  214. if not passwordNode then
  215. passwordNode = xmlCreateChild(xml_save_log_File, "password")
  216. end
  217. xmlNodeSetValue (passwordNode, "")
  218. end
  219. xmlSaveFile(xml_save_log_File)
  220. xmlUnloadFile (xml_save_log_File)
  221. end
  222. addEvent("resetSaveXML", true)
  223. addEventHandler("resetSaveXML", getRootElement(), resetSaveXML)
  224.  
  225. function onClickBtnLogin(button,state)
  226.  
  227. showChat(true)
  228. showCursor(false)
  229. guiSetVisible(Image,false)
  230. guiSetVisible(shGuest, false)
  231. guiSetVisible(Image, false)
  232. guiSetVisible(shLogin, false)
  233. guiSetVisible(shRegister, false)
  234. guiSetVisible(edit_password, false)
  235. guiSetVisible(edit_Login, false)
  236. guiSetVisible(checkbox_save, false)
  237. guiSetVisible(Login_img, false)
  238.  
  239.  
  240. if(button == "left" and state == "up") then
  241. if (source == shLogin) then
  242. username = guiGetText(edit_Login)
  243. password = guiGetText(edit_password)
  244. if guiCheckBoxGetSelected ( checkbox_save ) == true then
  245. checksave = true
  246. else
  247. checksave = false
  248. end
  249. triggerServerEvent("onRequestLogin",getLocalPlayer(),username,password,checksave)
  250. end
  251. end
  252. end
  253.  
  254. function OnBtnRegister ()
  255. guiStaticImageLoadImage(Login_img, "register_window.png" )
  256. guiSetVisible(shRegister2, true)
  257. guiSetVisible(lbl_reg_top_info,true)
  258. guiSetVisible(edit__reg_tab_Repassword,true)
  259. guiSetEnabled (edit__reg_tab_Repassword, true)
  260. guiSetVisible(edit__reg_tab_password,true)
  261. guiSetVisible(edit_account_name,true)
  262. guiSetVisible(shGuest, false)
  263. guiSetVisible(shLogin, false)
  264. guiSetVisible(shRegister, false)
  265. guiSetVisible(edit_password, false)
  266. guiSetVisible(edit_Login, false)
  267. guiSetVisible(checkbox_save, false)
  268. end
  269.  
  270. function onClickBtnRegister(button,state)
  271.  
  272.  
  273. guiStaticImageLoadImage(Login_img, "Login_window.png" )
  274.  
  275. guiSetVisible(shGuest, true)
  276. guiSetVisible(shLogin, true)
  277. guiSetVisible(shRegister, true)
  278. guiSetVisible(edit_password, true)
  279. guiSetVisible(edit_Login, true)
  280. guiSetVisible(checkbox_save, true)
  281. guiSetVisible(shRegister2, false)
  282. guiSetVisible(edit__reg_tab_password, false)
  283. guiSetVisible(edit__reg_tab_Repassword, false)
  284. guiSetVisible(edit_account_name, false)
  285. guiSetVisible(lbl_reg_top_info, false)
  286. showCursor(true)
  287.  
  288. --
  289. username = guiGetText(edit_account_name)
  290. password = guiGetText(edit__reg_tab_password)
  291. passwordConfirm = guiGetText(edit__reg_tab_Repassword)
  292. triggerServerEvent("onRequestRegister",getLocalPlayer(),username,password,passwordConfirm)
  293.  
  294. guiSetText(reg_tab_error_msg, "Successfully registered! Now log in!")
  295. guiLabelSetColor ( reg_tab_error_msg, 0, 255, 0 )
  296. setTimer(function() guiSetText(reg_tab_error_msg, "") end,3000,1)
  297. setTimer(function() guiLabelSetColor ( reg_tab_error_msg, 255, 0, 0 ) end,3000,1)
  298.  
  299. end
  300.  
  301.  
  302.  
  303. function Error_msg(Tab, Text)
  304. showCursor(true)
  305. if Tab == "Login" then
  306.  
  307. guiSetVisible(btnGuest, true)
  308. guiSetVisible(shGuest, true)
  309. guiSetVisible(Image, true)
  310. guiSetVisible(shLogin, true)
  311. guiSetVisible(shRegister, true)
  312. guiSetVisible(btn_reg_tab_register, true)
  313. guiSetVisible(edit_password, true)
  314. guiSetVisible(edit_Login, true)
  315. guiSetVisible(checkbox_save, true)
  316. guiSetVisible(Login_img, true)
  317.  
  318.  
  319. guiSetText(login_tab_error_msg, tostring(Text))
  320. setTimer(function() guiSetText(login_tab_error_msg, "") end,3000,1)
  321. elseif Tab == "Register" then
  322. guiSetText(reg_tab_error_msg, tostring(Text))
  323. setTimer(function() guiSetText(reg_tab_error_msg, "") end,3000,1)
  324. end
  325. end
  326. addEvent("set_warning_text",true)
  327. addEventHandler("set_warning_text",getRootElement(),Error_msg)
  328.  
  329.  
  330. function onClickGuest()
  331.  
  332. showChat(true)
  333.  
  334. guiSetVisible(Image,false)
  335. guiSetVisible(shGuest, false)
  336. guiSetVisible(Image, false)
  337. guiSetVisible(shLogin, false)
  338. guiSetVisible(shRegister, false)
  339. guiSetVisible(edit_password, false)
  340. guiSetVisible(edit_Login, false)
  341. guiSetVisible(checkbox_save, false)
  342. guiSetVisible(Login_img, false)
  343. showCursor(false)
  344. end
  345.  
  346.  
  347. function hideLoginWindow()
  348.  
  349. outputChatBox("Welcome to our beautiful Server "..getPlayerName.."we wish you a nice time ! :) ")
  350. showCursor(false)
  351. showChat(true)
  352. removeEventHandler("onClientGUIClick",shLogin,onClickBtnLogin)
  353. end
  354. addEvent("hideLoginWindow", true)
  355. addEventHandler("hideLoginWindow", getRootElement(), hideLoginWindow)
  356.  
  357. function CursorError ()
  358. outputChatBox("Mouse Error!")
  359. showCursor(false)
  360. end
  361. addCommandHandler("showc", CursorError)
  362.  
  363.  
  364. --
  365. local screenWidth,screenHeight = guiGetScreenSize() -- Get screen resolution.
  366.  
  367.  
  368. function renderDisplay ( )
  369. local seconds = getTickCount() / 1000
  370. local angle = math.sin(seconds) * 80
  371. -- This will draw the graphic file 'arrow.png' at the top middle of the screen
  372. -- using the size of 100 pixels wide, and 240 pixels high.
  373. -- The center of rotation is at the top of the image.
  374. dxDrawImage ( screenWidth/2 - 50, 0, 100, 240, 'guest.png', angle, 0, -120 )
  375. end
  376.  
  377.  
  378. CrappyTimer = setTimer(function()
  379. addEventHandler("onClientRender", getRootElement(), open_log_reg_pannel)
  380. CrappyTimer = nil end, 50000, 1)
  381.  
  382.  
  383. function closeRender()
  384. removeEventHandler("onClientRender", getRootElement(), renderDisplay)
  385. end
  386. addEvent("hideLoginWindow", true)
  387. addEventHandler("hideLoginWindow", getRootElement(), closeRender)
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!