bluem2引擎登录器官网 > 传奇学院 > 引擎说明书 > 礼盒赠送脚本

礼盒赠送脚本

脚本:此脚本可供用户参考制作防盛大赠送鲜花,十全十美礼盒,周年庆积分等等特色脚本。

[@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