|
楼主 |
发表于 2009-5-26 19:16:18
|
显示全部楼层
[jass]function ABC_07_A2 takes nothing returns nothing
local integer i =1
loop
exitwhen i > 12
set ABC_MBV_GOLD = GetPlayerState(ConvertedPlayer(i), PLAYER_STATE_RESOURCE_GOLD)
set ABC_MBV_LUMBER = GetPlayerState(ConvertedPlayer(i), PLAYER_STATE_RESOURCE_LUMBER)
set ABC_MBV_FOOD_USED = GetPlayerState(ConvertedPlayer(i), PLAYER_STATE_RESOURCE_FOOD_USED)
set ABC_MBV_FOOD = GetPlayerState(ConvertedPlayer(i), PLAYER_STATE_RESOURCE_FOOD_CAP)
set i = i + 1
endloop
endfunction
function ABC_07_A3 takes multiboard mb,integer x,integer y,string str returns nothing
local multiboarditem mbi = null
set mbi=MultiboardGetItem(mb,x,y)
call MultiboardSetItemValue(mbi,str)
call MultiboardReleaseItem(mbi)
endfunction
function ABC_07_A takes nothing returns nothing
local integer h
local integer i
set h = 1
loop
if ( GetBooleanAnd( (ConvertedPlayer(h) == GetLocalPlayer()) , h <= 5 ) ) then
call ABC_07_A3(bj_lastCreatedMultiboard,1,6,("|cFFff0000"+GetPlayerName(ConvertedPlayer(1))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,7,("|cFF0000ff"+GetPlayerName(ConvertedPlayer(2))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,8,("|cFF00ffff"+GetPlayerName(ConvertedPlayer(3))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,9,("|cFF800080"+GetPlayerName(ConvertedPlayer(4))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,10,("|cFFffff00"+GetPlayerName(ConvertedPlayer(5))+"|r"))
set i = 1
loop
call ABC_07_A3(bj_lastCreatedMultiboard,2,(i+5),I2S(ABC_MBV_STRIKE) )
call ABC_07_A3(bj_lastCreatedMultiboard,3,(i+5),I2S(ABC_MBV_GOLD) )
call ABC_07_A3(bj_lastCreatedMultiboard,4,(i+5),I2S(ABC_MBV_LUMBER) )
call ABC_07_A3(bj_lastCreatedMultiboard,5,(i+5),I2S(ABC_MBV_FOOD_USED)+"/"+I2S(ABC_MBV_FOOD) )
set i = i + 1
exitwhen i > 5
endloop
endif
if ( GetBooleanAnd( (ConvertedPlayer(h) == GetLocalPlayer()) , h >= 7 ) ) then
call ABC_07_A3(bj_lastCreatedMultiboard,1,6,("|cFF00ff00"+GetPlayerName(ConvertedPlayer(7))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,7,("|cFFff80ff"+GetPlayerName(ConvertedPlayer(8))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,8,("|cFF808080"+GetPlayerName(ConvertedPlayer(9))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,9,("|cFF80ffff"+GetPlayerName(ConvertedPlayer(10))+"|r"))
call ABC_07_A3(bj_lastCreatedMultiboard,1,10,("|cFF800000"+GetPlayerName(ConvertedPlayer(11))+"|r"))
set i = 7
loop
call ABC_07_A3(bj_lastCreatedMultiboard,2,i-1,I2S(ABC_MBV_STRIKE) )
call ABC_07_A3(bj_lastCreatedMultiboard,3,i-1,I2S(ABC_MBV_GOLD) )
call ABC_07_A3(bj_lastCreatedMultiboard,4,i-1,I2S(ABC_MBV_LUMBER) )
call ABC_07_A3(bj_lastCreatedMultiboard,5,i-1,I2S(ABC_MBV_FOOD_USED)+"/"+I2S(ABC_MBV_FOOD) )
set i = i + 1
exitwhen i > 11
endloop
endif
set h = h + 1
exitwhen h >= 11
endloop
call MultiboardDisplay(bj_lastCreatedMultiboard,true)
call TriggerSleepAction(1.00)
call ABC_07_A2()
endfunction[/jass] |
|