10 ; ›20 PRODL=$C0 ›25 PRODH=$C1 ›30 MPR=$C2 ›40 MPD=$C3 ›50 ; ›60 *=$0600 ›70 ; ›80 VALUES LDA #10 ›90  STA MPR ›100  LDA #10 ›110  STA MPD ›120 ;›130  LDA #0 ›140  STA PRODL ›150  LDX #8 ›160 LOOP LSR MPR ›170   BCC NOADD ›180   CLC ›190   ADC MPD ›200 NOADD ROR A›210  ROR PRODL ›220  DEX ›230  BNE LOOP ›235  STA PRODH ›240  RTS ›250  .END››