[JASS] some fun with attempting return bug fix

Tal'Rarity · Feb 3, 2021

~~I kind of guessed it wouldn't of worked though I would like knowing if I did anything wrong on trying to get its return bug fixed.~~ Edit: Nvm, fixed it by deleting the code that isn't fixable.

[jass=]
function echo takes string s returns nothing
call DisplayTextToPlayer(GetLocalPlayer(),0,0,s)
endfunction
function I2H takes integer id returns handle
if id < 0x100000 then
debug call BJDebugMsg("[I2H] Expected agent ID > 0x100000.")
return null
endif
call SaveFogStateHandle(udg_cc, 0, 0, ConvertFogState(id))
if LoadUnitHandle(udg_cc, 0, 0) != null then
return LoadUnitHandle(udg_cc, 0, 0)
endif
if LoadPlayerHandle(udg_cc, 0, 0) != null then
return LoadPlayerHandle(udg_cc, 0, 0)
endif
// etc..
/* destroyed or unused handle ID */
return null
endfunction
function h2i takes handle h returns integer
return GetHandleId(h)
endfunction
function code2i takes code h returns integer
local integer we = 0
local boolexpr me
set me = Condition(h)
call SaveAgentHandle(udg_cc, 0, 0, me)
set we = GetHandleId(LoadHashtableHandle(udg_cc, 0, 0))
return we
endfunction
function s2i takes string h returns integer
call SaveStr(udg_cc, 0, 0, h)
return StringHash(LoadStr(udg_cc, 0, 0))
endfunction
//function i2code takes integer h returns code
// return h
// return null
//endfunction
function i2u takes integer h returns unit
call SaveFogStateHandle(udg_cc, 0, 0, ConvertFogState(h))
return LoadUnitHandle(udg_cc, 0, 0)
endfunction
function i2ta takes integer h returns triggeraction
call SaveFogStateHandle(udg_cc, 0, 0, ConvertFogState(h))
return LoadTriggerActionHandle(udg_cc, 0, 0)
endfunction
function i2tc takes integer h returns triggercondition
call SaveFogStateHandle(udg_cc, 0, 0, ConvertFogState(h))
return LoadTriggerConditionHandle(udg_cc, 0, 0)
endfunction
function i2trg takes integer h returns trigger
call SaveFogStateHandle(udg_cc, 0, 0, ConvertFogState(h))
return LoadTriggerHandle(udg_cc, 0, 0)
endfunction
//function i2pc takes integer h returns playercolor
//return ConvertPlayerColor(h)
//endfunction
function i2timer takes integer h returns timer
call SaveFogStateHandle(udg_cc, 0, 0, ConvertFogState(h))
return LoadTimerHandle(udg_cc, 0, 0)
endfunction
function i2tt takes integer h returns texttag
call SaveFogStateHandle(udg_cc, 0, 0, ConvertFogState(h))
return LoadTextTagHandle(udg_cc, 0, 0)
endfunction
function MBSetItemStyleBR takes multiboard mb,integer col,integer row,boolean showValue,boolean showIcon returns nothing
call MultiboardSetItemStyle(MultiboardGetItem(mb,row-1,col-1),showValue,showIcon)
endfunction
function MBSetItemValueBR takes multiboard mb,integer col,integer row,string Val returns nothing
call MultiboardSetItemValue(MultiboardGetItem(mb,row-1,col-1),Val)
endfunction
function MBSetItemColorBR takes multiboard mb,integer col,integer row,integer r,integer g,integer b,integer alpha returns nothing
call MultiboardSetItemValueColor(MultiboardGetItem(mb,row-1,col-1),r,g,b,255-alpha)
endfunction
function MBSetItemWidthBR takes multiboard mb, integer col, integer row, real width returns nothing
call MultiboardSetItemWidth(MultiboardGetItem(mb,row-1,col-1),width/100)
endfunction
function MBSetItemIconBR takes multiboard mb, integer col, integer row,string icon returns nothing
call MultiboardSetItemIcon(MultiboardGetItem(mb,row-1,col-1),icon)
endfunction
function GetStringCutBR takes integer CutLength,integer Sl,integer offset,string s returns integer
local integer c=offset+CutLength
if SubString(s,c-1,c)!=" " then
loop
exitwhen SubString(s,c-1,c)==" " or c>=Sl
set c=c+1
endloop
endif
return c
endfunction
function InitPlayersColors takes nothing returns nothing
//###RED
call SaveInteger(udg_cc,StringHash("0"),StringHash("ColorRed"),255)
call SaveInteger(udg_cc,StringHash("0"),StringHash("ColorGreen"),3)
call SaveInteger(udg_cc,StringHash("0"),StringHash("ColorBlue"),3)

