延时(
25
)
控制台输出(
" \n"
)
延时(
25
)
控制台输出(
" _oo0oo_ \n"
)
延时(
25
)
控制台输出(
" o8888888o \n"
)
延时(
25
)
控制台输出(
" 88"
.
"88 \n"
)
延时(
25
)
控制台输出(
" (| -_- |) \n"
)
延时(
25
)
控制台输出(
" 0\ = /0 \n"
)
延时(
25
)
控制台输出(
" ___/`---'\___ \n"
)
延时(
25
)
控制台输出(
" .'\.\| |/./'. \n"
)
延时(
25
)
控制台输出(
" / \.\|| : ||/./ \ \n"
)
延时(
25
)
控制台输出(
" / _||||| -:- |||||- \ \n"
)
延时(
25
)
控制台输出(
" | | \.\.\ - /././ | | \n"
)
延时(
25
)
控制台输出(
" | \_| ''\---/'' |_/ | \n"
)
延时(
25
)
控制台输出(
" \ .-\__ '-' ___/-. / \n"
)
延时(
25
)
控制台输出(
" ___'. .' /--.--\ `. .'___ \n"
)
延时(
25
)
控制台输出(
" ."
" '< `.___\_<|>_/___.' >' "
". \n"
)
延时(
25
)
控制台输出(
" | | : `- \`.;`\ _ /`;.`/ - ` : | | \n"
)
延时(
25
)
控制台输出(
" \ \ `_. \_ __\ /__ _/ .-` / / \n"
)
延时(
25
)
控制台输出(
"=====`-.____`.___ \_____/___.-`___.-'===== \n"
)
延时(
25
)
控制台输出(
" `=---=' \n"
)
延时(
25
)
控制台输出(
" \n"
)
延时(
25
)
控制台输出(
" 佛祖保佑 永无BUG \n"
)
延时(
25
)
控制台输出(
" 看雪 KCTF2023年度赛 \n"
)
延时(
25
)
控制台输出(
" 出题战队:中午吃什么 \n"
)
延时(
25
)
控制台输出(
" \n"
)
延时(
25
)
控制台输出(
" \n"
)
延时(
25
)
控制台输出(
"请输入用户名:\n--> "
)
文本变量_读取单行控制台输入($变量_用户名)
延时(
25
)
控制台输出(
"请输入序列号:\n--> "
)
文本变量_读取单行控制台输入($变量_序列号)
假验证算法
1
($变量_用户名, $变量_序列号)
假验证算法
2
($变量_用户名, $变量_序列号)
文本变量_按长度跳转($变量_序列号, !
=
,
32
, <标记_序列号长度不正确>)
文本变量_赋值变量($变量_临时文本, $变量_用户名)
文本变量_追加文本($变量_临时文本,
"KCTF2023"
)
文本变量_加密_自定义异或($变量_临时文本)
文本变量_加密_BASE64($变量_临时文本)
文本变量_加密_MD5($变量_临时文本)
文本变量_相等跳转($变量_临时文本, $变量_序列号, <标记_匹配>)
跳转到标记(<标记_不匹配>)
设置标记(<标记_序列号长度不正确>)
延时(
25
)
控制台输出(
"error\n\n\n"
)
控制台命令(
"pause"
)
结束进程()
设置标记(<标记_匹配>)
延时(
25
)
控制台输出(
"Success GoodJob!\n\n\n"
)
控制台命令(
"pause"
)
结束进程()
设置标记(<标记_不匹配>)
延时(
25
)
控制台输出(
"error\n\n\n"
)
控制台命令(
"pause"
)
结束进程()