魔域腳本源碼
1. 80分懸賞！魔域的腳本怎麼使用
魔域中腳本變數大全
變數名稱 說明
<$USERNAME> 人物名稱
<$GUILDNAME> 行會名稱
<$RANKNAME> 行變數名稱 說明
<$USERNAME> 人物名稱
<$GUILDNAME> 行會名稱
<$RANKNAME> 行會職位名稱
<$LEVEL> 等級
<$HP> 生命值
<$AC> 防禦力
<$MAXAC> 最高防禦力
<$MAC> 魔法防禦力
<$MAXMAC> 最高魔法防禦力
<$DC> 物理攻擊力
<$MAXDC> 最高物理攻擊力
<$MC> 魔法力
<$MAXMC> 最高魔法力
<$SC> 道術
<$MAXSC> 最高道術
<$EXP> 當前經驗值
<$MAXEXP> 升級經驗值
<$PKPOINT> PK點數
<$CREDITPOINT> 聲望點數
<$GOLDCOUNT> 金幣數量
<$GAMEGOLD> 游戲幣數
<$GAMEPOINT> 游戲點數
<$HW> 腕力
<$MAXHW> 最高腕力
<$BW> 背包重量
<$MAXBW> 最高背包重量
<$WW
文:魔域私服工具 發表時間:2008-2-4 21:04:57
101 0 【對話內容】 對話框的提示部分，內容自己添加（也就是介紹累的）
102 0 【內容】 【ID】 點【內容】後執行 【id】裡面的命令ID為 acction裡面的
103 0 【參數】【ID】 彈出需要輸入文字的對話框【參數】：【代碼】【執行ID】
代碼解釋：10，導師經驗；15 ，軍團命名
104 0 【三位數字代碼】 好像是系統執行的代碼，具體代碼含義暫時不了解
121 0 1 2 系統隨即選擇一個id_next 還是id_nextfail 的執行，後面的數值越大幾率越小 大概幾率就是 1/後面的數值
122 0 【ID】 從param隨即選擇一個，注意：ID 2個一組，一組需要相同 【id】裡面的命令ID為 acction裡面的
123 【參數】 時間 數值 時間判斷 【參數】data=0 是年月日時分到年月日時分；data=1 是月日時分到月日時分；
data=2 是日時分到日時分；data=3 是星期時分到星期時分；data=4 是幾點幾分到幾點幾分
data=5 每【數值】分鍾 到 每數值分鍾之間
舉例： data 3 param 4 00:01 4 23:59 到星期四開始
124 1067 結婚
125 2011 【內容】 GM提示
126 0 【對話內容】 只有確定的對話框，內容自己添加
213 1900 【對話內容】 拍賣
216 1900 1 拍賣完畢，關閉窗口
312 0 坐標 效果 例如：1000 846 513 pet31
501 【物品ID】 開禮包
502 【物品ID】 給予 data 裡面的物品 ID自己找
507 0 物品ID 物品ID 數量 收回【物品ID】物品 【數量】個
508 0 1 0 50 判斷空位，第一位數字代表幾個空位，最後一個代表類型
50，技能欄；52，幻獸背包；
510 【物品ID】0 1 0 0 0 0 0 0 50 50 0 0 給予 data 裡面的物品 ID自己找，param物品附加的屬性
701 0 50 500000 250000 建立軍團，50代表等級，中間代表錢數，後面的不知道
702 0 解散軍團
717 0 member_title = 【數值】 老大名字1，軍團長；2，幫主；3，教主 ；4，會長
723 0 【參數/數值】 數值軍團等級；+=1 增加軍團等級
801 0 dropitem 【物品ID】 刪除物品
0 dropmoney 【數值】 刪除金錢
802 0 check/learn 【技能ID】 check檢查幻獸技能，learn學習技能
1001 0 【具體條件】 主要是對人物操作，判斷符號有 <;=;+=;== 格式【參數】 【符號】 【具體數值】 部分參數：
money 金幣；e_money 磨石；exp 經驗；level 等級；nobility_rank爵位；tutor_level 導師等級；
tutor_exp 導師經驗；student_exp 學員經驗；rankshow 軍團榮譽；exploit 功勛；
maxlifepercent 健康狀態（估計就是HP值）
1003 0 地圖代碼 X坐標 Y坐標 傳送陣，傳送到param的地圖坐標上
1004 0 地圖代碼 X坐標 Y坐標 %user_map_id %user_map_x %user_map_y 表示玩家回程的坐標
1010 【數值】 【具體內容】 【數值】：2000 系統公告；2005 個人的；
1005 0 style. 【1-8】 染發的 具體顏色 由數字1-8決定，自己研究去把
1020 0 check/learn 【技能ID】 check檢查人物技能，learn學習技能
1024 0 離婚
1026 0 好像是強制離婚
1025 0 判斷是否有配偶
1027 0 self 【FF07-1】 使用後的外管效果【】裡面的自己研究 other65，FF07-1 等等了，自己研究吧懶得寫了
1029 0 play sound/trap.wav 0 0 1 聲音調用
1051 0 導師經驗提取完畢
1080 1006 【命令行】 命令行，有參數 new，begintime reset
1081 3568 begintime reset 同上，具體什麼條件由 data決定，判斷公式由 param 決定 兩者的區別還沒找出來
new
1046 【數字】 各種窗口，一般對應102後面的，數字代表類型
1 商店窗口；5，下達任務；6，未接任務；7，我的任務；8，已接任務
13 孵化所 ；14 死亡的幻獸和必要的寶石招魂 ；15 強化幻獸和；16 幻獸倉庫
21，參與拍賣；22，拍賣；23，鍛造（靈魂寶石）；24，鍛造（魔魂寶石）；25，鍛造（幻魔寶石）
27，拍賣倉庫；28，鑒定；29 幻獸進化界面；30，重塑幻獸；31 幻獸洗天賦；
44，環保練功；47，注入寶石；49，高級鍛造
4001 0 22 30150 600 0 格式解釋：狀態代碼 技能效果百分比 持續時間（單位秒） 這個不清楚
效果百分比： 數值-30100 比如 30150 - 30100 就是 50，效果增加 50%
狀態代碼：22 傷害力 ；52 經驗增加 ； 47 閃避增加 ； 48 XP恢復速度；49 獲得金錢；50
2006 0 0 0 8700 168 231 1001100 10011 0 幽影巫王 刷怪，前面是怪物的屬性
2008 0 8700 name 幽影巫王 == 0 檢查某地圖 怪物 數量
2009 0 8700 10011 0 幽影巫王
文:魔域私服工具 發表時間:2008-2-4 21:04:57
負重力
<$MAXWW> 最高負重
<$HUNGER> 飢餓程度
<$LOGINTIME> 登錄時間
<$LOGINLONG> 登錄時長
<$DRESS> 衣服
<$WEAPON> 武器
<$RIGHTHAND> 蠟燭
<$HELMET> 頭盔
<$NECKLACE> 項鏈
<$RING_R> 右戒指
<$RING_L> 右戒指
<$ARMRING_R> 右手鐲
<$ARMRING_L> 左手鐲
<$BUJUK> 護身符
<$BELT> 腰帶
<$BOOTS> 鞋子
<$CHARM> 寶石
<$CASTLENAME> 沙城名稱
伺服器信息
變數名稱
說 明
<$SERVERNAME> 伺服器名字
<$SERVERIP> 伺服器IP地址
<$WEBSITE> 游戲網址
<$BBSSITE> 論壇網址
<$CLIENTDOWNLOAD> 客戶端程序下載地址
<$QQ> 聯系QQ號
<$PHONE> 聯系電話號碼
<$BANKACCOUNT0> 銀行帳號信息
<$BANKACCOUNT1> 銀行帳號信息
<$BANKACCOUNT2> 銀行帳號信息
<$BANKACCOUNT3> 銀行帳號信息
<$BANKACCOUNT4> 銀行帳號信息
<$BANKACCOUNT5> 銀行帳號信息
<$BANKACCOUNT6> 銀行帳號信息
<$BANKACCOUNT7> 銀行帳號信息
<$BANKACCOUNT8> 銀行帳號信息
<$BANKACCOUNT9> 銀行帳號信息
<$GAMEGOLDNAME> 游戲幣名稱
<$USERCOUNT> 在線人數
<$DATETIME> 當前日期時間
<$GAMEGOLDNAME> 游戲幣名稱
<$HIGHLEVELINFO> 最高等人物信息
<$HIGHPKINFO> 最高PK點數人物信息
<$HIGHDCINFO> 最高攻擊力人物信息
<$HIGHMCINFO> 最高魔法力人物信息
<$HIGHSCINFO> 最高道術人物信息
會職位名稱
<$LEVEL> 等級
<$HP> 生命值
<$AC> 防禦力
<$MAXAC> 最高防禦力
<$MAC> 魔法防禦力
<$MAXMAC> 最高魔法防禦力
<$DC> 物理攻擊力
<$MAXDC> 最高物理攻擊力
<$MC> 魔法力
<$MAXMC> 最高魔法力
<$SC> 道術
<$MAXSC> 最高道術
<$EXP> 當前經驗值
<$MAXEXP> 升級經驗值
<$PKPOINT> PK點數
<$CREDITPOINT> 聲望點數
<$GOLDCOUNT> 金幣數量
<$GAMEGOLD> 游戲幣數
<$GAMEPOINT> 游戲點數
<$HW> 腕力
<$MAXHW> 最高腕力
<$BW> 背包重量
<$MAXBW> 最高背包重量
<$WW> 負重力
<$MAXWW> 最高負重
<$HUNGER> 飢餓程度
<$LOGINTIME> 登錄時間
<$LOGINLONG> 登錄時長
<$DRESS> 衣服
<$WEAPON> 武器
<$RIGHTHAND> 蠟燭
<$HELMET> 頭盔
<$NECKLACE> 項鏈
<$RING_R> 右戒指
<$RING_L> 右戒指
<$ARMRING_R> 右手鐲
<$ARMRING_L> 左手鐲
<$BUJUK> 護身符
<$BELT> 腰帶
<$BOOTS> 鞋子
<$CHARM> 寶石
<$CASTLENAME> 沙城名稱
伺服器信息
變數名稱
說 明
<$SERVERNAME> 伺服器名字
<$SERVERIP> 伺服器IP地址
<$WEBSITE> 游戲網址
<$BBSSITE> 論壇網址
<$CLIENTDOWNLOAD> 客戶端程序下載地址
<$QQ> 聯系QQ號
<$PHONE> 聯系電話號碼
<$BANKACCOUNT0> 銀行帳號信息
<$BANKACCOUNT1> 銀行帳號信息
<$BANKACCOUNT2> 銀行帳號信息
<$BANKACCOUNT3> 銀行帳號信息
<$BANKACCOUNT4> 銀行帳號信息
<$BANKACCOUNT5> 銀行帳號信息
<$BANKACCOUNT6> 銀行帳號信息
<$BANKACCOUNT7> 銀行帳號信息
<$BANKACCOUNT8> 銀行帳號信息
<$BANKACCOUNT9> 銀行帳號信息
<$GAMEGOLDNAME> 游戲幣名稱
<$USERCOUNT> 在線人數
<$DATETIME> 當前日期時間
<$GAMEGOLDNAME> 游戲幣名稱
<$HIGHLEVELINFO> 最高等人物信息
<$HIGHPKINFO> 最高PK點數人物信息
<$HIGHDCINFO> 最高攻擊力人物信息
<$HIGHMCINFO> 最高魔法力人物信息
<$HIGHSCINFO> 最高道術人物信息
2. 魔域自動刷怪的腳本，要免費的
UserVardcs=15"打怪次數循環"
UserVarszg=5"隨機找怪循環"
LockMouse
jici=0
moli=0
FindPic213,89,714,708,"Attachment:21.bmp",0.9,X,Y
IfX>0AndY>0Then
MoveToX+6,Y+6
Delay200
LeftDown1
Delay20
LeftUp1
Delay240
EndIf
Remshouguai
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
MoveTointX+4,intY+10
Delay250
LeftDown1
Delay20
LeftUp1
Delay20
LeftDown1
Delay20
LeftUp1
Delay20
Delay2100
Calldaguai()
else
Callsuijishouguai()
EndIf
Subsuijishouguai()
Ifjici=szgThen
Delay500
KeyDown"1",1
Delay20
KeyUp"1",1
Delay20
jici=0
EndIf
Remcxv
skipsub=int(8*Rnd+1)
Ifskipsub>8Then
Gotocxv
EndIf
Ifskipsub=1Then
jici=jici+1
Callas1()
EndIf
Ifskipsub=2Then
jici=jici+1
Callas2()
EndIf
Ifskipsub=3Then
jici=jici+1
Callas3()
EndIf
Ifskipsub=4Then
jici=jici+1
Callas4()
EndIf
Ifskipsub=5Then
jici=jici+1
Callas5()
EndIf
Ifskipsub=6Then
jici=jici+1
Callas6()
EndIf
Ifskipsub=7Then
jici=jici+1
Callas7()
EndIf
Ifskipsub=8Then
jici=jici+1
Callas8()
EndIf
EndSub
Subas1()
MoveTo522,246
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo522,246
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas2()
MoveTo526,352
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo526,352
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas3()
MoveTo525,444
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo525,444
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas4()
MoveTo681,455
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo681,455
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas5()
MoveTo859,450
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo859,450
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas6()
MoveTo862,317
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo862,317
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas7()
MoveTo816,224
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo816,224
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas8()
MoveTo671,194
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo671,194
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subdaguai()
MoveTo688,330
Fordcs
KeyDown"F3",1
Delay20
KeyUp"F3",1
Delay200
Next
MoveToX+4,Y+4
Delay20
LeftDown1
Delay20
LeftUp1
Delay1500
jici=0
moli=moli+1
Ifmoli=30Then
Calljialan()
EndIf
Gotoshouguai
EndSub
Subjialan()
Delay100
KeyDown"3",1
Delay20
KeyUp"3",1
Delay20
Delay100
moli=0
Gotoshouguai
EndSub
附件
3. 魔域自動交易（按鍵精靈腳本）
沒有物品寶寶存倉庫,有的可以自己增加一下.
VBS dim tp(16),a,x,y,linex,liney,bx,by,s,i,jsq
VBS jsjg,jsjiage,jyjg,jyjiage,zdljg,zdljiage,mhjg,mhjiage,hmjg,hmjiage
VBS jszjg,jszjiage,jyzjg,jyzjiage,zdlzjg,zdlzjiage,mhzxjg,mhzxjiage,hmzxjg,hmzxjiage
VBS lhjg,lhjiage,ojg,ojiage,gxjg,gxjiage,sxjg,sxjiage,fzjg,fzjiage
VBS zzjg,zzjiage,cjqsjg,cjqsjiage,zongjiage
//聲明變數
UserVar jsjg=1 減傷害低級的價格
UserVar jyjg=1 經驗低級的價格
UserVar zdljg=5 戰鬥力低級的價格
UserVar mhjg=3 魔魂的價格
UserVar hmjg=7 幻魔的價格
UserVar jszjg=15 減傷害中級的價格
UserVar jyzjg=15 經驗中級的價格
UserVar zdlzjg=60 戰鬥力中級的價格
UserVar mhzxjg=90 魔魂之心的價格
UserVar hmzxjg=120 幻魔之心的價格
UserVar lhjg=60 靈魂的價格
UserVar ojg=20 O型寶寶的價格
UserVar gxjg=6 孤星的價格
UserVar sxjg=6 雙星的價格
UserVar fzjg=15 法豬的價格
UserVar zzjg=15 戰豬的價格
UserVar cjqsjg=7 莎菲的價格
VBS tp(0)="1js1":tp(1)="2jyx1":tp(2)="3zdx5":tp(3)="4mh4":tp(4)="5hm8":tp(5)="6jsz15"
VBS tp(6)="7jyz15":tp(7)="8zdz60":tp(8)="9mhzx100":tp(9)="10hmzx120":tp(10)="11lh70":tp(11)="12o20"
VBS tp(12)="13gx5":tp(13)="14sx5":tp(14)="15fz14":tp(15)="16zz14":tp(16)="17cjqs7"
//初始化變數，x是區域左邊、y是區域左邊、bx是區域下邊、by是區域下邊，s是圖片數量
UserVar str1="收裁決騎士莎菲7 雙防22 豬18 雙孤星8 戰鬥力+1/5" 請輸入自動叫喊的第1句話
UserVar str2="人在【一】號攤位旁邊賣的速度,不收的東西放上去價格全部不計" 請輸入自動叫喊的第2句話
UserVar str3="收裁決騎士莎菲7 雙防22 豬18 雙孤星8 戰鬥力+1/5" 請輸入自動叫喊的第3句話
UserVar str4="請速度放上東西,時間不等人,不收的東西放上去價格全部不計" 請輸入自動叫喊的第4句話
UserVar str5="這是自動喊的第5句話" 請輸入自動叫喊的第5句話
UserVar Yanshi=5000 兩句喊話之間的等待時間，1秒鍾是1000
//****************設置結束*****************
Delay 4000
Rem 開始喊話
KeyPress 13 1
Delay 300
SayExpression str1
KeyPress 13 1
Delay Yanshi
Gosub 檢查有沒有交易
KeyPress 13 1
Delay 300
SayExpression str2
KeyPress 13 1
Gosub 檢查有沒有交易
Delay Yanshi
KeyPress 13 1
Delay 300
SayExpression str3
KeyPress 13 1
Gosub 檢查有沒有交易
Delay DaYanshi
Rem 等待半分鍾後，進行下一輪叫賣
Goto 開始喊話
EndScript
Sub 程序開始
Gosub 計算物品數量
Delay 100
Gosub 輸入價錢
Delay 100
Gosub 交易等待
Return 程序開始
Sub 檢查有沒有交易
VBSCall findpic(0,0,1024,768,"..myphoto商貿.bmp",0.9,x,y)
If x>=0 and y>=0
Delay 300
MoveTo 443,446
Delay 500
LeftClick 1
Delay 2000
Gosub 檢測放物品
Delay 500
Gosub 程序開始
EndIf
EndIf
Return 檢查有沒有交易
Sub 檢測放物品
VBS i=0
VBS a = 0 : x = 51 : y = 264
VBS s=0
For 12
Rem 開始檢測放物品
If i>=6
Goto 檢測放物品結束
EndIf
IfColor x,y,80808,2
Delay 2000
VBS i=i+1
Goto 開始檢測放物品
Else
VBS x=x+34
VBS i=0
VBS a=a+1
If a=5
VBS x = 51 : y = 264+34
EndIf
EndIf
EndFor
Rem 檢測放物品結束
Return 檢測放物品
Sub 檢測交易有沒有被提前結束
IfColor 125,144,896c6,2
IfColor 149,141,896c6,2
Goto 交易沒被結束
Else
Goto 開始喊話
EndIf
Else
Goto 開始喊話
EndIf
Rem 交易沒被結束
Return 檢測交易有沒有被提前結束
Sub 計算物品數量
VBS i=0
Gosub 檢測交易有沒有被提前結束
For 17
VBS a = 0 : x = 34 : y = 247 : bx = 294 : by = 347
VBS s=0
Delay 100
While a = 0
//如果變數a等於0，則循環執行下面命令
Delay 10
VBSCall findpic(x,y,bx,by,"..myphoto"&tp(i)&".bmp",0.9,x,y)
//區域找圖
If x>=0 and y>=0
//Delay 1000
//MoveTo x,y
//Delay 1000
//MoveTo 247,294
//Delay 3000
x = x + 34 : by = y + 34
//區域左邊加1。這里的34指的是圖片的寬度，自改
s = s + 1
//如果找到圖片在數量上加1
Rem line
Delay 10
VBSCall findpic(x,y,bx,by,"..myphoto"&tp(i)&".bmp",0.9,linex,liney)
//這是是在同一行再查找
If linex>=0 and liney>=0
//Delay 1000
//MoveTo linex,liney
//Delay 1000
//MoveTo 247,294
//Delay 3000
x = linex + 34
//區域左邊加1
s = s + 1
//數量加1
Goto line
//返回同一行再查找
Else
//否則
x = 34 : y = y + 34 : by = 347
//左邊初始為0，上邊加1，初始化區域下邊
EndIf
Else
//如果沒有找到圖片
a = 1
//變數a為1（退出循環）
EndIf
EndWhile
Gosub 計算價格
// VBSCall messagebox("共找到 " & s & " 個"&"tp("&i&") "&"相同圖片" & tp(i) & " ")
VBS i=i+1
//彈出結果
EndFor
Return 計算物品數量
Sub 計算價格
//《計算價格》
If i=0
Ri="減傷害低級石頭"
VBS jsjiage=(jsjg*s)
//VBSCall messagebox("合計 " & jsjiage & " MS")
ElseIf i=1
Ri="經驗低級石頭"
VBS jyjiage=jyjg*s
//VBSCall messagebox("合計 " & jyjiage & " MS")
ElseIf i=2
Ri="戰鬥力低級石頭"
VBS zdljiage=zdljg*s
//VBSCall messagebox("合計 " & zdljiage & " MS")
ElseIf i=3
Ri="魔魂"
VBS mhjiage=mhjg*s
//VBSCall messagebox("合計 " & mhjiage & " MS")
ElseIf i=4
Ri="幻魔"
VBS hmjiage=(hmjg*s)
//VBSCall messagebox("合計 " & hmjiage & " MS")
ElseIf i=5
Ri="減傷害中級石頭"
VBS jszjiage=jszjg*s
ElseIf i=6
Ri="經驗中級石頭"
VBS jyzjiage=jyzjg*s
ElseIf i=7
Ri="戰鬥力中級石頭"
VBS zdlzjiage=zdlzjg*s
ElseIf i=8
Ri="魔魂之心"
VBS mhzxjiage=mhzxjg*s
ElseIf i=9
Ri="幻魔之心"
VBS hmzxjiage=hmzxjg*s
ElseIf i=10
Ri="靈魂"
VBS lhjiage=lhjg*s
//VBSCall messagebox("合計 " & lhjiage & " MS")
ElseIf i=11
Ri="O型寶寶"
VBS ojiage=ojg*s
ElseIf i=12
Ri="孤星"
VBS gxjiage=gxjg*s
ElseIf i=13
Ri="雙星"
VBS sxjiage=sxjg*s
ElseIf i=14
Ri="法豬"
VBS fzjiage=fzjg*s
ElseIf i=15
Ri="戰豬"
VBS zzjiage=zzjg*s
ElseIf i=16
Ri="莎菲"
VBS cjqsjiage=cjqsjg*s
VBS zongjiage=0
VBS zongjiage=(jsjiage+jyjiage+zdljiage+mhjiage+hmjiage+jszjiage+jyzjiage+zdlzjiage+mhzxjiage+hmzxjiage+lhjiage+ojiage+gxjiage+sxjiage+fzjiage+zzjiage+cjqsjiage)
//VBSCall messagebox("合計 " & zongjiage & " MS")
Else
VBS zongjiage=0
EndIf
Return 計算價格
Sub 輸入價錢
MoveTo 200,410
Delay 1000
Gosub 檢測交易有沒有被提前結束
LeftClick 1
Delay 100
Gosub 檢測交易有沒有被提前結束
LeftClick 1
Delay 1000
SayString zongjiage
Delay 1000
Rem 輸入ms
MoveTo 263,415
Delay 1000
Gosub 檢測交易有沒有被提前結束
LeftClick 1
Delay 100
Gosub 檢測交易有沒有被提前結束
LeftClick 1
Delay 500
IfColor 263,415,8ccfde,2
Goto 輸入ms
Else
MoveTo 136,513
Delay 500
Gosub 檢測交易有沒有被提前結束
LeftClick 1
Delay 300
EndIf
Return 輸入價錢
Sub 交易等待
jsq=0
Rem 等待交易
If jsq>=20
MoveTo 205,515
Delay 1000
Gosub 檢測交易有沒有被提前結束
LeftClick 1
Delay 300
Goto 對方不交易
EndIf
IfColor 233,494,a5f62,2
Delay 1000
jsq=jsq+1
Goto 等待交易
Else
EndIf
Rem 對方不交易
Return 交易等待
4. 魔域自動打怪腳本
按鍵精靈
Rem start
While true // 或者 for 9999
VBS x=x+50
VBSCall FindColorEx(60,160,780,600,"0303B8",1,1,x,y)
//區域模煳找色 60,160,780,600為區域范圍 "FFFFFF"為顏色 1為查找方式(中間向外) 1為模煳值 x,y為找到顏色後的坐標變數
If x>60 and y>160
//如果找到顏色 比如找到顏色就會賦值給坐標變數 通過判斷坐標變數可以知道有沒有找到怪
MoveTo x+12,y+20
//把滑鼠移動到該色的坐標 如果找的是怪名字或血條 可能移動不到怪身上 這時就要用滑鼠偏移 如：MoveTo x+10 y+10
Delay 50
//延時
LeftClick 5 //左鍵單擊進行攻擊
VBS y=y+50
VBS x=100
Goto start
Endif // 少了一句
EndIf
Delay 5000 //延時5秒
EndWhile // endfor
5. 跪求魔域12星座自動輔助腳本！！！免費的那種！！
下載一個，按鍵精靈
VBS dim x,y
//先定義變數
VBSCall GetCursorPos(x,y)
//獲得當前的滑鼠位置並保存在變數x,y中
VBSCall yans=GetPixelColor(x,y)
//得出當前滑鼠的位置的顏色
WaitKey key
TracePrint "用戶按下的鍵是：" & key
Rem 練功中
IfColor x,y,yans,1
MoveTo x,y
Else
EndIf
//進行滑鼠復位
KeyPress key
Goto 練功中
//循環運行,腳本到此結束,精簡吧!
6. 用按鍵精靈在魔域里進行後台快速幻化的腳本是什麼
估計你沒有先獲取句柄吧，先用窗口命令再用後台插件結合使用才行
獲取句柄常用有三種
Hwnd
=
Plugin.Window.Foreground()//當前窗口獲取
Hwnd
=
Plugin.Window.MousePoint()//滑鼠位置獲取
Hwnd
=
Plugin.Window.Search("記事本")//標題模糊查找獲取
返回值：Hwnd是按鍵精靈默認的參數，你可以改，可以不改，一旦改全部得改