Libro "Los trucos del Amstrad"

[nacho]

Como comenté en otro hilo, estoy rehaciendo dos libros a la vez, para no aburrime de estar siempre con lo mismo.

El segundo es el de "Los trucos del Amstrad", que puede ser interesante para quien ya conoce algo de Basic, pero el "original" es un escaneo sin OCR, y con alguna que otra errata, así que estoy creando una versión "a mi gusto", con los fuentes probados, la sintaxis en colores, capturas de pantalla e incluso un DSK que contiene todos los fuentes.

Dejo aquí una "preview", con la mitad de los trucos (unos 23 de 46), para que me comentéis qué os parece.

De paso, si alguien tiene el libro original y/o puede conseguir un escaneo de mayor calidad de la portada original, que lo diga y lo incluimos.

[nacho]

Segunda mitad del libro casi lista. La publico para que podáis hacer sugerencias, y en el siguiente post indico los "problemas conocidos".

Como podéis ver en las dos ultimas páginas, ha habido muchas erratas que corregir.

Insisto en que si alguien puede hacer un escaneado de la portada con mayor calidad que el existente, que avise para que el resultado sea lo mejor posible.

[nacho]

Voy ahora brevemente con los problemas conocidos...

- Seguro que hay más de una cosa que "remaquetar". Por ejemplo, la tabla del apartado 27 tiene algunas columnas demasiado estrechas y "parte" los números en varias filas.

- Un par de fuentes no funcionan correctamente. Los incluyo aquí por si alguien ve el fallo, y así yo me vuelvo al libro de código máquina.

El primero es el de redefinir teclas (ficha 15): alguna tecla cambia sin tener que hacerlo: T pasa a ser D, etc

Código: Seleccionar todo

5 REM TECLAS DEFINIDAS - TECLADO ALFABETICO
10 KEY DEF 36,0,108,76,141
15 KEY 141,"LIST "
20 KEY DEF 27,0,112,80,142
25 KEY 142," PRINT "
30 KEY DEF 60,0,115,83,143
35 KEY 143 , "SAVE "+CHR$(34)
40 KEY DEF 69,0,97,65,144
45 KEY 144 , "LOAD "+CHR$(34)
50 KEY DEF 52,0,103,71,145
55 KEY 145," GOTO "
60 KEY DEF 53,0,102,70,146
65 KEY 146,"FOR "
70 KEY DEF 51,0,116,84,147
75 KEY 147," TO "
80 KEY DEF 46,0,110,78,148
85 KEY 148,"NEXT "
90 KEY DEF 50,0,114,82,149
95 KEY 149, "RUN "+CHR$(13)
100 KEY DEF 35,0,105,73,150
105 KEY 150,"INPUT "
110 KEY DEF 50,0,101,69,151
115 KEY 151,"EDIT "
120 KEY DEF 62,0,99,67,152
125 KEY 152,"CHR$("
130 KEY DEF 34,0,111,79,153
135 KEY 153, "LOCATE "
140 KEY DEF 43,0,121,89,154
145 KEY 154,"IF "
150 KEY DEF 51,0,116,84,155
155 KEY 155," THEN "
160 KEY DEF 42,0,117,85,156
165 KEY 156," USING "
170 KEY DEF 51,0,100,68,157
175 KEY 157, "DATA "
180 CLS: NEW

El segundo trata de dibujar caracteres grandes, a base de escribir caracteres pequeños, leerlos puntos apunto con TEST y dibujarlos con "puntos grandes" usando DRAWR (ficha 34):

Código: Seleccionar todo

10 ' LETRAS GIGANTES
20 MODE 1
30 X=1:Y=1
40 T$="GIGANTES"
50 XX=0:YY=240
60 A=16*(X-1)
70 B=399-(Y-1)*16
80 FOR L=1 TO LEN(T$)
90 A$=MID$(T$,L,1)
100 GOSUB 140
110 XX=XX+64
120 NEXT L
130 END
140 P=XX:Q=YY
150 LOCATE X,Y: PRINT A$
160 FOR N=B TO B-16 STEP –2
170 FOR M=A TO A+16 STEP 2
180 IF TEST (M,N) THEN GOSUB 230
190 P=P+8
200 NEXT M
210 Q=Q-8:P=XX
220 NEXT N:RETURN
230 FOR T=0 TO 7 STEP 2
240 MOVE P,Q-T:DRAWR 8,0,2
250 NEXT T
260 RETURN

Como siempre, cualquier otra sugerencia será bienvenida, y así en poco tiempo sacamos otra "reedición" de un libro para CPC.

[MiguelSky]

Vale, en el primero, el problema está en las líneas:

110 KEY DEF 58,0,101,69,151
170 KEY DEF 61,0,100,68,157


Y en el segundo, en

160 FOR N=B TO B-16 STEP –2

el autotype no ve ese signo menos !!

[nacho]

Mil gracias, Miguel.

Pues a falta de una portada de mayor calidad, genero el PDF final para enviar la "versión renovada" a Litos o a algún administrador. ¿Algún voluntario? Creo que tengo el correo privado de... casi nadie. Sí, el de Artaburu, de cuando revisé el libro de Gráficos. ¿Se lo envío a Arta?

[Artaburu]

Mándamelo si quieres y lo subo avisando a Litos para que modifique la web y le de acceso.
Por cierto, yo tengo el libro y creo que fui yo el que lo escaneó pero ahora ya no tengo el escáner y malamente podré sacar la portada en condiciones... a no ser que de alguna manera se pueda fotografiar en condiciones pero nunca quedará igual que un escaneado decente...
Espera... igual lo puedo llevar a donde mi hermano para escanearlo bien. Seguiré informando luego

[cpcmaniaco]

Yo lo tengo tambien y lo puedo escanear, solo decirme como lo quereis y a quien se lo envio.

Le hice la ficha aqui :

http://cpcwiki.eu/index.php/Los_Trucos_del_Amstrad

Pero se puede escanear de nuevo, mejor.

[Artaburu]

Si lo puedes escanear tú, mejor que a mí se me ha olvidado llevarlo para que me lo escaneen y hasta la semana que viene no podría.
Gracias!

[nacho]

Siento estar desaparecido del mundo, pero los problemas familiares de salud persisten (y ya van meses), el trabajo se me amontona... y los hobbies se van aplazando.

Aun así, tomé la portada de la ficha de CpcWiki, que tiene una calidad aceptable, y tengo una versión de PDF preparada, que iba a enviar a Litos, y se me pasan los días sin hacerlo. ya que estamos, espero una semanita por si podeis haceros con una versión aún mayor (una foto podría también podría servir).

[MiguelSky]

Espero que todo se vaya solucionando...

En cuanto al pdf, yo también quería haberle echado un ojo más a fondo pero no saco tiempo