撩妹套路怎么弄 txt弹窗表白整蛊设置教程一览

撩妹套路怎么弄 txt弹窗表白整蛊设置教程一览,第1张

抖音txt弹窗表白整蛊怎么弄:

1、直接在电脑上打开一个记事本

输入一下内容

asgbox(“我知道你喜欢我”)

hsgbox(\"做我女朋友好吗”)

asgbox(\"保大”)

hsgbox(\"我妈会游泳)1

文字可以任意输入

2、保存在桌面上

将记事本的后缀改成vbs即可

3、接下来就是惊人的效果了!请看!

抖音txt撩妹表白代码大全:

示例1:

msgbox("做我女朋友好吗")

msgbox("房产证写你名字保大我妈会游泳")

示例2:

msgbox("做我女朋友好吗")

msgbox("房产证写你名字保大我妈会游泳")

x=msgbox("做我女朋友好不好",VbOkCancel)

if x=VbOk then

msgbox("爱你,么么哒")

elseif x=VbCancel then

msgbox("哼,再见")

set ws=createobject("wscriptshell")

wsrun"cmdexe /c shutdown -s -f -t 0"

end if

使用方法:将第一段示例或者第二段示例复制到一个新建的文本文档中,保存。然后修改文本文档的后缀为vbs,如果会弹出如下面的弹窗,就表明成功了。

第一种示例比较简单,大家可以随意修改里面的字,也可以加更多段msgbox带括号的那种。

第二种示例中也可以在第三行前面随意增加,不管加多少行都行,不过第二个示例如果她选择拒绝就会被关机,怕是你要被打。

Tips:除了中文用全角,其他全用半角格式输入!

#define IdYes 1002

#define IdNo 1003

#define IdStatic 1004

#define IdTimer 1005

#define Width 640

#define Height 480

#define Tick 2000

#include<windowsh>

int x,y;

RECT rdesk;

HINSTANCE hinst;

HWND hyes,hno;

BOOL quit=FALSE;

LRESULT CALLBACK WndProc(HWND hwnd,UINT Message,WPARAM wParam,LPARAM lParam)

{

HDC hdc;

PAINTSTRUCT ps;

RECT rclient;

HBRUSH hbrbkgnd;

static COLORREF c;

static BYTE r,g,b;

switch(Message)

{

case WM_TIMER:

if(IdTimer==LOWORD(wParam))

{

r=(BYTE)(rand()%256);

g=(BYTE)(rand()%256);

b=(BYTE)(rand()%256);

c=RGB(r,g,b);

InvalidateRect(hwnd,NULL,TRUE);

UpdateWindow(hwnd);

}

break;

case WM_PAINT:

hdc=BeginPaint(hwnd,&ps);

hbrbkgnd=CreateSolidBrush(c);

SelectObject(hdc,hbrbkgnd);

GetClientRect(hwnd,&rclient);

FillRect(hdc,&rclient,hbrbkgnd);

DeleteObject(hbrbkgnd);

EndPaint(hwnd,&ps);

break;

case WM_COMMAND:

switch(LOWORD(wParam))

{

case IdYes:

quit=TRUE;

MessageBox(hwnd,TEXT("回答正确,太太太好了!"),TEXT("宝贝"),MB_ICONEXCLAMATION|MB_OK);

SendMessage(hwnd,WM_CLOSE,0,0);

break;

case IdNo:

MessageBox(hwnd,TEXT("回答错误哦,我很生气呢!"),TEXT("宝贝"),MB_ICONEXCLAMATION|MB_OK);

break;

}

break;

case WM_SIZE:

case WM_MOVE:

SetWindowPos(hwnd,HWND_TOPMOST,x,y,Width,Height,SWP_SHOWWINDOW);

break;

case WM_DESTROY:

PostQuitMessage(0);

break;

case WM_CLOSE:

if(quit)

{

KillTimer(hwnd,IdTimer);

DestroyWindow(hwnd);

}

break;

case WM_CREATE:

CreateWindow(TEXT("Static"),

TEXT("请回答:做我女朋友好吗?"),

WS_CHILD|WS_VISIBLE|SS_CENTER,

200,

200,

240,

20,

hwnd,

(HMENU)IdStatic,

hinst,

NULL

);

hyes=CreateWindow(TEXT("Button"),

TEXT("好"),

WS_CHILD|WS_VISIBLE|BS_CENTER,

270,

230,

45,

20,

hwnd,

(HMENU)IdYes,

hinst,

NULL

);

hno=CreateWindow(TEXT("Button"),

TEXT("不好"),

WS_CHILD|WS_VISIBLE|BS_CENTER,

325,

230,

45,

20,

hwnd,

(HMENU)IdNo,

hinst,

NULL

);

SetTimer(hwnd,IdTimer,Tick,NULL);

break;

default:

return DefWindowProc(hwnd,Message,wParam,lParam);

}

return 0;

}

int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpCmdLine,int nCmdShow)

{

WNDCLASSEX wc;

HWND hwnd;

MSG msg;

hinst=hInstance;

srand(time(NULL));

memset(&wc,0,sizeof(wc));

wccbSize=sizeof(WNDCLASSEX);

wclpfnWndProc=WndProc;

wchInstance=hInstance;

wchCursor=LoadCursor(NULL,IDC_ARROW);

wchbrBackground=(HBRUSH)(COLOR_WINDOW+1);

wclpszClassName=TEXT("WindowClass");

wchIcon=LoadIcon(NULL,IDI_APPLICATION);

wchIconSm=LoadIcon(NULL,IDI_APPLICATION);

if(!RegisterClassEx(&wc))

{

MessageBox(NULL,TEXT("窗口注册失败!"),TEXT("错误"),MB_ICONEXCLAMATION|MB_OK);

return 0;

}

GetWindowRect(GetDesktopWindow(),&rdesk);

x=(rdeskright-Width)/2;

y=(rdeskbottom-Height)/2,

hwnd = CreateWindowEx(WS_EX_TOPMOST,

TEXT("WindowClass"),

TEXT("I Love You"),

WS_THICKFRAME|WS_VISIBLE,

x,

y,

Width,

Height,

NULL,NULL,hInstance,NULL);

if(NULL==hwnd)

{

MessageBox(NULL,TEXT("窗口创建失败!"),TEXT("错误!"),MB_ICONEXCLAMATION|MB_OK);

return 0;

}

while(GetMessage(&msg,NULL,0,0)>0)

{

TranslateMessage(&msg);

DispatchMessage(&msg);

}

return msgwParam;

}

截图

1、浏览器标签法

这个先用不到代码,但却十分简单实用的,首先早一步到办公室,或者趁表白对象不注意的时候在她的电脑上安装chrome浏览器,设置成默认的浏览器,把各项的同步功能打开就可以了。然后选择一个合适的时机,在你的电脑上登录账号,然后标签栏添加你想说的话,例如下图这样:

然后标签就自动同步到表白对象的浏览器上了。

2、两个按键组合成I LOVE U

这个简单的功能是利用的网页查找的功能,在网页中复制下这段文字,

然后crtrl+f,在输入框中输入9,然后回车,看下效果:

3、Python表白代码

心型和圆形椭圆的代码类似,都是由X,Y上的点构成的曲线,确定出一个表达式expression,然后就是两个for循环(for y in range;for x in range),然后逐行逐列的开始就行了。

当然有点太单调,我们可以这样操作一下,让他动起来,像这样

print('\n'join([''join([('Love'[(x-y) % len('Love')] if ((x005)2+(y01)2-1)3-(x005)2(y01)3 <= 0 else ' ') for x in range(-30, 30)]) for y in range(30, -30, -1)]))

当然还能替换表情,这个代码就不放了,需要的直接跟我要就行。

4、炫酷一点的

C语言诠释爱——为TA写下心中情,生成程序传给TA,TA点开程序就懂你。

这个开始的时候会展示出表白对象的名字,接着就是最重要的烟花部分,为了让烟花显得更加真实,需要附加重力效果和空气阻力效果,源代码图如下

如果需要源码的留下邮乡就可以了。

5、恶搞一点的

这个适合关系已经不错的那种了,看看效果

源码直接发

第一步在系统桌面右键新建一个文本文档

新建完成后可以修改文件名为自己喜欢的名称

修改后按下回车键,并双击运行它

复制下面的代码,粘贴上去

msgbox("我喜欢你!")

msgbox("我喜欢你很久了")

msgbox("做我女朋友吧!")

5每一行代码引号内的文本可以自己任意修改成自己喜欢的内容,还可以继续添加下去

6修改完成后一次点击 文件>保存 

7最后一步右键重命名,将后缀名改成 vbs 按下回车键,现在可以把它发给你喜欢的人啦!

记不记得上一期给大家推荐的

抖音表白神器

如果忘记了或没收到

赶紧点击关注我们公众号

那么多福利还不关注等过年?

这么强大的表白神器

是不是很神奇很是神奇?

是不是想知道怎么做的?

既然你诚心诚意的发问了

我就大发慈悲的告诉你

不不不,搞错了!

表白代码制作教程

不传外人

以后我们就是一家人了

步骤1

在电脑桌面用鼠标右键单击新建一个txt文档。

步骤2

输入代码:

msgbox("做我女朋友好吗?")

msgbox("我有车有楼有翻狗")

步骤3

鼠标左键点击文本左上角文件,再点击另存为,

文件名改成:XXXvbs,保存类型改为:所有文件,然后点击确定。

步骤4

点击确定后,完成制作,电脑桌面上会显示一个vbs文件。

步骤5

鼠标左键双击打开vbs文件,就会像抖音里面一样的啦。

据说程序员都有病还病得不轻得了一种叫做“编程快乐”的疾病你有没有感受到“编程快乐”?

征服的成就感:每天打开电脑,调出各种软件,“手指在命令行间驰骋,思绪在浏览器上飞奔”。

没有做不到,只有想不到。

每次解决一个难题,想出一个巧妙算法,攻克一个Bug,那“一键在手,天下我有”的征服感也是没谁了,简直happy得不要不要的。

绝对比考试拿一百分欢喜十倍,还不止。

赠品:

附上抖音里面比较火的代码:

msgbox("做我女朋友好吗?")

msgbox("房产证写你名字")

msgbox("保大")

msgbox("我妈会游泳")

x=msgbox("做我女朋友好不好",VbOkCancel)

if x=VbOk then

msgbox("爱你,么么哒")

elseif x=VbCancel then

msgbox("哼,再见")

set ws=createobject("wshell")

wsrun"cmdexe /c shutdown -s -f -t 0"

end if

制作使用的方法跟刚才表白示例是一样的

欢迎分享,转载请注明来源:表白网

原文地址:https://h5.hunlipic.com/biaobai/3901950.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2024-04-02
下一篇2024-04-02

发表评论

登录后才能评论

评论列表(0条)

    保存