脚本:此脚本可供用户参考制作防盛大赠送鲜花,十全十美礼盒,周年庆积分等等特色脚本。
[@main]
你想做什么?\
<我要赠送/@赠送> <获取装备/@装备>\
<离开/@exit>
[@装备]
#ACT
GIVEEX屠龙10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
GIVEEX嗜魂法杖10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
GIVEEX道德戒指10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
GIVEEX珊瑚戒指10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
GIVEEX死神手套10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
GIVEEX铁手镯10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
GIVEEX灯笼项链10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
GIVEEX蓝翡翠项链10=1,1=2,2=3,3=4,4=5,5=6,6=7,7=8,14=9,15=10
[@赠送]
#IF
#ACT
QUERYVALUE 2 0 14 @检测 朋友越多,快乐越多,千金易得,挚友难求啊!请输入赠送对象名称: QF
[@检测]
#IF
EQUAL S2 <$USERNAME>
#ACT
MessageBox 不能对自己发送赠送。
BREAK
#IF
CHECKONLINE <$STR(S2)>
#ACT
DELAYCALL 10 @DELAY_UPGRADEDLGITEM
#ELSEACT
MessageBox <$STR(S2)>\不在线,你不能赠送!
[@DELAY_UPGRADEDLGITEM]
#ACT
QUERYITEMDLG 请放入赠送物品 @CHECKDLGITEMTYPE 0
[@CHECKDLGITEMTYPE]
#IF
CHECKDLGITEMTYPE WEAPON
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M6 5
GETDLGITEMVALUE M7 6
GETDLGITEMVALUE M8 7
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,5=<$STR(M6)>,6=<$STR(M7)>,7=<$STR(M8)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M6 0
MOV M7 0
MOV M8 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE DRESS
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE MEDAL
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE NECKLACE
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE HELMET
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE ARMRING
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE RING
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE BOOTS
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKDLGITEMTYPE BELT
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
GETDLGITEMVALUE M1 0
GETDLGITEMVALUE M2 1
GETDLGITEMVALUE M3 2
GETDLGITEMVALUE M4 3
GETDLGITEMVALUE M5 4
GETDLGITEMVALUE M9 14
GETDLGITEMVALUE M1015
<$STR(S2)>.GIVEEX<$DLGITEMNAME>10=<$STR(M1)>,1=<$STR(M2)>,2=<$STR(M3)>,3=<$STR(M4)>,4=<$STR(M5)>,14=<$STR(M9)>,15=<$STR(M10)>
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
MOV M1 0
MOV M2 0
MOV M3 0
MOV M4 0
MOV M5 0
MOV M9 0
MOV M10 0
TAKEDLGITEM
CLOSE
BREAK
#IF
CHECKONLINE <$STR(S2)>
#ACT
SENDMSG 0 <$STR(S2)>收到了友人:<$USERNAME>,赠送的:<$DLGITEMNAME> 246 245
<$STR(S2)>.GIVE <$DLGITEMNAME> 1
<$STR(S2)>.SENDMSG 5 你收到了友人赠送的:<$DLGITEMNAME>
TAKEDLGITEM
CLOSE
#ELSEACT
MessageBox <$STR(S2)>\不在线,你不能赠送!
CLOSE
|
|