bat表白代码大全,黑客表白代码教程简单

bat告白代码(不要改变英语) ) ) ) )。

@ echoofftitlelovesetlocalenabledelayedexpansion

mode con: cols=36 lines=19

:loop

set colors=12345689abcde

set /a rand=%random%% 1

设置颜色=！ colors:~%rand%，1！

color 0%color%

欧盟。

echo **** ****

echo ******* *******

ECho * * * * * * * * * * * * * * * * * * * * * * * * * * *

ECho * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

ECho * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

ECho * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

ECho * * * * * * * * * * * * * * * * * * * * * * * * * * * *

ECho * * * * * * * * * * * * * * * * * * * * * * * *

ECho * * * * * * * * * * * * * * * * * *

ECho * * * * * * * * * * * * *

echo *******

echo ***

echo *

echo I love you

echotodayismy 197 dayssinceourfirstkiss

echoiwanttocomfortyouintherestofmylife

ping 127.1 -n 2 nul

cls

谷歌地球

echo. pause nul

这是bat的告白代码。

接下来是vbs的(中文可以改变，但英语不能改变的话就不能使用)。

const title='我已经关注你很久了'

常数your name='嫦娥'

常数问题='你最喜欢的人是谁？请在下面的框中输入他的名字。'

const info='在说谎！不要逃跑，老实说。 " "

const scend='你说出你的心，就向他(她)表白吧。'

dim youranswer

德奥

youranswer=inputbox(question，title )。

ifyouransweryournamethenmsgboxinfo，VB信息vbokonly，title

loop until youranswer=yourname

msgbox scend，VB信息vbokonly，title