其实技能NPC是最简单的了。他所用到的内建命令也就那么几个,我们来看看
2 W: ?) ]$ J# e) n. r1 v, j/ `1、获得玩家职业种类1是铸造(牛美),2是炼丹(神医),3是裁缝(梅花),4是工匠(风兄),0是没有学习技能
! ^+ ?% E9 G' e9 a6 oName := callfunc ('getsenderjobkind');
$ P) U; F) ?# bif Name = '1' then begin- s1 s( m9 \* i; N+ W9 z
print ('say 你已经是铸造师了');
. ?% b! U) u ~+ s. v exit;8 |$ B+ Z. t! r+ o
end;
- t6 z1 u. b# |! }) s2 ?0 [; ~2 y; x2 ~* J$ F! V' S
2、获得玩家技能等级+ ] l& L6 E# \/ T/ Q8 D
Name := callfunc ('getsenderjobgrade'); /获得玩家工作等级7 F: A9 {' L+ K+ Y% f; v- ?
//这里,1是初级工,2是技能工,3是熟练工,4是达人,5是名人,6是神工
8 q0 m% @- l! b B7 c if Name = '6' then begin //如果是6级那么
8 I* }% R1 z$ Q" e% @( M$ z _, |3 Q0 I print ('say 你已经是神工了');
* }+ z% U, u9 U3 f& R- _1 v( V exit; Y; ^& X. U7 t- t7 j' M
end;8 Q% @) G4 D% m" n1 p4 k+ A) z
3、获得玩家技能值& z4 [2 j, @" o$ O. q" S
Name := callfunc ('getsendertalent'); //获得玩家技能值
0 N2 z+ w# |$ d, [) O nValue := StrToInt (Name); //转换变量类型1 U5 G3 q% g" W
if nValue < 2000 then begin //判断技能值是否小于20003 B0 m5 D F" W5 N, D; @
print ('say 想转职的话才能值要达20.00以上'); 3 P' } ^) v* M1 L
exit;
7 U( w/ h* b# B$ Q6 M( H& {5 A) R end;, v% ^, b6 f) F# H' n' t9 Q& s- k
4、设定玩家为哪种职业
* v I/ c+ @" x2 @print ('setsenderjobkind 1'); //设置玩家成为铸造
& W H3 j: }3 l! ?( q5、设定玩家为神工1 U, O' c f+ B0 ^. W
print ('setsendervirtueman'); //使玩家成为神工
7 G# o& N" Z, S//====================5 b% }7 d6 \ L
下面一起总结一下交易NPC! j- x3 ?: E% U' N- {) [. t
交易Npc就是用到了'tradewindow 命令
) b4 o+ G7 V0 i) t: \ Name := callfunc ('getsendername'); //获取玩家名字
% ]: Z- i; P: B( n2 }% z6 Q Str := 'tradewindow ' + Name; //弹出买卖窗口
& p/ H! J& [+ g2 k+ d7 H- s) z" V6 ^ Str := Str + ' 0'; //如果是卖,那么类型是0
; x$ O/ W i6 P print (Str);7 N$ v* c( D/ l( b
, {0 w [7 t7 V- ?9 S' O+ @; r其中0,1,2,3,4代表什么?代表买卖的类型! k I/ s3 h) q/ ~0 [/ l0 h* i* m
2 u* [' C- d" F! h# b0为卖给玩家东西,1为回收玩家的东西,这两种模式都需要玩家输入数量3为卖给玩家东西、4回收玩家的东西,这两种模式玩家不需要输入数量,双击直接购买1个 # |# O2 `! K0 X7 ]$ o( l% ^+ n
|