Advertisement
duje225

Batch Chat Program - The GUI

Feb 5th, 2016
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. @echo off
  2. :init
  3. color 0b
  4. cls
  5. title Main Menu - Messenger
  6. :menu
  7. echo 1. Log in
  8. echo ------------------------------
  9. echo 2. Create an Account
  10. echo ------------------------------
  11. echo 3. Change your Password
  12. echo ------------------------------
  13. echo 4. Change your Username
  14. echo ------------------------------
  15. echo 5. Exit
  16. echo.
  17. set /p cho=Choice Number:
  18. if %cho% == 1 goto login
  19. if %cho% == 2 goto register
  20. if %cho% == 3 goto changepass
  21. if %cho% == 4 goto changeuser
  22. if %cho% == 5 exit
  23. color 0c
  24. echo Please enter a valid number.
  25. ping localhost -n 2 >nul
  26. goto init
  27.  
  28. :login
  29. cls
  30. color 0d
  31. title Log In - Messenger
  32. set /p user=User Name:
  33. if not exist \\DUJEMC-PC\Users\Public\Chat\Users\%user%.unfile goto noacc
  34. echo ------------------------------
  35. set /p pass=Password:
  36. echo %pass%>%tmp%\chtmp.tmp
  37. fc "%tmp%\chtmp.tmp" "\\DUJEMC-PC\Users\Public\Chat\Users\%user%.unfile" >nul
  38. if errorlevel==1 goto incor
  39. cls
  40. echo Connecting to chat room...
  41. ping localhost -n 3 >nul
  42. goto chat
  43.  
  44. :noacc
  45. cls
  46. color 0c
  47. echo The account does not exist. Please create an account.
  48. ping localhost -n 3 >nul
  49. goto init
  50.  
  51. :incor
  52. cls
  53. color 0c
  54. echo The password is incorrect. Please try again.
  55. ping localhost -n 3 >nul
  56. goto login
  57.  
  58. :register
  59. cls
  60. color 4f
  61. title Register - Messenger
  62. set /p user=User Name:
  63. echo ------------------------------
  64. set /p pass=Password:
  65. echo %pass%>\\DUJEMC-PC\Users\Public\Chat\Users\%user%.unfile
  66. echo Account created successfully with the following password: %pass%! Now you can use that data to access the chat.
  67. ping localhost -n 3 >nul
  68. goto init
  69.  
  70. :changepass
  71.  
  72. :changeuser
  73.  
  74. :chat
  75. cls
  76. color 0a
  77. title Chat - Messenger
  78. set name=%user%
  79. start \\DUJEMC-PC\Users\Public\Chat\Program_Files\msgbox.cmd
  80.  
  81. :chat2
  82. cls
  83. color 0a
  84. set /p text=Text:
  85. goto send
  86.  
  87. :send
  88. echo %name%:%text%>>\\DUJEMC-PC\Users\Public\Chat\Program_Files\chatroom.chatfile
  89. goto chat2
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement