OBJETO PARA FUNDAR CLAN | GS-Zone

OBJETO PARA FUNDAR CLAN

Reglas del Foro
* Por favor, lee las reglas de los foros de Programación antes de hacer un nuevo tema!

Moderadores: Moderadores de Argentum, Especialistas de Argentum, Especialistas de Programación

6 Tweet

» 29 Oct 2011 10:46

Bueno chicos ,este es mi primer aporte,me parece que no estaba,sinceramente pido disculpas si esta,Ya que lo estaba buscando y no lo encontre.

Buscamos:

CrearNuevoClan = True

Abajo ponemos:

Call QuitarObjetos(tuobjeto, cantidad, FundadorIndex)

Despues buscamos:

If UserList(UserIndex).Stats.ELV < 25 Or UserList(UserIndex).Stats.UserSkills(eSkill.Liderazgo) < 100 Then
refError = "Para fundar un clan debes ser nivel 25 y tener 100 en liderazgo."
Exit Function
End If

Abajo ponemos:

If TieneObjetos(objeto, cantidad, UserIndex) = False Then
refError = "Necesitas X item para fundar un clan."
Exit Function
End If

http://www.argenao.co.cc

Admin de Argenao Return; 38; Registrado:; Mensajes: 236

» 30 Oct 2011 21:30

Esta bueno el código, es simple pero para empezar está bien..

Saludos; Luuq

¿Tu área de especialidad es Graficación o Mapeación? Te presento el proyecto serio que esperabas para trabajar...

narokao_explorando_el_rol_tluh.html#p2Cyh

~ Para que aprendas ~; 821; Registrado:; Mensajes: 2707; Aportes: 98

» 30 Oct 2011 21:33

Es similar a gema_lunar_para_clan_t87V.html

Pero se agradece igual

Imagen

@lautamarino; 531; Registrado: Octubre 2011; Mensajes: 2036; Aportes: 46; Premios: 1

» 18 Nov 2011 23:02

Como bien dijieron es simple y hay algo muy similar aportado.

Pero a no bajar los brazos y seguir que vas bien

!

Aguante River Plate ! ! !; 909; Registrado:; Ubicación: Villa adelina, Vicente Lopez.; Mensajes: 14428; Aportes: 305; Premios: 10

» 23 Nov 2011 15:29

Pero no tendrías que declarar el objeto?

Dim X As Obj
X.Amount = 1
X.ObjIndex = 10

? :3

Imagen

Imagen

TE AMO SKYFUN SOS MI FANNNNNNNNNNNNNNNNNNNNN

HAO Staff; 409; Registrado:; Ubicación: Buenos Aires; Mensajes: 2745; Aportes: 28; Premios: 1

» 24 Nov 2011 03:14

SimP escribió:Pero no tendrías que declarar el objeto?

Dim X As Obj
X.Amount = 1
X.ObjIndex = 10

? :3

si faltan algunos retoques pero algo es algo no ademas esta aprendiendo

off buen aporte segui practicando

Última edición por miqueas150 el 24 Nov 2011 03:15, editado 1 vez en total

Imagen

Ninja en progreso; 924; Registrado:; Ubicación: • olivos •; Mensajes: 4103; Aportes: 13

Volver a AO 0.12.x

Saltar a:

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados