Tvůrce webu je i pro tebe! Postav třeba web. Bez grafika. Bez kodéra. Hned.
wz

Obsah / Utility / TEXT / TextAddSpace

Zdrojový kód: INCLUDE\UTIL\TEXT.INC, UTIL\TEXT.ASM


TextAddSpace - Přidání znaku mezery na konec textového řetězce

Funkce TextAddSpace přidá znak mezery na konec textového řetězce.


; -----------------------------------------------------------------------------
;                      Add space character to end of text
; -----------------------------------------------------------------------------
; INPUT:	EBX = pointer to TEXT
; OUTPUT:	CY = memory error or invalid number (text not changed)
; -----------------------------------------------------------------------------

TextAddSpace:	push	eax		; push EAX
		mov	al," "		; AL <- space character
		call	TextAddByte	; add space character to end of text
		pop	eax		; pop EAX
		ret

Na vstupu funkce obsahuje registr EBX ukazatel na textovou proměnnou, ke které se má znak mezery přidat. Funkce interně volá funkci TextAddByte, které předá jako parametr znak mezery. V případě chyby paměti je navrácen chybový příznak CY a obsah textové proměnné se nezmění.


Obsah / Utility / TEXT / TextAddSpace