传奇SF一条龙星石开光随机元素脚本制作教程

1 x- c; X5 _6 H) S. s" n1 u) p

3 y4 _, L6 `1 g
[@MAIN]
#IF
' U2 K1 o0 b  S' [#ACT
7 F' `: c* r2 WOPENMERCHANTBIGDLG 90 96 1 4 0 -80 0
#IF
5 I5 i! ?  `9 aCHECKUSEITEM 2
#ELSEACT
2 K( \9 [: Z9 q$ z% uMESSAGEBOX \提示：请先佩戴好将星石！
7 c" U- O: w, l1 U0 X9 DBREAK
* D7 e$ E( l/ K6 {# S& [#IF
7 `! ^3 O! V# }& R* rCHECKITEMW 焚星石 1
: e6 f: Z& \# S7 [#ACT
MOV N0 0
( u. g, n6 B  `3 i1 M% w+ m#IF
CHECKITEMW 暴星石 1
#ACT
MOV N0 1
#IF
4 e" w! R5 O8 g. p' Z2 L. c7 D3 vCHECKITEMW 狂星石 1
) J! o: h2 Y4 N' y8 Y! R#ACT
2 ?, ~$ R8 H. mMOV N0 2
$ Q& C  C, y' O; Y8 y#IF
CHECKITEMW 血星石 1
7 D4 f4 v& F7 h; A. q2 d: q# W#ACT
MOV N0 3
# Q, O* b1 [0 o# {4 F" |' ~3 f#IF
CHECKITEMW 陨星石 1
#ACT
( C/ Q+ K% \- H& O9 @$ N2 z9 cMOV N0 4
#IF
#ACT
GETLISTSTRING ..\QuestDiary\QQ394099033\将星石系统\将星石属性.txt N0 S$将星石主属性 N$将星石主属性代码
#IF
#SAY
<IMGEX:90:6:7:8:260:17/@EXIT>\ \
, M% P7 T1 f% M# u' y7 Q* N* ~<>                   <星石开光/AUTOCOLOR=251,21,250,70,254,103,242,243>\ \ \
<>    <当前佩戴将星石/SCOLOR=250>: {<$RIGHTHAND>/SCOLOR=70}\ \
<>    <当前星石主属性/SCOLOR=250>: {<$STR(S$将星石主属性)>/SCOLOR=242}\ \
<>               <星石开光功能介绍/SCOLOR=254>\ \ \
<>    <将星石开光后，将赋予将星石五种元素属性！/SCOLOR=22>\ \
<>    <五种元素属性分别是/SCOLOR=250>：\ \
<>        <暴击几率增加/SCOLOR=244>    <增加攻击伤害/SCOLOR=244>\
+ p6 `  g+ u3 a<>        <物理伤害减少/SCOLOR=244>    <忽视目标防御/SCOLOR=244>\
3 Y7 ]2 V; R) \<>        <人物体力增加/SCOLOR=244>\ \ \
+ B/ A- r, x+ V2 {) E3 s; T9 f<>  <主属性随机增加6%-10%  其他属性随机增加1%-5%/SCOLOR=151>\ \ \ \ \ \
1 ]( S2 U1 V3 W4 Q7 n, n: k5 s, u, p<>                 <充值点达到100/SCOLOR=154>\
' U5 k; i( S9 E0 q1 P<>                     <不扣除>\ \ \
<IMGEX:90:97:98:99:104:-7/@开始晋升>\

! @+ x/ h) R9 T  h, u
1 F4 n: @, i) A- F[@开始晋升]
#IF
" l- Y3 ?  N* K% H  M+ L' lNOT CHECKUSEITEM 2
#ACT
MESSAGEBOX \提示：请先佩戴好将星石！
BREAK
0 i' A: i! I# N! u% w/ ~2 D% Q5 Q#IF
' ?5 o0 _8 }; cCHECKGAMEGIRD < 100
#ACT
( }; D" l5 S. `! M- V8 X) RMESSAGEBOX \提示：充值金额不够！
BREAK
#IF
CHECKCUSTOMITEMVALUE 2 0 > 0
6 W# y- a: e* X. l9 b8 g#ACT
MESSAGEBOX \提示：您的【<$RIGHTHAND>】已经开过光了！
BREAK
% l1 S, Y- G. c3 M0 d* [' n$ A' N#IF
CHECKUSEITEM 2
CHECKGAMEGIRD ? 100
CHECKCUSTOMITEMVALUE 2 0 = 0
#ACT
CHANGECUSTOMITEMVALUE 2 0 = 1
CHANGECUSTOMITEMTEXT 2 [已开光]
5 ]2 o. v7 T3 @" Z: I! w/ y7 \CHANGECUSTOMITEMTEXTCOLOR 2 250
; x6 U" P) D# FGETLISTSTRING ..\QuestDiary\QQ394099033\将星石系统\将星石属性.txt N0 S$将星石主属性 N$将星石主属性代码
' R- h/ T6 c! o0 S2 JMOVR N$开光随机元素1 1 6
6 [. m) P6 n: i8 X; [MOVR N$开光随机元素2 1 6
MOVR N$开光随机元素3 1 6
MOVR N$开光随机元素4 1 6
MOVR N$开光随机元素5 1 6
MOVR N$开光随机元素6 6 11
SetNewItemValue 2 0 = <$STR(N$开光随机元素1)>
SetNewItemValue 2 1 = <$STR(N$开光随机元素2)>
SetNewItemValue 2 2 = <$STR(N$开光随机元素3)>
SetNewItemValue 2 4 = <$STR(N$开光随机元素4)>
SetNewItemValue 2 7 = <$STR(N$开光随机元素5)>
+ l* B. ]+ O' o# q9 VSetNewItemValue 2 <$STR(N$将星石主属性代码)> = <$STR(N$开光随机元素6)>
SENDCENTERMSG 251 0 [号外]:>恭喜玩家「<$USERNAME>」成功为他的【<$RIGHTHAND>】开光！！！ 1 3
2 `3 `& s0 Q' S- j  r3 uGUILDNOTICEMSG 251 0 [号外]:>恭喜玩家「{<$USERNAME>|250:0:1}」成功将他的【{<$RIGHTHAND>|255:0:1}】开光！！！
9 R2 w6 R3 K7 \* {1 hGUILDNOTICEMSG 251 0 [号外]:>恭喜玩家「{<$USERNAME>|250:0:1}」成功将他的【{<$RIGHTHAND>|255:0:1}】开光！！！
8 Y* E5 l- a) h6 r/ aGUILDNOTICEMSG 251 0 [号外]:>恭喜玩家「{<$USERNAME>|250:0:1}」成功将他的【{<$RIGHTHAND>|255:0:1}】开光！！！
  y- a' J. ~, NMESSAGEBOX \提示：开光成功！
BREAK
5 b* ~" J0 v! d2 M/ x