腳本序列號
❶ 腳本防封號的技巧
腳本防封號的技巧如下：
1.IP要動態，十個小時換一次。如果不陸畝是動態的，最好經常cclean。
2.不要混用腳本。不要這樣。腳本用了一段時間，馬上換一個，以後再換一個。有些人會誤以為這樣會更安全。其實正好相反。多個腳本留給網易更多的功能。
3.注冊賬號取角色昵稱很重要。衫陸你可以很容易地記住一些序列號，如GZS0001、GZS0002、GZS0003等等。不要拿捉鬼敢死隊01，捉鬼敢死隊02等。你角色的昵稱。看看世界冠軍的小技巧。很多都是用昵稱聯系起來的。封號的時候，所有你沒用過的劇本都會被送進棺材。
4.不要從勞動掛機，輔助不比別人好，每個人都有傻的時候。助手中有一個錯誤。如果人不在，角色長時間停在某個地方，網易會有行為檢測。
5.盡量避開周二周三中午12點、周日下午等網易人工測試時間段。還是注意，沒有掉線提示，馬上掉線其他號碼，防止IP追蹤大封。
沒有（彈出網路中斷或異常陷阱基本沒問題，沒有提示掉線，90%都是在暗室里關機。）
6.不要在電腦上留下任何與黑客、黑客有關的東西。網易也在關注這些事情，因為這個原因造成禁慾主或悉頃義太不值得了。
7.很簡單也很重要的一個。開機時間不要太長。任何程序都可以很容易的檢測出這台機器從開機到當前的運行時間。重啟沒問題。不會花很長時間的。重新啟動至少12-24小時。真的有幾天甚至十幾天我都不忍心關掉工作室。他仍然想知道為什麼腫了。他總是封很多頭銜。特色明確告訴網易你是工作室。他要給人做手術，肯定先找你。https://www.zywjw.com/zb_users/upload/2016/11/2016110857643377.png
❷ 大話西遊2免費版腳本
大話2免費版新手序列號
DB00-3238-3535-8532
DB00-1996-4857-7070
DB00-1282-6201-6344
DB00-8345-2260-4386
DB00-9028-7616-5175
❸ 請教，VBS腳本怎麼獲取電腦硬體序列號
dim bsb,cpu,disk
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_BaseBoard",,48)
For Each objItem in colItems
bsb = "BaseBoard SerialNumber: " & objItem.SerialNumber & vbCrlf & bsb
Next
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_Processor",,48)
For Each objItem in colItems
cpu = "CPU ProcessorId: " & objItem.ProcessorId & vbCrlf & cpu
Next
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_DiskDrive",,48)
For Each objItem in colItems
disk = "DiskDrive SerialNumber: " & objItem.SerialNumber & vbCrlf & disk
Next
dim fso, f
set fso = CreateObject("Scripting.FileSystemObject")
set f = fso.CreateTextFile("D:\test.txt", true) '第二個參數表示目標文件存在時是否覆蓋
f.Write(bsb)
f.Write(cpu)
f.Write(disk)
f.Close()
set f = nothing
set fso = nothing
MsgBox "已完成！"
復制到文本，另存為，右下角編碼選擇ANSI,類型選擇所有，文件名：HWinfo.vbs
❹ 如何從小精靈中提取腳本
一些腳本是作者用大量心血和汗水編寫的，下面是一種利用小精靈加密限制用戶使用的方法。需要作者授權才能單機使用，拷貝到別的電腦無法運行。注冊步驟是發給用戶編譯後的小精靈文件，用戶運行生成注冊碼文件，發給作者者，作者根據注冊碼文件（Script目錄），生成僅能在此用戶電腦上運行的小精靈文件。加密思路：利用用戶C盤硬碟序列號的唯一性與一些隨機碼混合。下面是腳本代碼 VBS Dim fso,dr,sn,snt,i,regstring,file,temp,vaid,serialnumber VBS Set fso=CreateObject("Scripting.FileSystemObject") VBS serialnumber="28"&"3F"&"12"&"02" //此處的283F1202是用戶c盤序列號，分開寫可以避免工具容易查找。 //每個序列號與該電腦對應，根據用戶發來的注冊文件提取，修改該句得到只能在該 //電腦運行的腳本，編譯為小精靈即可 Rem checkreginfo Gosub checkreg If vaid=0 Goto outdoor EndIf Rem mainscript //此處放置需要加密的腳本 Rem outdoor EndScript Sub checkreg If fso.FileExists(".\reginfo.tdt")=0 VBS vaid=0 Gosub creatregtxt VBSCall Call MessageBox("Invaid Register information ,reginfo file created!") Goto checkover EndIf VBS Set file=fso.OpenTextFile(".\reginfo.tdt",1) VBS regstring=file.ReadLine VBS file.Close VBS i=1 VBS sn="" While i<=8 VBS sn=sn&Mid(regstring,5*i,1) VBS i=i+1 EndWhile VBS sn=Clng("&H"&sn) VBS snt=Clng("&H"&serialnumber) If snt=sn VBS vaid=1 VBSCall Call MessageBox("Vaid User!") Else VBS vaid=0 Gosub creatregtxt VBSCall Call MessageBox("Invaid Register information ,reginfo file created!") EndIf Rem checkover Return checkreg EndScript Sub creatregtxt VBS Set file=fso.OpenTextFile(".\reginfo.tdt",2,True) VBS Set dr=fso.GetDrive("c:") VBS sn=Hex