检查玩家物品:
J- p5 |; K7 H0 k; o! ?Str := callfunc ('getsenderitemexistence ***:1'); \\检查**物品3 s b& k7 J( ?; o! M8 Y/ d7 D
if Str = 'true' then begin \\有此物品" S! G+ W/ L+ ^, j2 q
if Str = 'false' then begin \\无此物品$ U* ^/ ]; R; j# H
Str := callfunc ('checkenoughspace'); \\检查物品是否已满, w; I0 a; \: s2 E `2 L" A; c
使用格式一般为
3 g" X" Y: K3 YStr := callfunc ('checkenoughspace');
( w5 k8 i( ?, _, p2 ~, u8 n$ i* r3 ~% _if Str = 'false' then begin8 S% I: r- N! A, o" c
print ('say 物品栏已满!');
1 o4 h0 }- a3 x1 u( K/ D fexit;3 F9 B" `: Q! G, \
end;
7 |0 O! o" n$ Hprint ('getsenderitem ***:1');\\收回玩家**物品
7 H# z' Y- w1 e% eprint ('putsendermagicitem **:10 @NPC 4');\\给玩家**物品7 Y" b, v& b; l5 z% Y
say \\说话
1 F+ \6 v( f" Q1 P+ |) j格式有( I4 }: T8 |# ]+ _5 j
print ('say 物品栏已满!');
! V8 ^: L l) G3 }/ XStr := 'say 物品已满!';
( R* H8 [7 F4 {$ [ kStr := callfunc ('getsenderrace');\\获得玩家种族
1 v6 ^! s3 Z3 q5 m2 Q" U: o5 a0 CName := callfunc ('getsendername');\\获得玩家姓名
* F. c$ Q) b2 ~( O8 PStr := callfunc ('getsendersex'); \\获得玩家性别
) y% i( h# M- J* r% e' Q$ P基本格式! A) P) ]/ Y) z0 ~, ^2 A. H8 M
Str := callfunc ('getsendersex');
% Z+ i9 @* F% G& j# O. Z9 N8 wn := StrToInt (Str);
: e8 j; x3 x3 a0 O6 }7 |if n = 1 then begin \\1为男2为女,这里的意思是当玩家为男的所要做以下动作/ l% m. g9 I% _% G, I& v- d' z
, q. A" J$ Z) f2 x$ jStr := callfunc ('checkenoughspace');\\比如当是男性是查检物品栏后面就加这个2 H/ f4 u9 h- G& X
if Str = 'false' then begin
$ ^5 Z, u8 I6 wprint ('say 物品栏已满!');6 Z; R7 H/ n" D' l, N
exit;9 n# X5 o0 R/ m& p
end;
" Z4 n$ U" s& m( L6 d4 \$ O2 u1 q! u) {9 x4 g5 l" H
1 P5 f; F0 ^! @6 b; k7 ]; ` |