1;
2;       Amstrad CPC library
3;
4; ******************************************************
5; **       Librería de rutinas para Amstrad CPC       **
6; **	   Raúl Simarro, 	  Artaburu 2009           **
7; ******************************************************
8;
9;       void  cpc_PrintGphStrM12X(char *, unsigned int address);
10;
11;       $Id: cpc_PrintGphStrM12X.asm $
12;
13
14        SECTION   code_clib
15        PUBLIC    cpc_PrintGphStrM12X
16        PUBLIC    _cpc_PrintGphStrM12X
17
18        EXTERN    cpc_PrintGphStr0M1
19
20
21.cpc_PrintGphStrM12X
22._cpc_PrintGphStrM12X
23
24	ld ix,2
25	add ix,sp
26
27	ld l,(ix+0)
28	ld h,(ix+1)	;destino
29
30   	ld e,(ix+2)
31	ld d,(ix+3)	;texto origen
32	ld a,1
33
34
35 JP cpc_PrintGphStr0M1
36
37