Advertisement
Guest User

Untitled

a guest
Oct 17th, 2019
383
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.19 KB | None | 0 0
  1. @echo off
  2.  
  3.  
  4. :home
  5. color 0b
  6. title chat des 2ndes 1
  7. cls
  8. echo Connexion au Chat IRC
  9. echo _______________________________
  10. echo 1.Connexion
  11. echo.
  12. echo 2.S'inscrire
  13. echo.
  14. echo 3.Connexion avec un compte invite
  15. echo.
  16. echo 4.Mot de passe oublie
  17. echo.
  18. echo 5.exit
  19. echo _______________________________
  20. echo.
  21. set /p ch=Choix:
  22. if %ch%==1 goto logon
  23. if %ch%==2 goto account
  24. if %ch%==3 goto invite
  25. if %ch%==4 goto fpw
  26. if %ch%==5 exit
  27. color 0c
  28. echo Veuillez entrer un nombre valide
  29. ping localhost -n 2 >nul
  30. goto home
  31.  
  32.  
  33.  
  34.  
  35.  
  36.  
  37. :always
  38. cls
  39. color 0c
  40. echo Desole mais ce nom d'utilisateur est deja utilise
  41. ping localhost -n 3 >nul
  42. goto account
  43. :account
  44. cls
  45. color 0b
  46. set /p nu=Nouveau nom d'utilisateur :
  47. echo _____________________
  48. set /p np=Nouveau mot de passe :
  49. if Exist "L:\classes\201\chat2\users\%nu%.unfile" goto always
  50. echo - %np% >>"L:\classes\201\chat2\users\%nu%.unfile"
  51. cls
  52. goto logon
  53.  
  54. :fpw
  55. cls
  56. set /p nu=Nom d'utilisateur :
  57. echo - %nu% >>"L:\classes\201\chat2\users\oublies.unfile"
  58. echo l'admin a ete informe, il vous repondra dans les plus brefs delais
  59. pause
  60. goto home
  61.  
  62. :not
  63. cls
  64. color 0b
  65. echo Identifiant ou mot de passe incorrect !
  66. ping localhost -n 2 >nul
  67. goto home
  68.  
  69. :incor
  70. color 0c
  71. cls
  72. echo Tu t'es trompe de pseudo ou de mot de passe ...
  73. ping localhost -n 2 >nul
  74. goto home
  75.  
  76.  
  77. :logon
  78. color
  79. cls
  80. set /p un=Pseudo :
  81. echo ____________________________
  82. set /p pass=Mot de passe :
  83. if NOT Exist L:\classes\201\chat2\users\%un%.unfile goto not
  84. echo %pass% > "%tmp%\chtmp.tmp"
  85. fc "%tmp%\chtmp.tmp" "L:\classes\201\chat2\users\%un%.unfile" >nul
  86. if errorlevel==1 goto incor
  87. cls
  88. goto chat
  89. :chat
  90. set name=%un%
  91. echo () %name% a rejoint la salle de chat >>"L:\classes\201\chat2\Program_Files\chatroom.chatfile"
  92. :chat1
  93. cls
  94. color 0b
  95. echo ________________________________Chat des 2ndes 1________________________________
  96. findstr /v "*" "L:\classes\201\Chat2\Program_Files\chatroom.chatfile"
  97. echo.
  98. echo =======================================
  99. echo.
  100. set /p text=Texte :
  101. goto 2
  102. :2
  103. echo - %name% : %text% >>"L:\classes\201\chat2\Program_Files\chatroom.chatfile"
  104. goto chat1
  105.  
  106.  
  107.  
  108. :always1
  109. echo desole mais ce Pseudo est deja utilise par un utilisateur inscrit
  110. echo veuillez en choisir un autre
  111. ping localhost -n 3 >nul
  112. goto invite
  113. :invite
  114. cls
  115. set inv=%USERNAME%
  116. if Exist "L:\classes\201\chat2\users\%inv%.unfile" goto always1
  117. goto chat3
  118. :chat3
  119. set name=%inv%
  120. echo l'invite %name% a rejoint la salle de chat depuis l'ordinateur %computername% >>"L:\classes\201\chat2\Program_Files\chatroom.chatfile"
  121. :chat4
  122. cls
  123. color 0b
  124. echo ________________________________Chat________________________________
  125. echo --Ecrivez "*" pour reset--
  126. findstr /v "*" "L:\classes\201\chat2\Program_Files\chatroom.chatfile"
  127. echo.
  128. echo =======================================
  129. echo.
  130. set /p text=Texte :
  131. echo - %name% : %text% >>"L:\classes\201\chat2\Program_Files\chatroom.chatfile"
  132. cls
  133. goto chat4
  134.  
  135. :admin
  136. pause
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement