Section 2 - Objetos que traen memoria
[--------------------------------------------------
La idea es incluir una clase nueva de objetos
que contengan:
- Un contador del número de veces
que son examinados
- Una tabla en la que se incluyen
mensajes y/o reglas a activar
cuando se alcanza el contador
que corresponda
--------------------------------------------------]
[
CLASE: Decorado activo
Así como sus definiciones y reglas asociadas
]
A decorado activo is a kind of thing.
A decorado activo is always scenery.
A decorado activo has a number called veces examinado.
The veces examinado of a decorado activo is usually 0.
A decorado activo has a table-name called comportamiento.
The comportamiento of a decorado activo is usually Table of comportamiento por defecto de decorado activo.
[DEFINICIÓN: Una definición para saber fácilmente si hay algo que mirar
en las tablas o no]
Definition: a decorado activo (called el-decorado) is reglado if the number of filled rows in the comportamiento of el-decorado is greater than 0.
[REGLA para modificar el número de veces examinado]
After examining a decorado activo (called observado):
increase the veces examinado of observado by 1.
[REGLA de sustitución de examinar]
Instead of examining a decorado activo (called observado):
[Si la tabla está vacía hacer lo de siempre]
if observado is not reglado, continue the action;
let N be veces examinado of observado;
increase N by 1;
[Si hay algo en la tabla buscar el valor actual]
if there is a regla corresponding to a vez of N in comportamiento of observado
begin;
[Existe, lo escogemos y ejecutamos la regla]
choose row with a vez of N in comportamiento of observado;
follow regla entry;
increase the veces examinado of observado by 1;
otherwise;
[No hay trigger, hacer lo de siempre]
continue the action;
end if.
[TABLA POR DEFECTO de eventos disparados ante
un número de examinados de un decorado activo]
Table of comportamiento por defecto de decorado activo
vez | regla |
a number | a rule |
[REGLA para coger un escenario]
Instead of taking a decorado activo (called cogido):
if the seccion is visible
begin;
say "Normalmente podría arracancar cualquier cosa de cualquier soporte con mis [j]manos[x]. Retorcer barras de acero y todo ese tipo de cosas, pero ahora... mejor ni intentarlo.";
otherwise;
try going east;
end if.