globals
private constant integer COLS = 1
private constant integer ROWS = 1
private constant string TITLE = "Choose your Race"
private constant string COLUMN_TITLE = "Race Description"
endglobals
private function setMultiboards takes nothing returns nothing
local integer i = 0
loop
exitwhen (i > 5)
set RaceMultiboards[i] = CreateMultiboardBJ(COLS, ROWS, TITLE)
call MultiboardSetItemValueBJ(RaceMultiboards[i], 1, 1, COLUMN_TITLE)
call MultiboardSetItemStyleBJ(RaceMultiboards[i], 1, 1, true, false )
call MultiboardSetItemWidthBJ(RaceMultiboards[i], 1, 1, 150.0 )
set i = i + 1
endloop
call MultiboardSetItemValueBJ( RaceMultiboards[0], 1, 1, HUMAN_DESC )
call MultiboardSetItemValueBJ( RaceMultiboards[1], 1, 1, ORC_DESC )
call MultiboardSetItemValueBJ( RaceMultiboards[2], 1, 1, UNDEAD_DESC )
call MultiboardSetItemValueBJ( RaceMultiboards[3], 1, 1, NIGHT_ELF_DESC )
call MultiboardSetItemValueBJ( RaceMultiboards[4], 1, 1, HIGH_ELF_DESC )
call MultiboardSetItemValueBJ( RaceMultiboards[5], 1, 1, CHAOS_ORC_DESC )
call MultiboardDisplay(RaceMultiboards[0], true)
endfunction