Base de reglas y area para derribar un muro con misiles. Es una base de reglas fundamentalmente destructiva, donde una serie de lanzaderas de misiles tratan de derribar un muro en el que a su vez sus elementos son explosivos y al recibir un impacto pueden producir cadenas de destruccion que se transmiten a sus elementos adyacentes en secuencia. // Esta base de reglas incluye un ultima regla de deteccion del final del proceso de deteccion de reglas y que construye la frase clasica de game over,
//////////////////////////////////////////////////////////////////////////////
Set WalAre = AreaBuild(
[["---------------",
"·ooooooooooooo·",
"··o·o·o·o·o·o··",
"···············",
"···············",
"···············",
"···············",
"[^]·[^]·[^]·[^]",
"---------------"]]);
//////////////////////////////////////////////////////////////////////////////
PutDescription("Campo de batalla entre bombarderos y lanzaderas.", WalAre);
//////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////
Set WalRul = SetOfSet(
RuleBuild([["· => |",
"| ·"]]), // Misil sube
RuleBuild([["··· => |||",
"·|· ···"]]), // Misil se despliega en 3 cabezas
RuleBuild([["- => -",
"| ·"]]), // Misil se pierde sin causar daños
RuleBuild([["o => 0",
"| ·"]]), // Misil impacta e inicio de explosion
RuleBuild([["0 => ·",
"| ·"]]), // Misil impacta seco y destructivo
RuleBuild([["o0 => 0·"]]), // Explosion hacia la izquierda
RuleBuild([["0o => ·0"]]), // Explosion hacia la derecha
RuleBuild([["o => 0",
"0 ·"]]), // Explosion hacia a arriba
RuleBuild([["0 => ·",
"o 0"]]), // Explosion hacia a bajo
RuleBuild([["0 => 0",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara corto sobre elemento grande
RuleBuild([["o => o",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara corto sobre elemento pequeño
RuleBuild([["0 => 0",
"· ·",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara largo sobre elemento grande
RuleBuild([["o => o",
"· ·",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara largo sobre elemento pequeño
RuleBuild([["--------------- => ---------------",
"··············· G A M E O V E R"]])); // Fin del juego
//////////////////////////////////////////////////////////////////////////////
PutDescription(
"Base de reglas para el derribo sistematico de un muro con 2 tipos de
elementos grandes y pequeños hasta su derribo final.",
WalAre);
//////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////
// FILE : bat.tol
// AUTHOR : http://www.asolver.com
// PURPOSE : Base de reglas y area para derribar un muro con misiles.
// Es una base de reglas fundamentalmente destructiva,
// donde una serie de lanzaderas de misiles tratan de derribar un muro
// en el que a su vez sus elementos son explosivos y
// al recibir un impacto pueden producir cadenas de destruccion que
// se transmiten a sus elementos adyacentes en secuencia.
//
// Esta base de reglas incluye un ultima regla de deteccion del final del
// proceso de deteccion de reglas y que construye la frase clasica de
// game over,
//////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////
// CONSTANTS
//////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////
Set WalAre = AreaBuild(
[["---------------",
"·ooooooooooooo·",
"··o·o·o·o·o·o··",
"···············",
"···············",
"···············",
"···············",
"[^]·[^]·[^]·[^]",
"---------------"]]);
//////////////////////////////////////////////////////////////////////////////
PutDescription("Campo de batalla entre bombarderos y lanzaderas.", WalAre);
//////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////////////////////////
Set WalRul = SetOfSet(
RuleBuild([["· => |",
"| ·"]]), // Misil sube
RuleBuild([["··· => |||",
"·|· ···"]]), // Misil se despliega en 3 cabezas
RuleBuild([["- => -",
"| ·"]]), // Misil se pierde sin causar daños
RuleBuild([["o => 0",
"| ·"]]), // Misil impacta e inicio de explosion
RuleBuild([["0 => ·",
"| ·"]]), // Misil impacta seco y destructivo
RuleBuild([["o0 => 0·"]]), // Explosion hacia la izquierda
RuleBuild([["0o => ·0"]]), // Explosion hacia la derecha
RuleBuild([["o => 0",
"0 ·"]]), // Explosion hacia a arriba
RuleBuild([["0 => ·",
"o 0"]]), // Explosion hacia a bajo
RuleBuild([["0 => 0",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara corto sobre elemento grande
RuleBuild([["o => o",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara corto sobre elemento pequeño
RuleBuild([["0 => 0",
"· ·",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara largo sobre elemento grande
RuleBuild([["o => o",
"· ·",
"· ·",
"· ·",
"· ·",
"· |",
"^ ^"]]), // Dispara largo sobre elemento pequeño
RuleBuild([["--------------- => ---------------",
"··············· G A M E O V E R"]])); // Fin del juego
//////////////////////////////////////////////////////////////////////////////
PutDescription(
"Base de reglas para el derribo sistematico de un muro con 2 tipos de
elementos grandes y pequeños hasta su derribo final.",
WalAre);
//////////////////////////////////////////////////////////////////////////////
ChRules.RandRecursive programa de aplicacion de reglas de rectangulos de caracteres
2015 asolver.com | Aviso legal | XHTML | Δ Θ Ξ | Creative Commons | Mapa y funciones del sitio