Nuevos programas añadidos (ZX 10)

Una nueva actualización para indicar que se han añadido los primeros programas del nº 10 de “ZX”, a cuya ficha accedéis pulsando en el enlace adjunto. En este ejemplar del mes de septiembre de 1984, sus redactores pensaron que sería una buena idea cubrir las páginas dedicadas a los listados en BASIC con programas didácticos de diverso rango, basados muchos de ellos en las asignaturas de Matemáticas, Geografía, Física y Química, tras unas merecidas vacaciones veraniegas. De ahí que en su portada dedicara el tema de la revista a estos programas educativos. También hay un programa sobre circuitos electrónicos para los estudiosos de la Electrónica.

Conforme vaya completando el resto de programas durante los dias siguientes, se irán incorporando cada uno de ellos a sus correspondientes fichas.

Ficha nº 10 de “ZX”

Anuncios

Programa “Aprenda a esquiar” del nº 8 de Ordenador Popular

Procedente del nº 8 de la misma revista “Ordenador Popular” que ha sido preservada muy recientemente, y antes de que desaparezca de mis manos, he decidido copiar el único listado BASIC para ZX Spectrum presente en ella; un sencillísimo juego de esquí llamado “Aprenda a esquiar”, sin concretar sobre su autoría, aunque en un principio he podido intuir que haya sido copiado a partir de alguna publicación inglesa. Y de hecho, así es: Ski Run, publicado originalmente en la revista ZX Computing.

Lo he copiado tal cual figura en las páginas de la revista, con algunas líneas con textos traducidos al castellano. El enlace a este programa, además de mostrarlo aquí, se ha añadido también dentro del apartado de “Otros programas” del blog.

Ski Run, o Aprenda a Esquiar.

Nueva actualización (ZX 9, 18, 19 y 20)

Por fin, otro número completo de programas disponible para los curiosos y amantes de la revista “ZX”. Ya se pueden descargar todos los programas aparecidos en el nº 9 de esta revista en particular, además de haber preparado los enlaces a cada uno de los listados publicados en sus nº 18, 19 y 20, a partir de las recopilaciones enviadas por Daniel Castro.

Entre los programas que me han llamado bastante la atención y será del gusto de los amantes del dibujo técnico al pixel es uno en concreto, dentro de la serie “Gráficos en el Spectrum” de Christian Batlle, al final de la revista nº 9, en la página 58: Un llamativo generador de figuras en tres dimensiones, como la que podéis contemplar en esta captura. En el archivo descargable, es el “Programa 6”. Tan solo es necesario introducir una serie de parámetros con la que el programa va creando el perfil. Cuando terminamos, el ordenador mostrará en pantalla dicha figura de forma tridimensional y la irá girando en un sentido determinado. Conviene repasar con cuidado las instrucciones dadas en la revista.

Parámetros de la copa: (X, Y):
0,0
40,0
35,10
10,15
10,60
50,65
60,100
55,100
45,70
3,64
999 (para terminar)

Verlos aquí: ZX 09 / ZX 18 / ZX 19 / ZX 20.

Más programas del nº 9 de la revista ZX

Aunque de manera más pausada, se siguen añadiendo nuevos programas al proyecto. Hoy tocaba subir dos programas más, pacientemente tecleados y revisados por mí, del número 9 de la revista “ZX”: un entretenido juego de guerra en el mar, llamado “Submarino” (pág. 38) y una versión informatizada más del clásico juego de mesa, “Othelo” (pág. 42), siendo éste último una adaptación del listado original, creado por el lector Ramón Vilas para el Sinclair ZX-81. Es decir, que me he tomado la molestia de copiar por entero dicho listado y con los pequeños cambios necesarios para que funcione de igual forma en cualquier ZX Spectrum de 16 ó 48k.

