INITIALISATION Les routines sont toutes appelées par CALL , c'est peu élégant mais permet un usage indépendant de chacune d'elle sans tripoter le pointeur de pile ou effectuer des tests de conditions complexes . Pour la même raison , toute sélection entraîne la mise en route du moteur et la remise à 0 des interruptions . C'est du dernier ridicule pour effectuer une conversion numérique mais il faut parfois savoir rester simple . On pourrait envisager la mise en route du moteur à partir du BASIC et le laisser tourner en permanence mais cela semble causer quelques perturbations au niveau de certaines commandes . Essayez , si le programme ne donne plus de bons résultats c'est raté ! Au premier appel , la routine TST2DR vous demande si vous êtes satisfait de l'état de la configuration drives . Si ce n'est pas le cas , changez et appuyez sur "N" . Si vous utilisez 2 drives , il vous reste possible d'éteindre - allumer - débrancher ou brancher le drive B en cours de fonctionnement . Vous pourrez ainsi constater de visu les erreurs provoquées . Réinitialisez la configuration en appuyant sur "A" quand vous voudrez la restaurer . NOTE : Les entrées numériques peuvent se faire en décimal ou en hexadécimal (Commencer l'entrée par "&") . Les affichages se font en binaire ou hexadécimal . ;
ORG 38000
;------------------
;- INITIALISATION -
;------------------
CALL INIPROG ;Initialisation
RECTSDR CALL MOTON
CALL TST2DR
CALL MOTOFF
CALL OUNO ;Oui ou non ?
JR NC,RECTSDR ;Sinon recommencer
;
;- Affichage menu -
;
MENU LD HL,TMENU
CALL PRT ;Afficher menu
CALL PRTDRIV
TSTMENU CALL MOTOFF
CALL #BB06 ;Attendre une touche
PUSH AF
CALL MOTON ;Mettre moteur en route (A modifie)
RETERR LD HL,TEFFLB1 ;Effacer avant derniere ligne
CALL PRT
LD HL,TCOMMAN
LD IY,#0218
CALL PRTLOC
CALL RAZINTE ;Remise a zero etats d'interruption
POP AF
AND #DF
CP "A"
CALL Z,TST2DR ;Tester drives
CP "B"
CALL Z,CHGDRIV ;Changer de drive
CP "C"
CALL Z,TROICON ;Conversion numerique
CP "D"
CALL Z,GOZERO ;Piste 0
CP "E"
CALL Z,GOPISTE ;Piste N
CP "Q"
JR NZ,TSTMENU
LD HL,TQUIT
CALL PRT
CALL OUNO
JP C,MOTOFF
JR TSTMENU
;
TCOMMAN DEFB 18,24," COMMANDE : ",24," ?",7,8,8+#80
TQUIT DEFB " Fini"," "+#80SOS Programmeurs n°1 | ★ AMSTRAD CPC ★ DOWNLOAD ★ |
|
CPCrulez[Content Management System] v8.7-desktop/c
Page créée en 756 millisecondes et consultée 1787 foisL'Amstrad CPC est une machine 8 bits à base d'un Z80 à 4MHz. Le premier de la gamme fut le CPC 464 en 1984, équipé d'un lecteur de cassettes intégré il se plaçait en concurrent du Commodore C64 beaucoup plus compliqué à utiliser et plus cher. Ce fut un réel succès et sorti cette même années le CPC 664 équipé d'un lecteur de disquettes trois pouces intégré. Sa vie fut de courte durée puisqu'en 1985 il fut remplacé par le CPC 6128 qui était plus compact, plus soigné et surtout qui avait 128Ko de RAM au lieu de 64Ko. |
|
|
