* Esercizio 5 * * Scrivere un programma che converta una stringa in maiuscolo, sottraendo 32 al codice ASCII delle lettere * minuscole. * La stringa sia terminata da uno zero. * * Si provi il programma con la stringa 'Oggi, 6 Maggio' * ORG $8000 INIZIO MOVE.L #STRINGA,A0 Mette l'indirizzo della stringa in A0 CICLO TST.B (A0) Legge il carattere corrente BEQ FINECICLO Se e' il terminatore esce dal ciclo CMP.B #'a',(A0) Se e' minore 'a', non convertire BLO NONCONV CMP.B #'z',(A0) Se e' maggiore di 'z', non convertire BHI NONCONV SUB.B #32,(A0) Converte il valore NONCONV ADDA #1,A0 Incrementa il puntatore BRA CICLO e ricomincia il ciclo FINECICLO STOP #$2000 Termina l'esecuzione * * Dichiarazione delle variabili * ORG $8800 STRINGA DC.B 'Oggi, 28 Maggio',0 END INIZIO