//###BLUE
call SaveInteger(udg_cc,StringHash("1"),StringHash("ColorRed"),0)
call SaveInteger(udg_cc,StringHash("1"),StringHash("ColorGreen"),66)
call SaveInteger(udg_cc,StringHash("1"),StringHash("ColorBlue"),255)

//###TEAL
call SaveInteger(udg_cc,StringHash("2"),StringHash("ColorRed"),28)
call SaveInteger(udg_cc,StringHash("2"),StringHash("ColorGreen"),230)
call SaveInteger(udg_cc,StringHash("2"),StringHash("ColorBlue"),185)
//###PURPLE
call SaveInteger(udg_cc,StringHash("3"),StringHash("ColorRed"),84)
call SaveInteger(udg_cc,StringHash("3"),StringHash("ColorGreen"),0)
call SaveInteger(udg_cc,StringHash("3"),StringHash("ColorBlue"),129)
//###YELLOW
call SaveInteger(udg_cc,StringHash("4"),StringHash("ColorRed"),255)
call SaveInteger(udg_cc,StringHash("4"),StringHash("ColorGreen"),252)
call SaveInteger(udg_cc,StringHash("4"),StringHash("ColorBlue"),1)
//###ORANGE
call SaveInteger(udg_cc,StringHash("5"),StringHash("ColorRed"),254)
call SaveInteger(udg_cc,StringHash("5"),StringHash("ColorGreen"),138)
call SaveInteger(udg_cc,StringHash("5"),StringHash("ColorBlue"),14)
//###GREEN
call SaveInteger(udg_cc,StringHash("6"),StringHash("ColorRed"),32)
call SaveInteger(udg_cc,StringHash("6"),StringHash("ColorGreen"),192)
call SaveInteger(udg_cc,StringHash("6"),StringHash("ColorBlue"),0)
//###PINK
call SaveInteger(udg_cc,StringHash("7"),StringHash("ColorRed"),229)
call SaveInteger(udg_cc,StringHash("7"),StringHash("ColorGreen"),91)
call SaveInteger(udg_cc,StringHash("7"),StringHash("ColorBlue"),176)
//###GRAY
call SaveInteger(udg_cc,StringHash("8"),StringHash("ColorRed"),149)
call SaveInteger(udg_cc,StringHash("8"),StringHash("ColorGreen"),150)
call SaveInteger(udg_cc,StringHash("8"),StringHash("ColorBlue"),151)
//###LIGHTBLUE
call SaveInteger(udg_cc,StringHash("9"),StringHash("ColorRed"),126)
call SaveInteger(udg_cc,StringHash("9"),StringHash("ColorGreen"),191)
call SaveInteger(udg_cc,StringHash("9"),StringHash("ColorBlue"),241)
//###DARKGREEN
call SaveInteger(udg_cc,StringHash("10"),StringHash("ColorRed"),16)
call SaveInteger(udg_cc,StringHash("10"),StringHash("ColorGreen"),98)
call SaveInteger(udg_cc,StringHash("10"),StringHash("ColorBlue"),70)
//###BROWN
call SaveInteger(udg_cc,StringHash("11"),StringHash("ColorRed"),78)
call SaveInteger(udg_cc,StringHash("11"),StringHash("ColorGreen"),42)
call SaveInteger(udg_cc,StringHash("11"),StringHash("ColorBlue"),4)
//###BLACK
call SaveInteger(udg_cc,StringHash("12"),StringHash("ColorRed"),40)
call SaveInteger(udg_cc,StringHash("12"),StringHash("ColorGreen"),40)
call SaveInteger(udg_cc,StringHash("12"),StringHash("ColorBlue"),40)
call SaveInteger(udg_cc,StringHash("13"),StringHash("ColorRed"),40)
call SaveInteger(udg_cc,StringHash("13"),StringHash("ColorGreen"),40)
call SaveInteger(udg_cc,StringHash("13"),StringHash("ColorBlue"),40)
call SaveInteger(udg_cc,StringHash("14"),StringHash("ColorRed"),40)
call SaveInteger(udg_cc,StringHash("14"),StringHash("ColorGreen"),40)
call SaveInteger(udg_cc,StringHash("14"),StringHash("ColorBlue"),40)
call SaveInteger(udg_cc,StringHash("15"),StringHash("ColorRed"),40)
call SaveInteger(udg_cc,StringHash("15"),StringHash("ColorGreen"),40)
call SaveInteger(udg_cc,StringHash("15"),StringHash("ColorBlue"),40)
endfunction
function GetColorBR takes player p,integer color returns integer
if color==1 then
set color=LoadInteger(udg_cc,StringHash(I2S(h2i(GetPlayerColor(p)))),StringHash("ColorRed"))
elseif color==2 then
set color=LoadInteger(udg_cc,StringHash(I2S(h2i(GetPlayerColor(p)))),StringHash("ColorGreen"))
elseif color==3 then
set color=LoadInteger(udg_cc,StringHash(I2S(h2i(GetPlayerColor(p)))),StringHash("ColorBlue"))
endif
return color
endfunction
function InitTrig_ChatStuff takes nothing returns nothing
endfunction
[/code]

