脚本学习资料

检查玩家物品:  
Str := callfunc ('getsenderitemexistence ***:1'); \\检查**物品
3 ]/ o; H' z3 e- n+ A4 p$ @if Str = 'true' then begin  \\有此物品
$ G- F6 R# U+ D) e9 d, B% ?if Str = 'false' then begin  \\无此物品
Str := callfunc ('checkenoughspace'); \\检查物品是否已满
使用格式一般为
5 h9 H( ]' ~/ o( L, e5 }Str := callfunc ('checkenoughspace');
0 d2 H& v/ S* B3 i, wif Str = 'false' then begin
. t( n  K4 K7 v$ [) J. Zprint ('say 物品栏已满!');
exit;
3 ~( z; L! m( Z5 p  g) l3 cend;
8 _* g7 d, K( Z1 oprint ('getsenderitem ***:1');\\收回玩家**物品
4 e$ a: P  ^4 p. yprint ('putsendermagicitem **:10 @NPC 4');\\给玩家**物品
- c0 t- w% k, @( \, \2 Asay \\说话
格式有
8 B% ^  ^. ~7 Q7 |" nprint ('say 物品栏已满!');
Str := 'say 物品已满！';
* x7 x- l9 I& i' v& mStr := callfunc ('getsenderrace');\\获得玩家种族
; q' ~( X8 h+ |  AName := callfunc ('getsendername');\\获得玩家姓名
6 P' p( ]# w3 T7 L5 bStr := callfunc ('getsendersex'); \\获得玩家性别
基本格式
Str := callfunc ('getsendersex');
n := StrToInt (Str);
, `' ~6 e* v8 c+ c, k7 E/ p% v  ?if n = 1 then begin \\1为男2为女,这里的意思是当玩家为男的所要做以下动作
& b0 A# K8 [) @. K
2 K4 ^) F' x) d% nStr := callfunc ('checkenoughspace');\\比如当是男性是查检物品栏后面就加这个
$ V9 d2 B/ I4 r# Tif Str = 'false' then begin
" A0 r/ Z( t! r# k2 J3 a7 ]print ('say 物品栏已满!');
exit;
. w9 P- }" ?0 W4 l$ \8 _+ Aend;

# r" t: ?5 X/ X* f
+ e. U& P: \0 V7 B4 |