こんな問題はいかがでしょう

　LD  HL,(ADRVA)  ; 16クロック
　LD  DE,(ADRVB)  ; 20クロック
　ADD HL,DE       ; 11クロック
　LD  (ADRVC),HL  ; 16クロック
;            　計 63クロック

;
; 概算の為の仮コードですので間違い等はご容赦を
;
 　 LD   BC,0800H    ; 10クロック
 　 LD   DE,(ADRVA)  ; 20クロック
    LD   HL,(ADRVB)  ; 16クロック
    LD   A,L         ;  4クロック
    LD   L,C         ;  4クロック
    LD   C,H         ;  4クロック
    LD   H,L         ;  4クロック
;                 小計 62クロック
;
 L1:RRA              ;  4クロック
    JP   NC,P1       ; 10クロック
    ADD  HL,DE       ; 11クロック
 P1:RR   H           ;  8クロック
    RR   L           ;  8クロック
    DJNZ L1          ; 13クロック(ループ時) 
　                   ;  8クロック(ループしない)
;                 小計 54クロック(ループ時)
;                      49クロック(ループしない)
;          ループ全体 427クロック(7回反復、8回目スルー)           
;
    RRA              ;  4クロック
    LD   (ADRVC),A   ; 13クロック
    LD   A,C         ;  4クロック
    LD   BC,0800H    ; 10クロック
;                 小計 31クロック
;
 L2:RRA              ;  4クロック
    JP   NC,P2       ; 10クロック
    ADD  HL,DE       ; 11クロック
 P2:RR   H           ;  8クロック
    RR   L           ;  8クロック
    DJNZ L2          ; 13クロック(ループ時) 
　                   ;  8クロック(ループしない)
;                 小計 54クロック(ループ時)
;                      49クロック(ループしない)
;          ループ全体 427クロック(7回反復、8回目スルー)           
;
    RRA              ;  4クロック
    LD   (ADRVC+1),A ; 13クロック
;                 小計 17クロック
;
;                  計 964クロック

　　　　ORG 0100H
START:　LD A,20H
　　　　LD HL,0400H

main()
{
 char b;
	while(1)
	{
		b=miniget();
		printf("hen%d\n",b);
	}
}

//
// ROLLER1.c ( Ver 1.6.2 )
// Numerical Puzzle
// by ADUMA Haruka
//
// % gcc -o ROLLER1 ROLLER1.c
// % ./ROLLER1
//
// if ( m1 ) result = ( ABCD * E == FGHI ) ;
// if ( m2 ) result = ( ( ( AB * C == DE ) && ( DE + FG == HI ) ) ) ;
//
// 2.650s @ Core i5-4200 ( 2.2GHz )
//

#include <stdio.h>
#include <stdlib.h>

#define MAXCARDINALS 20L

int main ( int ARGC , char **ARGV , char ENVV ) {

 unsigned long A , B , C , D , E , F , G , H , I ;
 unsigned long L , M , R , L1 , L2 , R1 , R2 ;
 unsigned long c = 10L ;
 unsigned long S4 = 1L , SX = 1L ;
 int i ;
 char f[MAXCARDINALS] ;

 int m1 = 1 , m2 = 0 ;
 int result = 0 ;

 if ( m1 == 0 ) m2 = 1 ;

 for ( i = 0 ; i < MAXCARDINALS ; i++ ) f[i] = 1 ;

 for ( c = 10L ; c <= 10L ; c++ ) {
  for ( A = S4 ; A < c ; A++ ) {
   for ( B = SX ; B < c ; B++ ) {
    for ( C = SX ; C < c ; C++ ) {
     for ( D = SX ; D < c ; D++ ) {
      for ( E = SX ; E < c ; E++ ) {
       for ( F = SX ; F < c ; F++ ) {
        for ( G = SX ; G < c ; G++ ) {
         for ( H = SX ; H < c ; H++ ) {
          for ( I = SX ; I < c ; I++ ) {
           result = 0 ;
           if ( m1 ) {
            M = E ;
            L = ( ( ( ( A * c ) + B ) * c + C ) * c + D ) * M ;
            R =   ( ( ( F * c ) + G ) * c + H ) * c + I       ;
            result = ( L == R ) ;
           }
           if ( m2 ) {
            L1 = ( ( A * c ) + c ) * C ;
            R1 =   ( D * c ) + E ;
            L2 = R1 + ( ( F * c ) + G ) ;
            R2 =        ( H * c ) + I ;
            result = ( ( L1 == R1 ) && ( L2 == R2 ) ) ;
           }
           if ( result ) {
            if ((A!=B)&&(A!=C)&&(A!=D)&&(A!=E)&&(A!=F)&&(A!=G)&&(A!=H)&&(A!=I)
                      &&(B!=C)&&(B!=D)&&(B!=E)&&(B!=F)&&(B!=G)&&(B!=H)&&(B!=I)
                              &&(C!=D)&&(C!=E)&&(C!=F)&&(C!=G)&&(C!=H)&&(C!=I)
                                      &&(D!=E)&&(D!=F)&&(D!=G)&&(D!=H)&&(D!=I)
                                              &&(E!=F)&&(E!=G)&&(E!=H)&&(E!=I)
                                                      &&(F!=G)&&(F!=H)&&(F!=I)
                                                              &&(G!=H)&&(G!=I)
                                                                      &&(H!=I)){
             printf ( "c=%3ld : %2ld,%2ld,%2ld,%2ld,%2ld,%2ld,%2ld,%2ld,%2ld\n"
              ,c,A,B,C,D,E,F,G,H,I
             ) ;
 }}}}}}}}}}}}
 return 0 ;
}