[jass=]
function InitTokenSize takes string token,real size returns nothing
set udg_tokenlng[s2i(token)]=size
endfunction
function InitImg takes string replaced,string iconpath returns nothing
set udg_smiles[s2i(replaced)]=iconpath
endfunction
function GetTS takes string token returns real
if udg_tokenlng[s2i(token)]==0 then
return 0.65
else
return udg_tokenlng[s2i(token)]
endif
endfunction
function TcChatInit takes nothing returns nothing
local integer i=0
set udg_cc=InitHashtable()
//call FlushGameCache(udg_cc)
// set udg_cc=InitGameCache("TcsChat.w3v")
//##############################################################
// Custom Colors
set udg_Sr[0]=255
set udg_Sg[0]=255
set udg_Sb[0]=255
set udg_Sr[1]=245
set udg_Sg[1]=45
set udg_Sb[1]=45
set udg_Sr[2]=45
set udg_Sg[2]=45
set udg_Sb[2]=245
set udg_Sr[3]=28
set udg_Sg[3]=230
set udg_Sb[3]=185
set udg_Sr[4]=84
set udg_Sg[4]=0
set udg_Sb[4]=129
set udg_Sr[5]=254
set udg_Sg[5]=138
set udg_Sb[5]=14
set udg_Sr[6]=32
set udg_Sg[6]=200
set udg_Sb[6]=0
set udg_Sr[7]=149
set udg_Sg[7]=150
set udg_Sb[7]=151
set udg_Sr[8]=126
set udg_Sg[8]=191
set udg_Sb[8]=241
set udg_Sr[9]=16
set udg_Sg[9]=98
set udg_Sb[9]=70
//##############################################################
call InitTokenSize(" ",0.38)
call InitTokenSize("!",0.15)
call InitTokenSize("\"",0.28)
call InitTokenSize("#",0.61)
call InitTokenSize("$",0.61)
call InitTokenSize("%",0.85)
call InitTokenSize("^",0.53)
call InitTokenSize("&",0.65)
call InitTokenSize("'",0.12)
call InitTokenSize("*",0.42)
call InitTokenSize("(",0.37)
call InitTokenSize(")",0.37)
call InitTokenSize("+",0.51)
call InitTokenSize("-",0.35)
call InitTokenSize(",",0.12)
call InitTokenSize(".",0.12)
call InitTokenSize("/",0.28)
call InitTokenSize("0",0.52)
call InitTokenSize("1",0.42)
call InitTokenSize("2",0.52)
call InitTokenSize("3",0.52)
call InitTokenSize("4",0.52)
call InitTokenSize("5",0.52)
call InitTokenSize("6",0.52)
call InitTokenSize("7",0.52)
call InitTokenSize("8",0.52)
call InitTokenSize("9",0.52)
call InitTokenSize(":",0.12)
call InitTokenSize(";",0.12)
call InitTokenSize("<",0.55)
call InitTokenSize(">",0.55)
call InitTokenSize("=",0.55)
call InitTokenSize("?",0.45)
call InitTokenSize("@",0.95)
call InitTokenSize("A",0.8)
call InitTokenSize("B",0.7)
call InitTokenSize("C",0.7)
call InitTokenSize("D",0.72)
call InitTokenSize("E",0.7)
call InitTokenSize("F",0.67)
call InitTokenSize("G",0.75)
call InitTokenSize("H",0.75)
call InitTokenSize("I",0.25)
call InitTokenSize("J",0.45)
call InitTokenSize("K",0.71)
call InitTokenSize("L",0.62)
call InitTokenSize("M",0.95)
call InitTokenSize("N",0.7)
call InitTokenSize("O",0.75)
call InitTokenSize("P",0.7)
call InitTokenSize("Q",0.76)
call InitTokenSize("R",0.74)
call InitTokenSize("S",0.68)
call InitTokenSize("T",0.72)
call InitTokenSize("U",0.72)
call InitTokenSize("V",0.75)
call InitTokenSize("W",1)
call InitTokenSize("X",0.72)
call InitTokenSize("Y",0.73)
call InitTokenSize("Z",0.75)
call InitTokenSize("[",0.25)
call InitTokenSize("]",0.25)
call InitTokenSize("_",0.6)
call InitTokenSize("`",0.35)
call InitTokenSize("~",0.55)
call InitTokenSize("{",0.35)
call InitTokenSize("}",0.35)
call InitTokenSize("|",0.15)
call InitTokenSize("a",0.53)
call InitTokenSize("b",0.53)
call InitTokenSize("c",0.47)
call InitTokenSize("d",0.53)
call InitTokenSize("e",0.52)
call InitTokenSize("f",0.35)
call InitTokenSize("g",0.51)
call InitTokenSize("h",0.54)
call InitTokenSize("i",0.3)
call InitTokenSize("j",0.33)
call InitTokenSize("k",0.52)
call InitTokenSize("l",0.32)
call InitTokenSize("m",0.92)
call InitTokenSize("n",0.53)
call InitTokenSize("o",0.53)
call InitTokenSize("p",0.55)
call InitTokenSize("q",0.55)
call InitTokenSize("r",0.48)
call InitTokenSize("s",0.5)
call InitTokenSize("t",0.35)
call InitTokenSize("u",0.53)
call InitTokenSize("v",0.53)
call InitTokenSize("w",0.87)
call InitTokenSize("x",0.54)
call InitTokenSize("y",0.54)
call InitTokenSize("z",0.53)
call InitTokenSize("_",0.6)
call InitTokenSize("_",0.55)
call InitTokenSize("©",0.72)
call InitTokenSize("_",0.8)
call InitTokenSize("_",0.53)
call InitTokenSize("_",1.1)
call InitTokenSize("_",0.8)
call InitTokenSize("_",0.7)
call InitTokenSize("_",0.7)
call InitTokenSize("_",0.64)
call InitTokenSize("_",0.76)
call InitTokenSize("_",0.65)
call InitTokenSize("_",1)
call InitTokenSize("_",0.74)
call InitTokenSize("_",0.78)
call InitTokenSize("_",0.78)
call InitTokenSize("_",0.75)
call InitTokenSize("_",1)
call InitTokenSize("_",0.78)
call InitTokenSize("_",0.9)
call InitTokenSize("_",0.75)
call InitTokenSize("_",0.72)
call InitTokenSize("_",0.78)
call InitTokenSize("_",0.72)
call InitTokenSize("_",0.76)
call InitTokenSize("_",0.85)
call InitTokenSize("_",0.77)
call InitTokenSize("_",0.75)
call InitTokenSize("_",1)
call InitTokenSize("_",1.03)
call InitTokenSize("_",0.9)
call InitTokenSize("_",0.72)
call InitTokenSize("_",1)
call InitTokenSize("_",0.79)
call InitTokenSize("_",0.5)
call InitTokenSize("_",0.57)
call InitTokenSize("_",0.5)
call InitTokenSize("_",0.48)
call InitTokenSize("_",0.54)
call InitTokenSize("_",0.54)
call InitTokenSize("_",0.8)
call InitTokenSize("_",0.55)
call InitTokenSize("_",0.55)
call InitTokenSize("_",0.55)
call InitTokenSize("_",0.52)
call InitTokenSize("_",0.53)
call InitTokenSize("_",0.85)
call InitTokenSize("_",0.54)
call InitTokenSize("_",0.53)
call InitTokenSize("_",0.51)
call InitTokenSize("_",0.55)
call InitTokenSize("_",0.52)
call InitTokenSize("_",0.51)
call InitTokenSize("_",0.63)
call InitTokenSize("_",0.73)
call InitTokenSize("_",0.51)
call InitTokenSize("_",0.51)
call InitTokenSize("_",0.53)
call InitTokenSize("_",0.85)
call InitTokenSize("_",0.85)
call InitTokenSize("_",0.65)
call InitTokenSize("_",0.72)
call InitTokenSize("_",0.52)
call InitTokenSize("_",0.74)
call InitTokenSize("_",0.54)
call InitImg("

","smiles\\smile.tga")
call InitImg("

","smiles\\sad.tga")
call InitImg("

","smiles\\wink.tga")
call InitImg("=)","smiles\\smile.tga")
call InitImg(":d","smiles\\biggrin.tga")
call InitImg("lol","smiles\\lol.tga")
call InitImg(":rofl:","smiles\\lol.tga")
call InitImg("rofl","smiles\\lol.tga")
call InitImg("<_<","smiles\\lookto.tga")
call InitImg("o_o","smiles\\

.tga")
call InitImg(":shy:","smiles\\shy.tga")
call InitImg(":tongue:","smiles\\tongue.tga")
call InitImg("

","smiles\\tongue.tga")
call InitImg(":up:","smiles\\up.tga")
call InitImg("

","smiles\\cool.tga")
call InitImg("

","smiles\\confused.tga")
call InitImg(":hmmm:","smiles\\hmmm.tga")
call InitImg("

","smiles\\rolleyes.tga")
call InitImg(" :angry:

","smiles\\angry.tga")
call InitImg("dead","smiles\\dead.tga")
call InitImg("death","smiles\\dead.tga")
call InitImg("die","smiles\\dead.tga")
call InitImg("wow","smiles\\wow.tga")
call InitImg("doom","smiles\\doom.tga")
call InitImg("xgm","smiles\\xgm.tga")
call InitImg("toadcop","smiles\\Toadcop.tga")
call InitImg("toad cop","smiles\\Toadcop.tga")
call InitImg("tc","smiles\\Toadcop.tga")
call InitImg("t.c.","smiles\\Toadcop.tga")
call InitImg("rammstein","smiles\\rammstein.tga")
call InitImg("rammy","smiles\\rammstein.tga")
call InitImg("quake","smiles\\q4.tga")
call InitImg(":we:","smiles\\we.tga")
call InitImg("worldeditor","smiles\\we.tga")
call InitImg("world editor","smiles\\we.tga")
call InitImg("fuck","smiles\\warn.tga")
call InitImg("fack","smiles\\warn.tga")
call InitImg("bitch","smiles\\warn.tga")
call InitImg("dick","smiles\\warn.tga")
call InitImg("cunt","smiles\\warn.tga")
call InitImg("ass","smiles\\warn.tga")
call InitImg("shit","smiles\\warn.tga")
call InitImg("idiot","smiles\\warn.tga")
call InitImg("rubbish","smiles\\warn.tga")
call InitImg("sepultura","smiles\\warn.tga")
call InitImg("slipknot","smiles\\warn.tga")
call InitImg("gay","smiles\\warn.tga")
call InitImg("satani","smiles\\warn.tga")
call InitImg("lucif","smiles\\warn.tga")
call InitImg("lick","smiles\\warn.tga")
call InitImg("suck","smiles\\warn.tga")
//##############################################################
call InitPlayersColors()
set udg_Tccs[1]=40 // Total Width
set udg_Tccs[2]=80 // Column count
set udg_Tccs[3]=10 // Row count
set udg_Tccs[4]=8000/udg_Tccs[2] // Max String Lines
set udg_Tccs[5]=12 // Max tag length
set udg_Tccs[6]=2 // Min tag length
call TriggerSleepAction(0)
loop
exitwhen i>11
if GetPlayerController(Player(i))==MAP_CONTROL_USER then
set udg_mbs=CreateMultiboard()
call MultiboardSetColumnCount(udg_mbs,udg_Tccs[2])
call MultiboardSetRowCount(udg_mbs,udg_Tccs[3])
call MultiboardSetItemStyleBJ(udg_mbs,0,0,true,false)
call MultiboardSetItemWidthBJ(udg_mbs,0,0,0)
call MultiboardSetTitleText(udg_mbs,"|cfffedaacToadcop's Chat")
call MBSetItemWidthBR(udg_mbs,1,1,udg_Tccs[1])
call MBSetItemValueBR(udg_mbs,1,1,"|cff6677bbThis System is designed by |cfffedaac(|cff8899cc_____.ru|cfffedaac) Toadcop [SRTS] III|cff6677bb for XGM|r")
endif
set i=i+1
endloop
call echo("Enter some chat message !!! also you can use some smiles and don't write bad words ! like f**k, and other... And some new feature enter -name ... your wished name ! enter -color ... your wished Player Color (0-15) !")
endfunction
//===========================================================================
function InitTrig_ChatInts takes nothing returns nothing
call ExecuteFunc("TcChatInit")
endfunction
[/code]

[jass=]
function GetLineIdBR takes nothing returns integer
set udg_Tccs[100]=udg_Tccs[100]+1
if udg_Tccs[100]>udg_Tccs[4] then
set udg_Tccs[100]=1
endif
return udg_Tccs[100]
endfunction
function ParseChatStringBR takes string s returns integer
local string token=null
local integer sl=StringLength(s)
local integer id=GetLineIdBR()
local integer id2=id*udg_Tccs[2]
local integer i=0
local integer i1=0
local integer i2=0
local integer i3=0
local integer cur=0
local string st=""
local string st2=""
local string st3=""
local boolean b=false
set udg_r=255
set udg_g=255
set udg_b=255
loop
set cur=id2+i1
exitwhen i>sl or i1>udg_Tccs[2]
set i2=udg_Tccs[6]
set b=false
set st2=SubString(s,i,i+1)
if st2=="^" then
set st3=SubString(s,i+1,i+2)
set i3=S2I(st3)
if st3=="0" then
set udg_r=udg_Sr[0]
set udg_g=udg_Sg[0]
set udg_b=udg_Sb[0]
set i=i+2
elseif i3!=0 then
set udg_r=udg_Sr[i3]
set udg_g=udg_Sg[i3]
set udg_b=udg_Sb[i3]
set i=i+2
endif
endif
loop
exitwhen i2>udg_Tccs[5] or b
set st=SubString(s,i,i+i2)
set st=udg_smiles[s2i(StringCase(st,false))]
set b=st!=null and st!=""
if b then
set i=i+i2-1
endif
set i2=i2+1
endloop
if b then
set udg_tokens[cur]=st
set udg_img[cur]=true
else
set udg_tokens[cur]=SubString(s,i,i+1)
set udg_img[cur]=false
endif
set udg_red[cur]=udg_r
set udg_green[cur]=udg_g
set udg_blue[cur]=udg_b
set i1=i1+1
set i=i+1
endloop
set udg_max[id]=i1-1
return id
endfunction
function FillChatBoardBR takes multiboard mb,player p,integer id,integer row returns nothing
local integer i=id*udg_Tccs[2]
local integer cur=1
local integer max=udg_max[id]+i
local integer r=GetColorBR(p,1)
local integer g=GetColorBR(p,2)
local integer b=GetColorBR(p,3)
local string sp=GetPlayerName(p)
local string s=null
local integer lng=StringLength(sp)
loop
exitwhen cur>lng
set s=SubString(sp,cur-1,cur)
call MBSetItemWidthBR(mb,cur,row,GetTS(s))
call MBSetItemStyleBR(mb,cur,row,true,false)
call MBSetItemValueBR(mb,cur,row,s)
call MBSetItemColorBR(mb,cur,row,r,g,b,0)
set cur=cur+1
endloop
set s=":"
call MBSetItemWidthBR(mb,cur,row,GetTS(s))
call MBSetItemStyleBR(mb,cur,row,true,false)
call MBSetItemValueBR(mb,cur,row,s)
call MBSetItemColorBR(mb,cur,row,255,255,255,0)
set cur=cur+1
set s=" "
call MBSetItemWidthBR(mb,cur,row,GetTS(s))
call MBSetItemStyleBR(mb,cur,row,true,false)
call MBSetItemValueBR(mb,cur,row,s)
call MBSetItemColorBR(mb,cur,row,255,255,255,0)
set cur=cur+1
loop
exitwhen i>max or cur>udg_Tccs[2]
if udg_img then
call MBSetItemWidthBR(mb,cur,row,1)
call MBSetItemStyleBR(mb,cur,row,false,true)
call MBSetItemIconBR(mb,cur,row,udg_tokens)
else
call MBSetItemWidthBR(mb,cur,row,GetTS(udg_tokens))
call MBSetItemStyleBR(mb,cur,row,true,false)
call MBSetItemValueBR(mb,cur,row,udg_tokens)
call MBSetItemColorBR(mb,cur,row,udg_red,udg_green,udg_blue,0)
endif
set cur=cur+1
set i=i+1
endloop
endfunction
function ChatConverter takes nothing returns nothing
local player p=GetTriggerPlayer()
local string s=GetEventPlayerChatString()
local multiboard mb=udg_mbs[GetPlayerId(p)] // make with this what you want...
local integer maxrow=udg_Tccs[3]
local integer i=maxrow
local integer sn=0
local string sp=I2S(GetPlayerId(p))
if SubString(s,0,1)!="-" then
set sn=ParseChatStringBR(s)
if udg_tokens[sn*udg_Tccs[2]]!=null and udg_tokens[sn*udg_Tccs[2]]!="" then
set udg_MsgOrder[1]=sn
set udg_MsgP[udg_MsgOrder[1]]=GetPlayerId(p)
call MultiboardSetItemsStyle(mb,false,false)
call MultiboardSetItemsValue(mb,"")
call MultiboardSetItemsIcon(mb,"")
call MBSetItemWidthBR(mb,1,1,udg_Tccs[1])
call MBSetItemStyleBR(mb,1,1,true,false)
call MBSetItemValueBR(mb,1,1,"|cff6677bbThis System is designed by |cfffedaac(|cff8899cc_____.ru|cfffedaac) Toadcop [SRTS] III|cff6677bb for XGM|r")
loop
exitwhen i<2
set udg_MsgOrder=udg_MsgOrder[i-1]
if udg_tokens[udg_MsgOrder*udg_Tccs[2]]!=null and udg_tokens[udg_MsgOrder*udg_Tccs[2]]!="" then
call FillChatBoardBR(mb,Player(udg_MsgP[udg_MsgOrder]),udg_MsgOrder,i)
endif
set i=i-1
endloop
call MultiboardDisplay(mb,true)
endif
else
if SubString(GetEventPlayerChatString(),0,5)=="-name" then
call SetPlayerName(p,SubString(GetEventPlayerChatString(),6,StringLength(GetEventPlayerChatString())))
elseif SubString(GetEventPlayerChatString(),0,6)=="-color" then
//call SetPlayerColor(p,i2pc(S2I(SubString(GetEventPlayerChatString(),7,StringLength(GetEventPlayerChatString())))))
endif
endif
endfunction
//===========================================================================
function InitTrig_ChatConverter takes nothing returns nothing
local integer i=0
set gg_trg_ChatConverter = CreateTrigger()
loop
exitwhen i>11
if GetPlayerController(Player(i))==MAP_CONTROL_USER then
call TriggerRegisterPlayerChatEvent(gg_trg_ChatConverter,Player(i),"",false)
endif
set i=i+1
endloop
call TriggerAddAction(gg_trg_ChatConverter,function ChatConverter)
endfunction
[/code]

[JASS] some fun with attempting return bug fix

Tal'Rarity

Tal'Rarity

Resources

Attachments

Similar threads