脚本学习资料

检查玩家物品:  
Str := callfunc ('getsenderitemexistence ***:1'); \\检查**物品
7 l4 g. i% G3 e: L5 B* h9 q* c$ Jif Str = 'true' then begin  \\有此物品
if Str = 'false' then begin  \\无此物品
Str := callfunc ('checkenoughspace'); \\检查物品是否已满
/ L. m6 F( L2 n% F使用格式一般为
Str := callfunc ('checkenoughspace');
) P1 S- o, \' O% {9 M8 S; S+ j) vif Str = 'false' then begin
print ('say 物品栏已满!');
" z' N$ L  g; T4 a2 ~2 I, M4 nexit;
end;
print ('getsenderitem ***:1');\\收回玩家**物品
' C" C+ D0 L( k; k( S' T# b+ Xprint ('putsendermagicitem **:10 @NPC 4');\\给玩家**物品
8 V1 N. ]% V! W: ^say \\说话
格式有
+ w6 ^2 a/ R9 X% g" }- zprint ('say 物品栏已满!');
, e7 |+ g# X/ o( \Str := 'say 物品已满！';
/ F7 B. f  A: U4 n* XStr := callfunc ('getsenderrace');\\获得玩家种族
; u$ d4 r8 i) p. cName := callfunc ('getsendername');\\获得玩家姓名
Str := callfunc ('getsendersex'); \\获得玩家性别
基本格式
Str := callfunc ('getsendersex');
n := StrToInt (Str);
if n = 1 then begin \\1为男2为女,这里的意思是当玩家为男的所要做以下动作
6 r& Z2 x$ F$ H* u1 q
Str := callfunc ('checkenoughspace');\\比如当是男性是查检物品栏后面就加这个
if Str = 'false' then begin
print ('say 物品栏已满!');
3 v1 `* h/ |  i  W- v. W3 S: |exit;
  p; N) k7 u. a6 A  ^: j# K, J: {end;
6 X. I$ K6 m0 e6 T
9 i1 H$ b3 }7 s1 c! o& O
5 ]7 r/ {# B/ B6 P. f! ]4 T5 z8 R