MrTheDzam

DEMO LOGIN [3 RE_UPLOAD]

Aug 31st, 2015
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 6.34 KB | None | 0 0
  1. #cs
  2.         Check at 4.03 PM
  3.  
  4.         Coder: [T]ênkocầndài [C]hỉcầntốnđất [T]hếnómớichất (MrTheDzam)
  5. #ce
  6.  
  7. #include <ButtonConstants.au3>
  8. #include <EditConstants.au3>
  9. #include <GUIConstantsEx.au3>
  10. #include <StaticConstants.au3>
  11. #include <WindowsConstants.au3>
  12.  
  13.  
  14. $Form1 = GUICreate("Auto SC Ver 3.12.1.5", 421, 435, 775, 159)
  15. GUISetBkColor(0x008080)
  16. $Label1 = GUICtrlCreateLabel("AUTO SC Ver 3.12.1.5", 64, 16, 295, 40)
  17. GUICtrlSetFont(-1, 22, 400, 0, "VnFrankfurtGothic2")
  18. GUICtrlSetColor(-1, 0x800000)
  19. Global $Input1 = GUICtrlCreateInput("", 128, 80, 209, 21)
  20. $Label2 = GUICtrlCreateLabel("ID Name:", 16, 80, 90, 28)
  21. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  22. GUICtrlSetColor(-1, 0x000000)
  23. Global $Input2 = GUICtrlCreateInput("", 128, 120, 209, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
  24. $Label3 = GUICtrlCreateLabel("Password:", 16, 120, 100, 28)
  25.  
  26. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  27. GUICtrlSetColor(-1, 0x000000)
  28.  
  29. $Label4 = GUICtrlCreateLabel("", 16, 152, 4, 4)
  30. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  31. GUICtrlSetColor(-1, 0x000000)
  32. $Button2 = GUICtrlCreateButton("Đăng nhập", 155, 169, 121, 49)
  33. $Button1 = GUICtrlCreateButton("Đăng xuất", 24, 168, 121, 49)
  34. GUICtrlSetState(-1, $GUI_DISABLE)
  35. $Button3 = GUICtrlCreateButton("Quên mật khẩu?", 288, 168, 121, 49)
  36. $Radio1 = GUICtrlCreateRadio("Post 2 - 2 TD", 256, 272, 129, 33)
  37. GUICtrlSetState(-1, $GUI_DISABLE)
  38. $Label5 = GUICtrlCreateLabel("Tài khoản VIP", 232, 240, 134, 28)
  39.  
  40. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  41. GUICtrlSetColor(-1, 0xFF0000)
  42. $Radio2 = GUICtrlCreateRadio("Post 2 - 1 TD", 256, 304, 129, 33)
  43. GUICtrlSetState(-1, $GUI_DISABLE)
  44. $Radio3 = GUICtrlCreateRadio("Post Win", 256, 336, 129, 33)
  45. GUICtrlSetState(-1, $GUI_DISABLE)
  46. $Radio4 = GUICtrlCreateRadio("Post 3 - 1 TD", 256, 376, 89, 17)
  47. GUICtrlSetState(-1, $GUI_DISABLE)
  48. $Radio5 = GUICtrlCreateRadio("Post 3 - 2 TD", 256, 408, 89, 17)
  49. GUICtrlSetState(-1, $GUI_DISABLE)
  50. $Label6 = GUICtrlCreateLabel("Tài khoản thường", 24, 240, 167, 28)
  51.  
  52. GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
  53. GUICtrlSetColor(-1, 0xFF0000)
  54. $Label7 = GUICtrlCreateLabel("Create And Rencode By BAOVI", 8, 352, 219, 20)
  55. GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
  56. GUICtrlSetColor(-1, 0xFFFF00)
  57. $Label8 = GUICtrlCreateLabel("Facebook: fb.com/baovisociu", 8, 384, 209, 20)
  58. GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
  59. GUICtrlSetColor(-1, 0xFFFF00)
  60. $Label9 = GUICtrlCreateLabel("Version: 3.12.1.5", 8, 408, 117, 20)
  61. GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
  62. GUICtrlSetColor(-1, 0xFFFF00)
  63. $Checkbox3 = GUICtrlCreateCheckbox("Nhanh", 128, 320, 97, 17)
  64. GUICtrlSetState(-1, $GUI_DISABLE)
  65. $Checkbox4 = GUICtrlCreateCheckbox("Bình thường", 128, 296, 97, 17)
  66. GUICtrlSetState(-1, $GUI_DISABLE)
  67. $Checkbox5 = GUICtrlCreateCheckbox("Chậm", 128, 272, 97, 17)
  68. GUICtrlSetState(-1, $GUI_DISABLE)
  69. $Radio6 = GUICtrlCreateRadio("Post 2 - 2 TD", 8, 272, 105, 33)
  70. GUICtrlSetState(-1, $GUI_DISABLE)
  71. GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
  72. GUICtrlSetColor(-1, 0xFF0000)
  73. $Radio7 = GUICtrlCreateRadio("Post 2 - 1 TD", 8, 304, 105, 33)
  74. GUICtrlSetState(-1, $GUI_DISABLE)
  75. GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
  76. GUICtrlSetColor(-1, 0xFF0000)
  77. GUISetState(@SW_SHOW)
  78.  
  79.  
  80.  
  81.  
  82. While 1
  83.         $nMsg = GUIGetMsg()
  84.         Switch $nMsg
  85.                 Case $GUI_EVENT_CLOSE
  86.                         Exit
  87.                 Case $button2
  88.                     $username = GUICtrlRead($Input1)
  89.                     $Password = GUICtrlRead($Input2)
  90.                         If $Username == '' or $Password == '' then ;User Không được để trống
  91.                            MsgBox(16, "Thông báo", "Vui lòng điền đầy đủ thông tin!")
  92.                         Else
  93.                             If $Username == 'admin' and $Password == 'admin' then
  94.                                 tkthuong()
  95.                             ElseIf $Username == 'taikhoanvip1' and $Password == 'TCT' then
  96.                                 tkvip()
  97.                             Else
  98.                                    MsgBox(16, "Thông báo", "Đăng nhập thất bại: Sai Username/Password")
  99.                             EndIf
  100.                             MsgBox(64, "License", "Coded by [T]ênkocầndài [C]hỉcầntốnđất [T]hếnómớichất")
  101.                         EndIf
  102.                 Case $Button1
  103.                     dangxuat()
  104.         EndSwitch
  105. WEnd
  106.  
  107. Func tkthuong()
  108.     MsgBox(64, "Thông báo", "Đăng nhập vào TK thường thành công")
  109.     GUICtrlSetState($Radio1,$GUI_DISABLE)
  110.     GUICtrlSetState($Radio2,$GUI_DISABLE)
  111.     GUICtrlSetState($Radio3,$GUI_DISABLE)
  112.     GUICtrlSetState($Radio4,$GUI_DISABLE)
  113.     GUICtrlSetState($Radio5,$GUI_DISABLE)
  114.     GUICtrlSetState($Radio6,$GUI_ENABLE)
  115.     GUICtrlSetState($Radio7,$GUI_ENABLE)
  116.     GUICtrlSetState($Checkbox3,$GUI_ENABLE)
  117.     GUICtrlSetState($Checkbox4,$GUI_ENABLE)
  118.     GUICtrlSetState($Checkbox5,$GUI_ENABLE)
  119.     GUICtrlSetState($Input1, $GUI_DISABLE)
  120.     GUICtrlSetState($INPUT2, $GUI_DISABLE)
  121.     GUICtrlSetState($BUTTON2, $GUI_DISABLE)
  122.     GUICtrlSetData($BUTTON2, "Đã đăng nhập")
  123.     GUICtrlSetState($Button1, $GUI_ENABLE)
  124. EndFunc
  125.  
  126. Func tkvip()
  127.     MsgBox(64, "Thông báo", "Đăng nhập vào TK VIP thành công!")
  128.     GUICtrlSetState($Radio1,$GUI_ENABLE)
  129.     GUICtrlSetState($Radio2,$GUI_ENABLE)
  130.     GUICtrlSetState($Radio3,$GUI_ENABLE)
  131.     GUICtrlSetState($Radio4,$GUI_ENABLE)
  132.     GUICtrlSetState($Radio5,$GUI_ENABLE)
  133.     GUICtrlSetState($Radio6,$GUI_ENABLE)
  134.     GUICtrlSetState($Radio7,$GUI_ENABLE)
  135.     GUICtrlSetState($Checkbox3,$GUI_ENABLE)
  136.     GUICtrlSetState($Checkbox4,$GUI_ENABLE)
  137.     GUICtrlSetState($Checkbox5,$GUI_ENABLE)
  138.     GUICtrlSetState($Input1, $GUI_DISABLE)
  139.     GUICtrlSetState($INPUT2, $GUI_DISABLE)
  140.     GUICtrlSetState($BUTTON2, $GUI_DISABLE)
  141.     GUICtrlSetData($BUTTON2, "Đã đăng nhập")
  142.     GUICtrlSetState($Button1, $GUI_ENABLE)
  143. EndFunc
  144.  
  145. Func dangxuat()
  146.     GUICtrlSetState($Radio1,$GUI_DISABLE)
  147.     GUICtrlSetState($Radio2,$GUI_DISABLE)
  148.     GUICtrlSetState($Radio3,$GUI_DISABLE)
  149.     GUICtrlSetState($Radio4,$GUI_DISABLE)
  150.     GUICtrlSetState($Radio5,$GUI_DISABLE)
  151.     GUICtrlSetState($Radio6,$GUI_DISABLE)
  152.     GUICtrlSetState($Radio7,$GUI_DISABLE)
  153.     GUICtrlSetState($Checkbox3,$GUI_DISABLE)
  154.     GUICtrlSetState($Checkbox4,$GUI_DISABLE)
  155.     GUICtrlSetState($Checkbox5,$GUI_DISABLE)
  156.     GUICtrlSetState($Input1, $GUI_ENABLE)
  157.     GUICtrlSetState($INPUT2, $GUI_ENABLE)
  158.     GUICtrlSetData($Input1, '')
  159.     GUICtrlSetData($Input2, '')
  160.     GUICtrlSetState($BUTTON2, $GUI_ENABLE)
  161.     GUICtrlSetData($BUTTON2, "Đăng nhập")
  162.     GUICtrlSetState($Button1, $GUI_DISABLE)
  163. EndFunc
Advertisement
Add Comment
Please, Sign In to add comment