标题: 【新手练习】密码登陆 [打印本页]
作者: 34N 时间: 2009-2-8 16:24 标题: 【新手练习】密码登陆
- @ECHO OFF
- TITLE 请输入密码
- SET /P PASSWORD=请输入密码
- IF NOT %PASSWORD%==123456 GOTO N
- IF %PASSWORD%==123456 GOTO Y
- :N
- MSG %USERNAME% /TIME 1 密码错误&GOTO END
- :Y
- GOTO SHOW
- :SHOW
- @echo off
- title 数码雨
- ::a
- mode con cols=85 lines=21
- color 0a
- setlocal enabledelayedexpansion
- set a=0
- for %%m in (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) do (
- if !a! leq 9 (set n0!a!=%%m) else (set n!b!=%%m)
- set /a a+=1
- set /a b=!a!-10
- )
- for %%M in (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) do (
- set n!b!=%%M
- set /a b+=1
- )
- for /l %%a in (1,1,20) do (
- set h%%a=
- for /l %%b in (1,1,20) do (
- call,set code=%%n!random:~1,2!%%
- if not defined code (set "code= ")
- set h%%a=!code! !h%%a!
- )
- )
- set num=0
- :a
- set /a num+=1
- if %num% equ 260 set num=0
- ping -n>nul
- cls
- echo, %h1%
- echo, %hn%
- for /l %%a in (3,1,20) do echo, !h%%a!
- for /l %%a in (19,-1,1) do (
- set /a n=1+%%a
- set h!n!=!h%%a!
- )
- set hn=%h2%
- set h1=
- for /l %%b in (1,1,20) do (
- call,set code=%%n!random:~1,2!%%
- if not defined code (set "code= ")
- set h1=!code! !h1!
- )
-
- if %num% gtr 80 (if %num% lss 100 set hn= %h19: = %)
- if %num% gtr 140 (if %num% lss 160 set hn= %h19: = %)
- if %num% gtr 200 (if %num% lss 220 set hn= %h19: = %)
- if %num% gtr 100 (if %num% leq 130 (
- set hn=%hn:~0,20% B a t H o m e I f _ E x i s t %hn:~-20%
- ))
- if %num% gtr 160 (if %num% leq 190 (
- set hn=%hn:~0,19% C n - D o s I f _ E x i s t %hn:~-19%
- ))
- if %num% gtr 220 (if %num% leq 240 (
- set hn=%hn:~0,19% W W W . 3 X 4 Y . C O M %hn:~0,19%
- ))
- for %%a in (100 160 220) do (
- if %num% equ %%a (set hn= =====================+================== ))
- goto :a
- :end
复制代码
新手练习
部分为盗版所得
请高手点评
作者: yslyxqysl 时间: 2009-2-8 16:42
问题很多:
::a应为:a
- IF NOT %PASSWORD%==123456 GOTO N
- IF %PASSWORD%==123456 GOTO Y
- :N
- MSG %USERNAME% /TIME 1 密码错误&GOTO END
- :END
复制代码
可改为- If "%Password%"=="123456" (Goto Y) Else MSG "%UserName%" /TIME 1 密码错误&Exit
复制代码
两个@echo off?
[ 本帖最后由 yslyxqysl 于 2009-2-8 16:49 编辑 ]
作者: aresk 时间: 2009-2-8 19:08
支持,你做的很好,能写这么多了,我都晕了
作者: Batcher 时间: 2009-2-8 19:25
建议养成代码缩进的习惯,你这样的代码风格,很多人根本就不会去看你写的内容是什么。
作者: BBCC 时间: 2009-2-8 19:26
一行代码写出个windows来...
作者: aresk 时间: 2009-2-8 19:30 标题: 回复 5楼 的帖子
1000000行代码再写N多补丁,哈哈
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |