1 2; SP1MakeRect8Pix 3; 05.2006 aralbrec, Sprite Pack v3.0 4; sinclair spectrum version 5 6PUBLIC SP1MakeRect8Pix 7 8; Conversion from struct_sp1_ss to struct_r_Rect8 9; with members multiplied by 8 (change from character 10; coordinates to pixel coordinates). 11; 12; enter : hl = struct sp1_ss * 13; de = destination struct r_Rect8 * 14; uses : af, b, de, hl 15 16.SP1MakeRect8Pix 17 18 ld b,(hl) 19 inc hl 20 ld a,(hl) 21 inc hl 22 add a,a 23 add a,a 24 add a,a 25 ld (de),a 26 inc de 27 ld a,(hl) 28 inc hl 29 add a,a 30 add a,a 31 add a,a 32 ld (de),a 33 inc de 34 ld a,b 35 add a,a 36 add a,a 37 add a,a 38 ld (de),a 39 inc de 40 ld a,(hl) 41 inc hl 42 add a,a 43 add a,a 44 add a,a 45 ld (de),a 46 dec de 47 ld a,(de) 48 ld b,a 49 ld a,(hl) 50 inc hl 51 and $07 52 add a,b 53 ld (de),a 54 dec de 55 dec de 56 ld a,(de) 57 add a,(hl) 58 ld (de),a 59 ret 60