//
// ROLLER2.c ( Ver 2.2.7 )
// Numerical Puzzle
// by ADUMA Haruka
//
// % gcc -o ROLLER2 ROLLER2.c
// % ./ROLLER2
//
// if ( m1 ) result = ( ABCD * E == FGHI ) ;
// if ( m2 ) result = ( ( ( AB * C == DE ) && ( DE + FG == HI ) ) ) ;
//
// 0.050s @ Core i5-4200 ( 2.2GHz )
//

#include <stdio.h>
#include <stdlib.h>

#define MAXCARDINALS 20L

int main ( int ARGC , char **ARGV , char ENVV ) {

  unsigned long A , B , C , D , E , F , G , H , I ;
  unsigned long L , M , R , L1 , L2 , R1 , R2 ;
  unsigned long c = 10L ;
  unsigned long S4 = 1L , SX = 1L ;
  int i ;
  char f[MAXCARDINALS] ;

  int m1 = 1 , m2 = 0 ;
  int result = 0 ;

  if ( m1 == 0 ) m2 = 1 ;

  for ( i = 0 ; i < MAXCARDINALS ; i++ ) f[i] = 1 ;

  for ( c = 10L ; c <= 10L ; c++ ) {
    for ( A = S4 ; A < c ; A++ ) if ( f[A] ) { f[A] = 0 ;
      for ( B = SX ; B < c ; B++ ) if ( f[B] ) { f[B] = 0 ;
        for ( C = SX ; C < c ; C++ ) if ( f[C] ) { f[C] = 0 ;
          for ( D = SX ; D < c ; D++ ) if ( f[D] ) { f[D] = 0 ;
            for ( E = SX ; E < c ; E++ ) if ( f[E] ) { f[E] = 0 ;
              for ( F = SX ; F < c ; F++ ) if ( f[F] ) { f[F] = 0 ;
                for ( G = SX ; G < c ; G++ ) if ( f[G] ) { f[G] = 0 ;
                  for ( H = SX ; H < c ; H++ ) if ( f[H] ) { f[H] = 0 ;
                    for ( I = SX ; I < c ; I++ ) if ( f[I] ) { f[I] = 0 ;
                      result = 0 ;
                      if ( m1 ) {
                        M = E ;
                        L = ( ( ( ( A * c ) + B ) * c + C ) * c + D ) * M ;
                        R =   ( ( ( F * c ) + G ) * c + H ) * c + I       ;
                        result = ( L == R ) ;
                      }
                      if ( m2 ) {
                        L1 = ( ( A * c ) + B ) * C ;
                        R1 =   ( D * c ) + E ;
                        L2 = R1 + ( ( F * c ) + G ) ;
                        R2 =        ( H * c ) + I ;
                        result = ( ( L1 == R1 ) && ( L2 == R2 ) ) ;
                      }
                      if ( result ) {
                        printf (
                          "c=%3ld : %2ld,%2ld,%2ld,%2ld,%2ld,%2ld,%2ld,%2ld,%2ld\n"
                          ,c,A,B,C,D,E,F,G,H,I
                        ) ;
                      } ; f[I] = 1 ;
                    } ; f[H] = 1 ;
                  } ; f[G] = 1 ;
                } ; f[F] = 1 ;
              } ; f[E] = 1 ;
            } ; f[D] = 1 ;
          } ; f[C] = 1 ;
        } ; f[B] = 1 ;
      } ; f[A] = 1 ;
    } /* for A = ... */
  } /* c : cardinalnumber */
  return 0 ;
}

LET ts = TIME
FOR A=1 TO 9
   FOR B=1 TO 9
      IF NOT B=A THEN
         FOR C=1 TO 9
            IF NOT C=A AND NOT C=B THEN
               FOR D=1 TO 9
                  IF NOT D=A AND NOT D=B AND NOT D=C THEN
                     FOR E=1 TO 9
                        IF NOT E=A AND NOT E=B AND NOT E=C AND NOT E=D THEN
                           FOR F=1 TO 9
                              IF NOT F=A AND NOT F=B AND NOT F=C AND NOT F=D AND NOT F=E THEN
                                 FOR G=1 TO 9
                                    IF NOT G=A AND NOT G=B AND NOT G=C AND NOT G=D AND NOT G=E AND NOT G=F THEN
                                       FOR H=1 TO 9
                                          IF NOT H=A AND NOT H=B AND NOT H=C AND NOT H=D AND NOT H=E AND NOT H=F AND NOT H=G THEN
                                               FOR I=1 TO 9
                                                IF NOT I=A AND NOT I=B AND NOT I=C AND NOT I=D AND NOT I=E AND NOT I=F AND NOT I=G AND NOT I=H THEN
                                                   IF (A*1000+B*100+C*10+D)*E = F*1000+G*100+H*10+I THEN
                                                      PRINT
                                                      PRINT " "; A; B; C; D
                                                      PRINT "X         "; E
                                                      PRINT "-------------"
                                                      PRINT " "; F; G; H; I
                                                   END IF
                                                END IF
                                             NEXT I
                                          END IF
                                       NEXT H
                                    END IF
                                 NEXT G
                              END IF
                           NEXT F
                        END IF
                     NEXT E
                  END IF
               NEXT D
            END IF
         NEXT C
      END IF
   NEXT B
NEXT A
LET te = TIME
PRINT CHR$(13)&CHR$(10)&"ELAPSED TIME: "; te - ts; "sec"
END