Hacking the 'ok' prompt for a clock

[Whammo]

#335 for tod source

include tod
settod
$4c $ca0 c! ' ptod $ca1 !

Again, interpreter.asm

    ; 0 - keyboard, -1 evaluate, else file
    lda SOURCE_ID_LSB
    beq +
    rts
+   lda LATEST_LSB
    sec
    sbc HERE_LSB
    lda LATEST_MSB
    sbc HERE_MSB
    beq .on_data_underflow
    lda #'o'                  ; change to jmp ' ptod $ca0
    jsr PUTCHR
    lda #'k'
    jsr PUTCHR
    lda #$d
    jmp PUTCHR

[Whammo]

The source has changed since this was shared.
It is highly unlikely to run properly, and it is highly likely to have unpredictable results.