LD HL,(5C53H) inizio Basic. LD BC,(5B3DH) linea iniziale. NXTLN: siamo alla fine? EX DE,HL se si' ritorna al Basic. LD HL,(5C4BH fine Basic. AND A SBC HL,DE RET Z EX DE,HL LD D,(HL) prendi il numero di linea. INC HL LD E,(HL) EX DE,HL confrontalo con la linea SBC HL,BC iniziale. EX DE,HL se e' maggiore cerca la JR NC, FOUNDFR linea finale. INC HL altrimenti vai alla LD E,(HL) prossima. Prendi la INC HL la lunghezza della LD D,(HL) linea e aggiungila INC HL al puntatore. ADD HL,DE JR NXTLN FOUNDFR: salva il puntatore alla PUSH HL linea iniziale. LD BC,(5B3FH) ricerca la linea finale. NXTLN2: salta la linea corrente INC HL e vai alla prossima. LD E,(HL) INC HL LD D,(HL) INC HL ADD HL,DE EX DE,HL siamo alla fine del Basic? LD HL,(5C4BH) se si', esegui la cancel- AND A lazione. SBC HL,DE EX DE,HL JR Z,FOUNDEND LD D,(HL) altrimenti controlla INC HL il numero di linea, LD E,(HL) se e' quella finale EX DE,HL esegui la cancellazione. SCF SBC HL,BC confronto <=. EX DE,HL se non ho raggiunto la JR C,NXTLN2 linea finale, vado alla DEC HL prossima. FOUNDEND: prendo il pointer alla POP DE linea iniziale, DEC DE quindi salto alla routine JP 19E5H in ROM che esegue END la cancellazione.