library TagTest initializer InitTagTest
private function StartTest takes nothing returns nothing
local integer i = 0
local integer j = 0
local integer y = 0
local texttag test
loop
exitwhen i >= 110
set test = CreateTextTag()
if ModuloInteger(i, 10) == 0 then
set y = y - 50
set j = 0
endif
call SetTextTagPos(test, j*50, y, 50)
call SetTextTagText(test, I2S(i), 0.0276)
set j = j+1
set i = i+1
endloop
endfunction
private function InitTagTest takes nothing returns nothing
local trigger t = CreateTrigger()
call TriggerRegisterPlayerChatEvent(t, Player(0), "-start", true)
call TriggerAddAction(t, function StartTest)
endfunction
endlibrary