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 COMMENTAIRES

CPCSCENE RADIO

VIDEOS