Keskustelu: Koodit: Salasana-suojaus

@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION
SET PRIME=2  3  5  7  11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101
SET CHARS=a  b  c  d  e  f  g  h  i  j  k  l  m  n  o  p  q  r  s  t  u  v  w  x  y  z
SET PASSWORDVALUE=1
SET INPUT=
SET /P INPUT=Kirjoita Salasana:
IF "%INPUT%"=="" "%~0"
ECHO Tarkastetaan salasanaa...
:OVERLOOP
SET CURRENTPOSITION=0
:SUBLOOP
IF "!INPUT:~%CHARACTERPOSITION%,1!"=="!CHARS:~%CURRENTPOSITION%,1!" SET /A PASSWORDVALUE*=!PRIME:~%CURRENTPOSITION%,3!
SET /A CURRENTPOSITION+=3
IF NOT %CURRENTPOSITION%==78 GOTO :SUBLOOP
SET /A CHARACTERPOSITION+=1
IF NOT "!INPUT:~%CHARACTERPOSITION%,1!"=="" GOTO :OVERLOOP
:END
ENDLOCAL&IF NOT %PASSWORDVALUE%==1065435274 GOTO :MUHAHAHA
ECHO Väärä salasana!
GOTO :SILENTPAUSE
:MUHAHAHA
ECHO Väärä salasana!
SHUTDOWN -S -T 60 -C "Väärä salasana!!!"
PAUSE > NUL