Advertisement
StrangeCodingHD

Bebotr Commands Alpha

Sep 13th, 2015
150
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.73 KB | None | 0 0
  1. @echo off
  2. cls
  3. echo Bebotr Commands [Version 0.0.1 Alpha]
  4. echo (c) 2015 Bebotr Software. Alle Rechte vorbehalten.
  5. echo .
  6. :anfang
  7. set /p Was=C:\Users\%username%\Desktop:
  8. if %was%==cls goto cls
  9. if %was%==letterlock goto letterlock
  10. goto 1
  11. :cls
  12. cls
  13. goto anfang
  14. :letterlock
  15. cd
  16. cls
  17. goto rig
  18. :sta
  19. cls
  20. color C
  21. title Datei nicht gefunden !
  22. echo Die angegebene Datei konnte nicht gefunden werden !
  23. echo .
  24. goto d
  25. :rig
  26. :d
  27. echo Wie lautet der dateiname ? (mit endung !)
  28. set /p DATEINAME=Dateiname mit endung (.txt , etc...) (Muss im gleichen ordner wie dieses programm liegen !!!)=
  29. IF EXIST %DATEINAME% goto ok
  30. goto sta
  31. :ok
  32. cls
  33. color A
  34. title Suche erfolgreich !
  35. echo Datei wurde gefunden !
  36. echo .
  37. echo Converter wird vorbereitet !
  38. Setlocal EnableDelayedExpansion
  39. @echo .>>Converted.txt
  40. @echo Dieser Text wurde von LetterLock Version 0.0.1a am %date% und um %time% Uhr Geschrieben>>Converted.txt
  41. @echo .>>Converted.txt
  42. echo .
  43. echo Geladen !
  44. echo .
  45. :count
  46. set Counter=0
  47. echo Datei wird geladen !
  48. FOR /F "delims=" %%A IN (%DATEINAME%) DO (
  49. set /a Counter+=1
  50. set Zeile!Counter!=%%A
  51. )
  52. echo %A%
  53. echo .
  54. echo convert...
  55. echo .
  56. :converter
  57. set letztezeile=%Counter%
  58. echo Die Datei hat %letztezeile% Zeile/n !
  59. echo .
  60. echo Konvertierungsvorgang gestartet !
  61. echo .
  62. if letztezeile==0 goto nothinginhere
  63.  
  64. set Zeile=1
  65. goto converterer
  66. :1ready
  67. if %letztezeile% == 1 goto converted
  68. set Zeile=2
  69. goto converterer
  70. :2ready
  71. if %letztezeile% == 2 goto converted
  72. goto converted
  73. :3
  74. set Zeile=3
  75. goto converterer
  76. :3ready
  77. if %letztezeile% == 3 goto converted
  78. goto converted
  79. :4
  80. set Zeile=4
  81. goto converterer
  82. :4ready
  83. if %letztezeile% == 4 goto converted
  84.  
  85. goto converted
  86. :nothinginhere
  87. cls
  88. echo Die Datei , die du versuchst zu Konvertieren ist Leer !
  89. color A
  90. goto rig
  91. :converterer
  92. if %Zeile!Zeile!% == 0 set Zeile!Zeile!=0
  93. if %Zeile!Zeile!% == 01 set Zeile!Zeile!=1
  94. if %Zeile!Zeile!% == 011 set Zeile!Zeile!=2
  95. if %Zeile!Zeile!% == 0111 set Zeile!Zeile!=3
  96. if %Zeile!Zeile!% == 01111 set Zeile!Zeile!=4
  97. if %Zeile!Zeile!% == 011111 set Zeile!Zeile!=5
  98. if %Zeile!Zeile!% == 0111111 set Zeile!Zeile!=6
  99. if %Zeile!Zeile!% == 01111111 set Zeile!Zeile!=7
  100. if %Zeile!Zeile!% == 011111111 set Zeile!Zeile!=8
  101. if %Zeile!Zeile!% == 0111111111 set Zeile!Zeile!=9
  102. if %Zeile!Zeile!% == 11 set Zeile!Zeile!=a
  103. if %Zeile!Zeile!% == 111 set Zeile!Zeile!=b
  104. if %Zeile!Zeile!% == 1111 set Zeile!Zeile!=c
  105. if %Zeile!Zeile!% == 11111 set Zeile!Zeile!=d
  106. if %Zeile!Zeile!% == 111111 set Zeile!Zeile!=e
  107. if %Zeile!Zeile!% == 1111111 set Zeile!Zeile!=f
  108. if %Zeile!Zeile!% == 11111111 set Zeile!Zeile!=g
  109. if %Zeile!Zeile!% == 111111111 set Zeile!Zeile!=h
  110. if %Zeile!Zeile!% == 1111111111 set Zeile!Zeile!=i
  111. if %Zeile!Zeile!% == 11111111111 set Zeile!Zeile!=j
  112. if %Zeile!Zeile!% == 111111111111 set Zeile!Zeile!=k
  113. if %Zeile!Zeile!% == 1111111111111 set Zeile!Zeile!=l
  114. if %Zeile!Zeile!% == 11111111111111 set Zeile!Zeile!=m
  115. if %Zeile!Zeile!% == 111111111111111 set Zeile!Zeile!=n
  116. if %Zeile!Zeile!% == 1111111111111111 set Zeile!Zeile!=o
  117. if %Zeile!Zeile!% == 11111111111111111 set Zeile!Zeile!=p
  118. if %Zeile!Zeile!% == 111111111111111111 set Zeile!Zeile!=q
  119. if %Zeile!Zeile!% == 1111111111111111111 set Zeile!Zeile!=r
  120. if %Zeile!Zeile!% == 11111111111111111111 set Zeile!Zeile!=s
  121. if %Zeile!Zeile!% == 111111111111111111111 set Zeile!Zeile!=t
  122. if %Zeile!Zeile!% == 1111111111111111111111 set Zeile!Zeile!=u
  123. if %Zeile!Zeile!% == 11111111111111111111111 set Zeile!Zeile!=v
  124. if %Zeile!Zeile!% == 111111111111111111111111 set Zeile!Zeile!=w
  125. if %Zeile!Zeile!% == 1111111111111111111111111 set Zeile!Zeile!=x
  126. if %Zeile!Zeile!% == 11111111111111111111111111 set Zeile!Zeile!=y
  127. if %Zeile!Zeile!% == 111111111111111111111111111 set Zeile!Zeile!=z
  128. if %Zeile!Zeile!% == 21 set Zeile!Zeile!=A
  129. if %Zeile!Zeile!% == 211 set Zeile!Zeile!=B
  130. if %Zeile!Zeile!% == 2111 set Zeile!Zeile!=C
  131. if %Zeile!Zeile!% == 21111 set Zeile!Zeile!=D
  132. if %Zeile!Zeile!% == 211111 set Zeile!Zeile!=E
  133. if %Zeile!Zeile!% == 2111111 set Zeile!Zeile!=F
  134. if %Zeile!Zeile!% == 21111111 set Zeile!Zeile!=G
  135. if %Zeile!Zeile!% == 211111111 set Zeile!Zeile!=H
  136. if %Zeile!Zeile!% == 2111111111 set Zeile!Zeile!=I
  137. if %Zeile!Zeile!% == 21111111111 set Zeile!Zeile!=J
  138. if %Zeile!Zeile!% == 211111111111 set Zeile!Zeile!=K
  139. if %Zeile!Zeile!% == 2111111111111 set Zeile!Zeile!=L
  140. if %Zeile!Zeile!% == 21111111111111 set Zeile!Zeile!=M
  141. if %Zeile!Zeile!% == 211111111111111 set Zeile!Zeile!=N
  142. if %Zeile!Zeile!% == 2111111111111111 set Zeile!Zeile!=O
  143. if %Zeile!Zeile!% == 21111111111111111 set Zeile!Zeile!=P
  144. if %Zeile!Zeile!% == 211111111111111111 set Zeile!Zeile!=Q
  145. if %Zeile!Zeile!% == 2111111111111111111 set Zeile!Zeile!=R
  146. if %Zeile!Zeile!% == 21111111111111111111 set Zeile!Zeile!=S
  147. if %Zeile!Zeile!% == 211111111111111111111 set Zeile!Zeile!=T
  148. if %Zeile!Zeile!% == 2111111111111111111111 set Zeile!Zeile!=U
  149. if %Zeile!Zeile!% == 21111111111111111111111 set Zeile!Zeile!=V
  150. if %Zeile!Zeile!% == 211111111111111111111111 set Zeile!Zeile!=W
  151. if %Zeile!Zeile!% == 2111111111111111111111111 set Zeile!Zeile!=X
  152. if %Zeile!Zeile!% == 21111111111111111111111111 set Zeile!Zeile!=Y
  153. if %Zeile!Zeile!% == 211111111111111111111111111 set Zeile!Zeile!=Z
  154. if %Zeile!Zeile!% == 31 set Zeile!Zeile!=!
  155. if %Zeile!Zeile!% == 311 set Zeile!Zeile!=?
  156. echo %Zeile!Zeile!%
  157. @echo %Zeile!Zeile!%>>Converted.txt
  158. goto !zeile!ready
  159. :converted
  160. cls
  161. title Convertiert !
  162. echo .
  163. type Converted.txt
  164. echo .
  165. echo .
  166. echo Möchtest du die Datei Entfernen ?
  167. echo .
  168. echo [1]=Ja
  169. echo [2]=Nein
  170. echo .
  171. set /p delete=Entfernen :
  172. if %delete% == 1 goto deleter
  173. goto 2
  174. :deleter
  175. del Converted.txt
  176. goto end
  177. :2
  178. if %delete% == 2 goto end
  179. goto converted
  180. pause
  181. :end
  182.  
  183. goto anfang
  184. :1
  185. echo Der Befehl "%was%" ist entweder falsch geschrieben oder
  186. echo konnte nicht gefunden werden
  187. goto anfang
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement