write-port ( value port cpu -- )

Vocabulary

cpu.8080.emulator

Inputs

value	an object
port	an object
cpu	an object

Outputs

None

Definition

IN: cpu.8080.emulator

GENERIC: write-port ( value port cpu -- )

Methods

USING: cpu.8080.emulator kernel ;

M: cpu write-port 3drop ;


USING: combinators cpu.8080.emulator kernel roms.space-invaders
;

M: space-invaders write-port
    swap {
        { 2 [ write-port2 ] }
        { 3 [ write-port3 ] }
        { 4 [ write-port4 ] }
        { 5 [ write-port5 ] }
        [ 3drop ]
    } case ;