Juego AE Navidad by iki (Todos los recursos)

[iki141]

Hace una semana hice un evento para las fiestas el cual no tuvo mucho éxito pero tampoco fue muy pretencioso. Acá dejo los recursos en su totalidad para que usen. Primero que nada dejo tal cual el Post como estaba, y los recursos al final (Ya que eliminaré el anterior post para mantener más limpio el Foro):

------------------------------------------------------------------------------------
1) ¿Tu mesa está vacía por cuestiones económicas? ¿no tenés compañia en tu hogar?... ¿sentís que tu familia real es AE?... vení y brindá con nosotros:



2) Te invitamos a hospedarte y pasarla genial en los campos del creador e ideador del Engine... Stream.



La idea es que los personajes usen especie de bunkers y se ataquen entre sí. Lo interesante es que deberán recoger las bolas de nieve para poder lanzarlas. Es decir, el ataque les consumirá la bola de nieve (Takeitem).

3) Explorá los mapas en busca de cobertura para tus ataques.



4) 6Dragon6 usó en tantos eventos su cabeza que la ha perdido, ¿podrías encontrarla?... (El juego sería un embole si fuera tan simple, así que para agregarle emoción también estará el evento "Encontrar la cabeza de 6Dragon6". Un Admin deposita la cabeza escondida entre los mapas, pudiendo ser detras de una maleza, etc, y el participante deberá llevarla a un NPC (QuestNPC con item requerido)).



5) Vení a la "Trollzone" a romperte la cabeza con bolas de nieve que recogerás del piso en los diversos mapas.



6) Lográ atravesar el dichoso laberinto o mejor conocido como Baño de Ellesar (en la imagen se ve sencillo, pero no es tan sencillo, ocupa todo el mapa).



7) Cada jugador al morir soltará una Moneda AE... cada 25 de estas son intercambiables por 1 AE Point al final de todo el evento (con el Staff o Mods, se chequearan las cuentas de usuarios).


También diseñe una especie de "Regalo AE", este se otorgará al cumplir un evento importante como el de la cabeza de 6Dragon6. También se otorgará un regalo que se depositará debajo del árbol para cada usuario conectado a la hora de festejar la navidad o año nuevo (obviamente habrá un administrador o mod en el juego para controlar que se agarre uno).



Bueno, es todo lo que puedo hacer, espero que a alguien le guste, la idea era que lo hagamos entre todos pero el tiempo corre y me veo en soledad; Near me ayudó con unos Sprites. Mantuve el proyecto en secreto Elite hasta hoy, espero que lo disfruten, además tiene cosas que obviamente no voy a comentar y deberán descubrir ustedes.

* Detalles:

1) Posiblemente al horario de navidad se otorguen regalos.

2) A ciertas horas del día se jugará a buscar la cabeza de 6Dragon6, pero se informará de esto en el juego.

3) Atrapa al pavo... un evento secreto próximo a venir antes de año nuevo.

* Agregados:
- Fuegos Artificiales
- Items Random únicos de los regalos.
------------------------------------------------------------------------------------

a) Cliente/Server:
Los invitados no pueden ver los enlaces. Por favor registrate AQUI para ver los enlaces.

b) Sprites (creados en el orden Iki/Near):


c) Tile:


d) GUI:
Los invitados no pueden ver los enlaces. Por favor registrate AQUI para ver los enlaces.

e) Scripts:

* Bola de Nieve (Arco) - Reemplazar el ArrowHit por este:

Sub OnArrowHit(Index, Damage)
Dim Target

If Int(Damage) > 0 Then
If Int(GetPlayerTarget(Index)) > 0 Then
Target = GetPlayerTarget(Index)
Call DamagePlayer(Index, Target, Damage)
Else
Target = GetPlayerTargetNpc(Index)
Call DamageNPC(Index, Target, Damage)
End If
End If
Call TakeItem(Index, 2, 0)
End Sub

* Fuegos Artificiales (pongo sólo 1, los demás son parecidos) - agregar lo siguiente en un Case de ScriptedItem:

Case 1
call SpellAnim(1,GetPlayerMap(Index), GetPlayerx(Index), GetPlayerY(Index))
Call PlaySound(index, "magic21.wav")
Call TakeItem(Index, 5, 0)
Exit Sub

*Regalos (Caja de la Suerte, creo que lo había creado Judoka el original hace mucho) - ScriptedItem:

Case 4
Numero = Rand(1,4)
Call TakeItem(Index, 3, 0)
If Numero = 1 Then
Call GiveItem(Index, 1, 0)
Call GiveItem(Index, 1, 0)
Call GiveItem(Index, 1, 0)
Call GiveItem(Index, 1, 0)
Call GiveItem(Index, 1, 0)
Call GiveItem(Index, 1, 0)
Call GiveItem(Index, 1, 0)
Call GiveItem(Index, 1, 0)
Call SendInventory(Index)
Call PlayerMsg(Index, "Has obtenido "& GetItemName(1), BRIGHTCYAN)
ElseIf Numero = 2 Then
Call GiveItem(Index, 10, 0)
Call SendInventory(Index)
Call PlayerMsg(Index, "Has obtenido "& GetItemName(10), BRIGHTCYAN)
ElseIf Numero = 3 Then
Call GiveItem(Index, 8, 0)
Call SendInventory(Index)
Call PlayerMsg(Index, "Has obtenido "& GetItemName(8), BRIGHTCYAN)
ElseIf Numero = 9 Then
Call GiveItem(Index, 9, 0)
Call SendInventory(Index)
Call PlayerMsg(Index, "Has obtenido "& GetItemName(8), BRIGHTCYAN)
End If
Exit Sub


* Chaqueta de la invisibilidad (Scripted Item) - Sprite 1 es un sprite vacío:

Case 5
Call SendPlayerData(Index)
Call SetPlayerSprite(index, 1)
Exit Sub

** Importante: Para que funcionen deben agregar el TakeItem al final del Main, busquen ya que no es de mi creación, según tengo entendido está en muchísimos Scripts pero el creador o portador hacia este Engine fue Stream.

f) Items:



g) SFX y Musica:

Los invitados no pueden ver los enlaces. Por favor registrate AQUI para ver los enlaces.


Bueno eso es todo, espero que a alguien le sea de utilidad aunque sea para experimentar. Salu2

[MalcoS]

Lo podrías postearlo en nuestro foro -.-
PD: Para que no sea flood: muchas gracias les va a servir a muchos

[drknc]

gracias iki , sos un capo

[carlitos971]

algunas cosas me seran bastante utiles >D gracias