脚本学习资料

检查玩家物品:  
Str := callfunc ('getsenderitemexistence ***:1'); \\检查**物品
  E. L0 q0 d- [4 W2 tif Str = 'true' then begin  \\有此物品
; \2 e* W9 O' f' D' v: c7 S  pif Str = 'false' then begin  \\无此物品
+ s5 _( g6 x# R. h" `$ I' W! uStr := callfunc ('checkenoughspace'); \\检查物品是否已满
5 k/ w" o( ?5 T使用格式一般为
1 o7 b7 ?5 c( WStr := callfunc ('checkenoughspace');
if Str = 'false' then begin
print ('say 物品栏已满!');
exit;
( Q  V5 x2 P2 cend;
print ('getsenderitem ***:1');\\收回玩家**物品
1 i6 t" v) U/ Kprint ('putsendermagicitem **:10 @NPC 4');\\给玩家**物品
" i5 d7 K0 y6 J7 x$ msay \\说话
+ t0 [. f! e& n# }7 L: ~1 k格式有
! z5 v: K6 f! i8 y7 yprint ('say 物品栏已满!');
; j# X) \/ s  r* Q8 y. l3 G: s0 wStr := 'say 物品已满！';
Str := callfunc ('getsenderrace');\\获得玩家种族
9 \& `7 q0 L# n* ]Name := callfunc ('getsendername');\\获得玩家姓名
, y, a/ L5 ^( ]& T7 P: G! S1 Y) i1 CStr := callfunc ('getsendersex'); \\获得玩家性别
基本格式
Str := callfunc ('getsendersex');
n := StrToInt (Str);
if n = 1 then begin \\1为男2为女,这里的意思是当玩家为男的所要做以下动作

; K' c1 Y, ^9 d0 Q3 B5 @Str := callfunc ('checkenoughspace');\\比如当是男性是查检物品栏后面就加这个
if Str = 'false' then begin
print ('say 物品栏已满!');
6 ^$ }8 j. K2 z- mexit;
: X1 ^4 j( Y3 u" gend;