 org &4000
 nolist

; Example use of SPRITE.SRC written for MAXAM.
; Copyright 1993 Sentinel Software.

ld a,1
call &bc0e		;MODE 1

ld hl,tusssprite        ;Sprite data address
ld de,&c010	   	;Screen address of where sprite will be printed
ld b,82			;Height in pixels    Both got from the cords.
ld c,60                 ;Width in bytes      given when grabbing with TUSS
call sprite             ;gosub the sprite print routine
ret			;end



.sprite 
 push de 	 	 ;preserve screen address
 push bc  		 ;preserve dimensions
 ld b,0  		 ;BC = width in bytes
 ldir  			 ;copy the bytes, advance HL
 pop bc  	  	 ;retrieve dimensions
 pop de  		 ;retrieve screen address

 ex de,hl        	 ; 
 call &BC26 		 ;move DE onto next screen line
 ex de,hl      		 ;

 djnz sprite 		 ;loop back if not all lines done
 ret  			 ;if they are return

.tusssprite
read "sprite.asc"       ;Read sprite file saveed out as ASCII from TUSS.




DB &00,&00,&00,&00,&00,&00,&00,&00,&00,&00,&00,&00,&00,&00