emulate-JP_C,nn ( cpu -- )

Vocabulary

cpu.8080

Inputs

cpu

an object

Outputs

None

Definition

USING: accessors cpu.8080.emulator kernel math ;

IN: cpu.8080

: emulate-JP_C,nn ( cpu -- )
    [ flag-c? ] 1check [
        [ next-word ] keep [ pc<< ] keep [ cycles>> ] 1check 5 +
        swap cycles<<
    ] [ [ pc>> 2 + ] keep pc<< ] if ;