z80:OCM
From Learn @ Cemetech
Jump to navigationJump to searchThis is a list of optimised routines for multiplying by a constant. Since multiplying by 2 or any power of 2 only requires doubling the value after multiplying by odd values, this is trivial. Therefore, we only look at multiplying by odd numbers. The list is not complete, but you should eventually see a pattern emerge if you need others:
HL_Mul_3: ld b,h ld l,c add hl,hl add hl,bc HL_Mul_5: ld b,h ld l,c add hl,hl add hl,hl add hl,bc HL_Mul_7: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_9: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_11: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_13: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_15_Fast: ld b,h ld l,c add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,hl add hl,bc HL_Mul_15_Small: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_17: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_19: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_21_Size: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_21_Speed: ld b,h ld l,c add hl,hl add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,bc HL_Mul_23: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_25: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_27_Size: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_27_Speed: ld b,h ld l,c add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_29: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_31: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,hl or a sbc hl,bc HL_Mul_33: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_35: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_37: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_39_Size: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_39_Speed: ld b,h ld l,c add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_41: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_43: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_45_Size: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_45_Speed: ld b,h ld l,c add hl,hl add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_47: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_49: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_51_Size: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_51_Speed: ld b,h ld l,c add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_53: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_55_Size: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_55_Speed: ld b,h ld l,c add hl,hl add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_57: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_59: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_61: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_63: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,hl add hl,hl or a sbc hl,bc HL_Mul_65: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_67: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_69: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_71: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_73: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_75_Size: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_75_Speed: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,bc HL_Mul_77: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_79: ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_81: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_83: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_85_Size: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc HL_Mul_85_Speed: ld b,h ld l,c add hl,hl add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_87_Size: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,bc HL_Mul_87_Speed: ld b,h ld l,c add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,bc ld b,h ld l,c add hl,hl add hl,bc HL_Mul_89: ld b,h ld l,c add hl,hl add hl,hl add hl,bc add hl,hl add hl,bc add hl,hl add hl,hl add hl,hl add hl,bc HL_Mul_255_Size: ex de,hl ld h,e xor a ld l,a sbc hl,de HL_Mul_255_Speed: xor a sub l ld e,a ld a,l sbc a,h ld d,a ex de,hl