Info 68000

di
birkhoff92
il
1 risposte
birkhoff92
birkhoff92
Utente Attivo
Iscritto da
ott, 2013
Messaggi:
121

Info 68000

Salve, ho ricopiato codesto codice da un manuale 
*Questo segmento di programma cerca la stringa 'SYNC' all'interno di un buffer di * caratteri.
*Nel caso in cui la stringa viene trovata , si salta ad una subroutine (MSGOUT) * che stampa un messaggio appropriato

INIZIO	ORG	$800
	MOVE.L	#BUFADD,A0

CERCAS	MOVE.L	A0,D0
	CMPI.L	#BUFADD+BUFSIZE-4,D0
	MOVE.L	D0,A0
	BGT.S	FINE
	CMPI.B	#'S',(A0)+
	BNE.S	CERCAS
CERCAY	CMPI.B	#'Y',(A0)
	BNE.S	CERCAS
	ADDQ.L	#1,A0
CERCAN	CMPI.B	#'N',(A0)
	BNE.S	CERCAS
	ADDQ.L	#1,A0
CERCAC	CMPI.B	#'C',(A0)
	BNE.S	CERCAS
	JSR	MSGOUT
FINE	NOP
	ORG	$8100
BUFADD	DC.B	'DSFGSYBNSYNKHSYNCAEXCLSYN'
BUFSIZE	EQU	25
	END	INIZIO
ma msgout non compare e non so come creare tale subroutine.

1 Risposte

  • S
    smalldragon
    Molto attivo
    Iscritto da
    nov, 2008
    Messaggi:
    895

    Re: Info 68000

    Ciao
    inanzitutto buon anno
    allora le subroutine vengono chiamate tramite l'istruzione JSR nome
    quando la crei alla fine della routine devi porre l'istruzione RTS
    per quanto riguarda la visualizzazione 
    
HE DS.B ?
VEDI:
MOVE.B #14,D0
LEA HE,A1
TRAP #15
RTS
    vediti questo link e' pieno di esempi che ti possono tornare utili


    spero di esserti stato d'aiuto
Devi accedere o registrarti per scrivere nel forum
1 risposte