Полезные наработки

[Robus]

А у меня то же есть весёлая процедурка, интересно кто-нибудь узнает что это за звук, который она выдаст ?

              LD HL,0
M1            LD A,L
              RRCA
              RRCA
              AND 15
              LD E,A
              LD D,0
              PUSH HL
              LD L,(HL)
              CALL 949
              POP HL
              DEC L
              JR NZ,M1
              RET

И ещё вот эта:

              LD HL,0
              LD DE,1
M1            PUSH HL
              LD L,(HL)
              PUSH DE
              CALL 949
              POP DE
              POP HL
              DEC L
              JR NZ,M1
              RET