Le deuligne de RetroPoke #04 KIT-CAT

*******************

KIT-CAT

*******************

Ce n’est pas parce-que je me suis levé du pied gauche ce matin que je vais répéter 100 fois :

JE TE DEMANDE PARDON HUMBLE UTILISATEUR.

Bon d’accord, à défaut d’être chat l’heureux pour un article, il comble au moins le chat pitre.

Chaque mois je vous proposerais un nouveau programme tenant sur 2 lignes BASIC maximum.
Le règlement est simple.
– Deux Lignes en BASIC (Les lignes peuvent contenir du BASIC et du langage MACHINE)
– Un seul deux lignes par disquette
– Un petit résumé et explicatif du programme dans un fichier ALIRE.BAS si nécessaire.
– Envoyez le tout à: concours(@)amstrad.eu avant le 20 du mois en cours pour l’édito du mois d’après.
En espérant que vous apporterez de l’eau au moulin pour participer à l’édition de l’édito du mois.
Chaque mois je vous proposerais un nouveau programme tenant sur 2 lignes BASIC maximum.
Le règlement est simple.
– Deux Lignes en BASIC (Les lignes peuvent contenir du BASIC et du langage MACHINE)
– Un seul deux lignes par disquette
– Un petit résumé et explicatif du programme dans un fichier ALIRE.BAS si nécessaire.
– Envoyez le tout à: concours(@)amstrad.eu avant le 20 du mois en cours pour l’édito du mois d’après.
En espérant que vous apporterez de l’eau au moulin pour participer à l’édition de l’édito du mois.
Chaque mois je vous proposerais un nouveau programme tenant sur 2 lignes BASIC maximum.
Le règlement est simple.
– Deux Lignes en BASIC (Les lignes peuvent contenir du BASIC et du langage MACHINE)
– Un seul deux lignes par disquette
– Un petit résumé et explicatif du programme dans un fichier ALIRE.BAS si nécessaire.
– Envoyez le tout à: concours(@)amstrad.eu avant le 20 du mois en cours pour l’édito du mois d’après.
En espérant que vous apporterez de l’eau au moulin pour participer à l’édition de l’édito du mois.
Vous avez toujours admiré le détournement du catalogue des disquettes ?
Alors j’ai une bonne nouvelle pour vous. Ce programme permet justement de créer automatiquement une émulation de détournement du catalogue.

ATTENTION SI VOUS UTILISEZ LE COPIER/COLLER DU PRESSE PAPIER :
ce programme demande d’avoir le fichier « KIT-CAT.BAS » dans le lecteur ‘A’ pour fonctionner.

FONCTIONNEMENT :
Le programme charge le catalogue dans la mémoire interne du CPC puis modifie les noms des fichiers afin que ceux-ci ne s’affiche plus.
Ensuite il mémorise le nom du fichier indiqué dans la variable n$. Cette variable se trouve au tout début de la ligne [10] du programme afin que vous puissiez la modifier à votre convenance.
Vous pouvez alors vérifier que tout fonctionne en tapant la commande [CAT].
A vous alors de modifier la ligne [20] pour améliorer la présentation de votre page du catalogue.

CONSEIL :
Veuillez utiliser une copie de votre disquette. Je ne serais en aucun cas responsable des mauvaises manipulations de votre CAT.

Listing :

10 n$= »KIT-CAT »:MODE 2:b=&DDAD*2:d=66:PRINT n$ » Implantation en cours. »:POKE b,201:CALL b+&141,&8000:POKE b,207:FOR a=&8100 TO &83FF:POKE a,PEEK(a)+32*(a>32):NEXT:CALL b-18:PRINT »Opération terminé. Tapez CAT pour voir les modif. »:WHILE a:WHILE INKEY(d)=0
20 END:WEND:PRINT »Ready »:INPUT » »,a$:WHILE UPPER$(a$)= »CAT »:MODE 1:PEN 3:LOCATE 15,13:PRINT »RUN »+CHR$(34)+n$:PEN 1:FOR A=12 TO 28:LOCATE A,11:PRINT »# »:LOCATE A,15:PRINT »# »:NEXT:a$= »# »:WEND:WHILE a$> » » AND a$<> »# »:a$= »# »:PRINT »Syntax error »:WEND:WEND

0 commentaires

Soumettre un commentaire

Précommande !

 

MON COMPTE

Donathon 2026

MEMBRES EN LIGNE

CHAT LIVE

Vous devez être connecté pour accéder au Chat Live.

DISCORD AMSTRAD.EU

SUR LES FORUMS

Derniers messages du forum

DERNIERS COMMENTAIRES

CPCSCENE RADIO

VIDEOS