Consideraba oportuno añadir esta adaptación, como espero pueda hacer con otros programas inicialmente pensados para el hermano mayor del Spectrum, aunque no lo haga con todos, salvo que tengan un mínimo de interés. Al margen de esto, tengo en cartera nuevos programas pasados por Daniel Castro que, próximamente, se añadirán al archivo, más los que vaya yo copiando por mi parte tanto de este número en concreto (aún quedan unos cuantos) como de los siguientes.

Verlos aquí: ZX 09

Nuevos programas de la revista “ZX” (nº 8 y 9)

En estos dias he trabajado bastante, a determinadas horas del dia, en la transferencia de varios listados no preservados de los nº 8 y 9 de la revista ZX. Aun no habiendo concluido con esta tarea, a falta de añadir varios programas, quiero ir adelantando los enlaces a sus respectivas páginas.

Como advertiréis, al comienzo de cada página dejo un enlace a lo ya recopilado de cada ejemplar, esté al completo o no (se irán actualizando estos archivos tan pronto como estén disponibles el resto de programas). De paso, anunciar que el colaborador Daniel Castro me facilitó todos los programas incluidos en los nº 18, 19 y 20. He dejado sus enlaces correspondientes en las páginas a que se refieren dichos ejemplares, a falta de ir incorporando todos y cada uno de los programas contenidos en estos archivos zip por separado y en su ubicación correspondiente. Esto se hará cuando toque actualizar dichas páginas.

RESUELTO: Un problema “matemático” con un programa de cálculo estadístico sobre depreciaciones de compra

Tengo un problemilla que compartir con vosotros, sobre todo con quien tenga más experiencia en estadística o cálculo estadístico. Intento poner en marcha un programa llamado “Depreciación” del nº 9 de la revista “ZX”. Un listado muy corto inicialmente pensado para los ZX-81, pero que también puede valer para cualquier ZX Spectrum, haciendo los pertinentes cambios, en este caso casi inapreciables.

Hay un error en la línea 110 del listado (un signo de multiplicación de más – si intento añadir ese segundo signo “por” y pulsar Enter para validar dicha linea, da siempre error), pero además hay un error dentro de la fórmula para calcular el valor residual (VO) de una compra por valor determinado (VA), con una tasa fija de depreciación anual (TD, en tanto por ciento. El programa se encarga de dividirlo por 100 en la línea 75) y según los años transcurridos (NA). Cada vez que se introducen nuevos datos, el valor que da como resultado es mucho mayor que el deseado.

75 LET TD=TD/100

110 LET VO=VA*(1-TD)**NA

Por un lado, para hallar la tasa fija anual, la fórmula sería, según el método de tasa fija uniforme (entiendo que es el que se quiere emplear en este programa y así lo recoge esta fuente):

n = Años transcurridos
s = Valor desecho (residual)
c = Valor inicial de costo
TFU = Tasa Fija Uniforme

De esta fórmula, me interesaría saber cómo sería la que necesitaría para obtener el valor residual (s), a partir de los datos de (c), (TFU) y (n) que son los que te van pidiendo en el programa con cada INPUT (VA, TD y NA, respectivamente).

ACTUALIZO: ¡Eureka! Tras darle varias vueltas anoche a la fórmula, recordé de mis tiempos de estudiante cómo transformar una ecuación lineal para extraer de él un valor en concreto:

Tenemos por un lado, la fórmula para determinar la tasa fija uniforme, como habíamos visto antes. De ahí, vamos a extraer el valor de “s”:

tfu = (1-­n√s/c)*100

tfu/100 = 1-n√s/c

1-(tfu/100) = n√s/c

(1-(tfu/100))↑n = s/c

y, por último:

s = c*(1-(tfu/100))↑n

lo que supondría para el programa que estoy tratando de corregir, que la línea 110 quedaría entonces de la siguiente forma:

110 LET VO=VA*((1-TD)↑NA)

Está copiado en su versión para ZX Spectrum, a falta de subirlo en breve. Y no me importa hacerlo con esta corrección para que funcione correctamente.