三千论坛

标题: 脚本学习资料 [打印本页]

---

作者: 异仟年    时间: 2022-9-5 21:49
标题: 脚本学习资料
检查玩家物品:  
; S8 x8 B! d2 K! e0 UStr := callfunc ('getsenderitemexistence ***:1'); \\检查**物品
8 |+ G' @8 S' U2 G* W- f( `if Str = 'true' then begin  \\有此物品
if Str = 'false' then begin  \\无此物品
Str := callfunc ('checkenoughspace'); \\检查物品是否已满
) T8 ?$ ~$ Y6 Q" a使用格式一般为
# b6 q, e6 [5 X% U/ w1 QStr := callfunc ('checkenoughspace');
if Str = 'false' then begin
print ('say 物品栏已满!');
exit;
end;
print ('getsenderitem ***:1');\\收回玩家**物品
print ('putsendermagicitem **:10 @NPC 4');\\给玩家**物品
say \\说话
格式有
print ('say 物品栏已满!');
% K3 y1 H3 f4 }4 P' e2 ZStr := 'say 物品已满！';
Str := callfunc ('getsenderrace');\\获得玩家种族
Name := callfunc ('getsendername');\\获得玩家姓名
% c! ]) G) n# S- k( k  n4 t7 pStr := callfunc ('getsendersex'); \\获得玩家性别
基本格式
3 m% {& o1 v* b  Y3 ?, h' b/ ~Str := callfunc ('getsendersex');
  ~4 }$ }2 b6 E% en := StrToInt (Str);
if n = 1 then begin \\1为男2为女,这里的意思是当玩家为男的所要做以下动作

1 F/ o/ J$ A" f) K* ?1 ^9 @0 fStr := callfunc ('checkenoughspace');\\比如当是男性是查检物品栏后面就加这个
2 E6 c; l) ~+ e- O: aif Str = 'false' then begin
print ('say 物品栏已满!');
exit;
end;
9 ^, ?6 f$ L7 m$ I- G
, j& M; {9 ^( q2 o  P
" s7 `2 Z# _( u) D2 M% I

---

欢迎光临 三千论坛 (http://3000y.com.cn/)

Powered by Discuz! X3.4