[Aporte] Discriminacion de Game Masters

por Sderty Vie Ago 23, 2013 12:26 am

Buscan

Código:: If Not UserList(TempCharIndex).flags.Privilegios And PlayerType.User Then Stat = Stat & " <Dungeon Master>"

Y lo Reemplazan por...

Código:: ' Dios If UserList(TempCharIndex).flags.Privilegios = PlayerType.Dios Then Stat = Stat & " <Dios Medieval> ~232~225~0~1~0" ' Semi ElseIf UserList(TempCharIndex).flags.Privilegios = PlayerType.SemiDios Then ft = FontTypeNames.FONTTYPE_GM Stat = Stat & " <Semi Dios> ~0~255~0~1~1" ' Conseji ElseIf UserList(TempCharIndex).flags.Privilegios = PlayerType.Consejero Then ft = FontTypeNames.FONTTYPE_CONSE Stat = Stat & " <Consejero> ~128~255~128~1~1" ' Rm o Dsrm ElseIf UserList(TempCharIndex).flags.Privilegios = (PlayerType.RoleMaster Or PlayerType.Consejero) Or UserList(TempCharIndex).flags.Privilegios = (PlayerType.RoleMaster Or PlayerType.Dios) Then ft = FontTypeNames.FONTTYPE_EJECUCION Stat = Stat & " <Rol Master> ~255~0~191~1~1" End If