TextGetLast - Načtení posledního znaku z textu


; -----------------------------------------------------------------------------
;                        Get last character from text
; -----------------------------------------------------------------------------
; INPUT:	EBX = pointer to TEXT
; OUTPUT:	EAX = Unicode character (or UNINOASC on error)
;		CY = error, no valid character (EAX = UNINOASC)
; -----------------------------------------------------------------------------

; ------------- Push registers

TextGetLast:	push	edx		; push EDX

; ------------- Prepare position of last character (-> EDX)

		call	TextLast	; get position of last character

; ------------- Read last character

		call	TextGetChar	; read last character from text

; ------------- Pop registers

		pop	edx		; pop EDX
		ret

Na vstupu funkce obsahuje registr EBX ukazatel na textovou proměnnou. Funkce navrátí v registru EAX poslední znak textu v kódu Unicode. Pokud je text prázdný, navrátí funkce nastavený příznak chyby CY a registr EAX obsahuje znak UNINOASC (otazník).

Funkce zjistí voláním funkce TextLast pozici posledního znaku v textu a voláním funkce TextGetChar tento znak načte.