Todo para tu server de AO
¡¡Bienvenido a http://todoao.foroslatin.com!! ¡¡Si no estas registrado registrate tendras mas beneficios!!


Hola a todo aca podran encontrar todo lo que nececitan para tu server de AO
 
ÍndicePortalCalendarioMiembrosGrupos de UsuariosRegistrarseConectarseRadio del foro
¡¡Bienvenidos a www.todoao.foroslatin.com!! Donde encontras todo para tu server de AO
-Traigan gente y recibiran a cambio placas muy importantes, y seran parte del grupo de V.I.P .

Comparte | 
 

 Comando /Invasion

Ir abajo 
AutorMensaje
Lordtano
Admin
Admin
avatar

Mensajes : 7
Puntos : 15343
Fecha de inscripción : 04/02/2010
Edad : 23
Localización : Buenos Aires(Argentina)

MensajeTema: Comando /Invasion   Jue Feb 04, 2010 9:26 pm

Hola les traigo otro de mi comandos o dateos como lo quieran llamar!!

Nunca se le ocurio en su sv que un dia estan al pedo sin aser nada y dice vamo acer una invasion y tienen que poner /cc y estar media ora creando vichos?? Razz

Pues a mi si y estube buscando y encontre este comando /invasion.
Tutorial:

Empesemo

Buscan:


If UCase$(Left$(rData, 5)) = "/SUM " Then



Y arriba colocan:


If UCase$(rData) = "/INVASION" Then
Dim loopA As Integer
Dim NoichNpcsInvasion As WorldPos
NoichNpcsInvasion.Map = 1
NoichNpcsInvasion.X = 50
NoichNpcsInvasion.Y = 50
For loopA = 1 To 15
Call SpawnNpc(500, NoichNpcsInvasion, True, False)
Next loopA
Exit Sub
End If

Explicación:

Bueno la cosa es asi donde dice :
NoichNpcsInvasion.Map = 1
NoichNpcsInvasion.X = 50
NoichNpcsInvasion.Y = 50
Es el lugar donde va a ocurir la invasion!! Si quieren cambien el luagr donde quieran.

Y donde dice:
For NoichInvasion = 1 To 15
Repite el codigo de SpawnNPC 15 veces si la queres le cambias el 15 x la cantidad de npcs!!

Por haora es todo vere de que acer mi proximo tutorial!! Bueno Adioss!!!

_________________
Volver arriba Ir abajo
Ver perfil de usuario http://todoao.foroslatin.com
 
Comando /Invasion
Volver arriba 
Página 1 de 1.

Permisos de este foro:No puedes responder a temas en este foro.
Todo para tu server de AO :: Argentum Online :: Programación-
Cambiar a: