Bueno, implemente el codigo ft62654_sistema_de_duelos.html, en un senluc (0.11.5 twist) y me tira Variable no definida y me resalta:
If UCase$(Left$(rData, 7)) = "/DUELO " Then
dMap = "5"
rData = Right$(rData, Len(rData) - 7)
dUser = ReadField(1, rData, Asc("@"))

No conozco mucho de programacion, estoy aprendiendo, probé poner Dim dMap As Integer y me tira variable no definida en dUser:
If UCase$(Left$(rData, 7)) = "/DUELO " Then
dMap = "5"
rData = Right$(rData, Len(rData) - 7)
dUser = ReadField(1, rData, Asc("@"))
Entonces declaré Dim dUser As Integer y me apareció:
"El tipo de argumento de ByRef no coincide"
Ahi si que ya me planté.
Ayuda porfavor.

Lo del ByRef te aparece porque la variable no es Integer... Y te recomiendo que dMap lo declares como Byte si es 5. Fijate declarando dUser como String.

Saludos!

En el modulo declaraciones.bas abajo del option explicit agregas:
public dmap as integer
public duser as string

=D