检查玩家物品: 4 n/ [, ^; W1 e8 E
Str := callfunc ('getsenderitemexistence ***:1'); \\检查**物品3 ^+ k: W1 Y: a7 J. w
if Str = 'true' then begin \\有此物品8 S; F( g2 f8 ]+ e: S7 ^. H" y# a& ^
if Str = 'false' then begin \\无此物品
8 G2 F ^( e: I* ^ x x( W' VStr := callfunc ('checkenoughspace'); \\检查物品是否已满
) q9 b( [' ?3 i5 r- S使用格式一般为; A. `, {# j0 d" o0 u
Str := callfunc ('checkenoughspace');
9 Z1 x9 C0 S6 q0 ~' kif Str = 'false' then begin& o1 T1 a. N" `$ \8 W; \3 I
print ('say 物品栏已满!');
$ a1 c9 c4 a$ {6 k* Fexit;
7 G2 m1 b) e) X5 Rend;$ x7 X; A! v a" k, Y8 Z
print ('getsenderitem ***:1');\\收回玩家**物品
% o# S* U7 Y# z3 H8 ^print ('putsendermagicitem **:10 @NPC 4');\\给玩家**物品
! J( q4 ~8 t9 y# {* esay \\说话; b* J6 o. `: D
格式有1 \. Q6 D! @# P/ @3 H; r
print ('say 物品栏已满!');: f [7 D) g% [" U1 |" W5 S
Str := 'say 物品已满!';. I6 @& Q) w8 X: \' K( }
Str := callfunc ('getsenderrace');\\获得玩家种族$ n$ B [+ B7 f% ^1 M# S9 w
Name := callfunc ('getsendername');\\获得玩家姓名
- A# f; o0 Y: ~ T8 u4 p. ?Str := callfunc ('getsendersex'); \\获得玩家性别$ B( m4 w# @0 G% V. T s
基本格式
& q9 _" u; J9 \1 nStr := callfunc ('getsendersex');
, O4 ]7 Z x5 k' I# hn := StrToInt (Str);3 q5 v5 n* J% M# T! q6 b. E4 A
if n = 1 then begin \\1为男2为女,这里的意思是当玩家为男的所要做以下动作
9 n% |3 w# g9 O$ Y( D: h& p$ t4 Y4 W& u. j3 G* G2 D
Str := callfunc ('checkenoughspace');\\比如当是男性是查检物品栏后面就加这个
- E1 d: s o2 Y3 ?) O7 Q9 Vif Str = 'false' then begin
4 O" T/ m# o( h* f Oprint ('say 物品栏已满!');
; ?0 I8 A$ `. T' y+ Eexit;
. D: p( }0 b4 {/ y: Bend;
& S* a0 \9 ]( j% E, F8 A. q
5 F3 ]8 u. Y5 F; y4 X( S; }) S( d! t: K% w _* _
|