|
function drawname(x,y,name,size)
x=x-math.floor(size/2)
local namelen=string.len(name)/2
local zi={}
local m={114,50,5,0} --这四个数字是人物代号,默认第一个(扫地),若扫地在战斗就依次判定为下一个代号
if WAR.tmp[7002]==nil then
local f,k=true,1
while f and k<4 do
CC.xxx=m[k]
for j=0,WAR.PersonNum-1 do if WAR.Person[j]["人物编号"] == CC.xxx then f= false end end
f = not f
k=k+1
end
CC.change(CC.xxx,2000)
CC.change(0,CC.xxx)
for j=0,WAR.PersonNum-1 do if WAR.Person[j]["人物编号"] == 0 then WAR.Person[j]["人物编号"] =CC.xxx end end
WAR.tmp[7002]=1
end
CC.change(CC.xxx,0)
for i=1,namelen do
zi[i]=string.sub(name,i*2-1,i*2)
DrawString(x,y,zi[i],C_WHITE,size)
y=y+size
end
end
function instruct_16(personid)
if personid==CC.xxx then return true end
local r=false;
if JY.Status==GAME_WMAP then
if WAR.tmp[1000+personid]~=nil then
return false;
end
end
for i = 1, CC.TeamNum do
if personid==JY.Base["队伍" .. i] then
r=true;
break;
end
end;
return r;
end
function War_isEnd()
for i=0,WAR.PersonNum-1 do
local pid=WAR.Person[i]["人物编号"];
if JY.Person[pid]["生命"]<=0 then
WAR.Person[i]["死亡"]=true;
if inteam(pid) then
JY.Person[pid]["无用"]=0;
end
end
end
WarSetPerson();
Cls();
ShowScreen();
local myNum=0;
local EmenyNum=0;
for i=0,WAR.PersonNum-1 do
if WAR.Person[i]["死亡"]==false then
if WAR.Person[i]["我方"]==true then
myNum=1;
else
EmenyNum=1;
end
end
end
if EmenyNum==0 then
CC.change(CC.xxx,0)
CC.change(2000,CC.xxx)
for j=0,WAR.PersonNum-1 do if WAR.Person[j]["人物编号"] == CC.xxx then WAR.Person[j]["人物编号"] =0 end end
return 1;
end
if myNum==0 then
CC.change(CC.xxx,0)
CC.change(2000,CC.xxx)
for j=0,WAR.PersonNum-1 do if WAR.Person[j]["人物编号"] == CC.xxx then WAR.Person[j]["人物编号"] =0 end end
return 2;
end
return 0;
end
function CC.change(a,b)
JY.Person[b]=JY.Person[a]
end
function T1LEQ(p)
if p == 0 or p==CC.xxx then return true
else return false
end
end
|
|