检查玩家物品: % G) N* L( ~. X/ a0 u
Str := callfunc ('getsenderitemexistence ***:1'); \\检查**物品: z2 [1 d4 n9 y* k
if Str = 'true' then begin \\有此物品
& g! d w: ^$ \* s x0 Wif Str = 'false' then begin \\无此物品, l; J! v' T% ^ g, h
Str := callfunc ('checkenoughspace'); \\检查物品是否已满) O0 m; o5 Y! w! C* Q# ]3 m7 r* {
使用格式一般为' s1 X' N6 o q+ T
Str := callfunc ('checkenoughspace');9 y ~) k3 o8 t
if Str = 'false' then begin
9 w% r3 X b) k% t2 m1 n; |6 r4 l# |print ('say 物品栏已满!');
5 \" l% z& `* t$ m# d. Nexit;4 S( c q9 T% }6 D' Y
end;
0 S0 C2 g! O9 ]$ \. Gprint ('getsenderitem ***:1');\\收回玩家**物品
& m9 A9 E& w' z' tprint ('putsendermagicitem **:10 @NPC 4');\\给玩家**物品. k; l% _5 f3 X2 J' s
say \\说话
5 N _( {. c7 k% p0 v格式有
% E* q0 n1 ?7 H# _' r6 X3 `print ('say 物品栏已满!');% G8 V, x% T: M, s8 G9 r+ T
Str := 'say 物品已满！';$ y* R& r) `7 E
Str := callfunc ('getsenderrace');\\获得玩家种族
O ?( r+ a* m4 H7 A* KName := callfunc ('getsendername');\\获得玩家姓名
; k; M6 e) n( A* {. [8 L- fStr := callfunc ('getsendersex'); \\获得玩家性别
, o* I! P1 V" t l; @基本格式/ W6 U4 o- w3 l$ ^5 T5 @
Str := callfunc ('getsendersex');
6 A/ {: g6 \# U9 dn := StrToInt (Str);7 p% k* O& z0 d5 A# O' D
if n = 1 then begin \\1为男2为女,这里的意思是当玩家为男的所要做以下动作
/ X. u# ?- H2 [- r) R( r1 ?9 c; @! N) v4 Q$ M0 t
Str := callfunc ('checkenoughspace');\\比如当是男性是查检物品栏后面就加这个
: e5 w: d# R. Sif Str = 'false' then begin [: N$ H! A( F8 e; e' ~
print ('say 物品栏已满!');" c# J F$ J+ b" b, C* P5 y
exit;
* z) Z+ C: t% j4 \: Zend;2 L7 \. y0 C6 q+ C: W0 _% G
P7 H2 l$ ]1 W5 T7 d+ \# m8 x
) D% u2 e) Q6 z) [. M0 e: E' Y |
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
千斤顶
照妖镜
闽公网安备 35099902000100号增值电信业务经营许可证 闽B2-20220593 闽ICP备2023014375号