clisp-sbcl, 159 bytes

Result

WA

Duration

2286ms

Code [DL]

(setq b())(setq e 1)(loop(setq c(read-char))(if(char= c #\T)(setq e 0))(setq b(or(char= c #\K)(and b(> e 0))))(princ(if(or(= e 0)b)#\a c))(setq e(mod(1+ e)51))

stdin

                  T                               
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
   K                                              

stdout

stderr

; in: SETQ B
;     (SETQ B NIL)
; 
; caught WARNING:
;   undefined variable: COMMON-LISP-USER::B
; 
; compilation unit finished
;   Undefined variable:
;     B
;   caught 1 WARNING condition
; in: SETQ E
;     (SETQ E 1)
; 
; caught WARNING:
;   undefined variable: COMMON-LISP-USER::E
; 
; compilation unit finished
;   Undefined variable:
;     E
;   caught 1 WARNING condition
Unhandled SB-C::INPUT-ERROR-IN-LOAD in thread #<SB-THREAD:THREAD "main thread" RUNNING
                                                 {10005205B3}>:
  READ error during LOAD:

    end of file on #<CONCATENATED-STREAM :STREAMS NIL {1002C3B1C3}>

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10005205B3}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<SB-C::INPUT-ERROR-IN-LOAD {1002CE62A3}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<SB-C::INPUT-ERROR-IN-LOAD {1002CE62A3}>)
2: (INVOKE-DEBUGGER #<SB-C::INPUT-ERROR-IN-LOAD {1002CE62A3}>)
3: (ERROR SB-C::INPUT-ERROR-IN-LOAD :STREAM #<CONCATENATED-STREAM :STREAMS NIL {1002C3B1C3}> :CONDITION #<END-OF-FILE {1002CE6273}>)
4: (SB-INT:LOAD-AS-SOURCE #<CONCATENATED-STREAM :STREAMS NIL {1002C3B1C3}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
5: ((FLET SB-FASL::THUNK :IN LOAD))
6: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<CLOSURE (FLET SB-FASL::THUNK :IN LOAD) {7F048D11F4FB}> #<CONCATENATED-STREAM :STREAMS NIL {1002C3B1C3}>)
7: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<CONCATENATED-STREAM :STREAMS NIL {1002C3B1C3}> NIL)
8: (LOAD #<CONCATENATED-STREAM :STREAMS NIL {1002C3B1C3}> :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
9: ((FLET ROSWELL::BODY :IN ROSWELL:SCRIPT) #<SB-SYS:FD-STREAM for "file /volume/CODE" {1002C37D53}>)
10: (ROSWELL:SCRIPT "/volume/CODE")
11: (ROSWELL:RUN ((:EVAL "(ros:quicklisp)") (:SCRIPT "/volume/CODE") (:QUIT NIL)))
12: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ROSWELL:RUN (QUOTE ((:EVAL "(ros:quicklisp)") (:SCRIPT "/volume/CODE") (:QUIT NIL)))) #<NULL-LEXENV>)
13: (EVAL (ROSWELL:RUN (QUOTE ((:EVAL "(ros:quicklisp)") (:SCRIPT "/volume/CODE") (:QUIT NIL)))))
14: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(progn #-ros.init(cl:load \"/usr/local/etc/roswell/init.lisp\"))") (:EVAL . "(ros:run '((:eval\"(ros:quicklisp)\")(:script \"/volume/CODE\")(:quit ())))")))
15: (SB-IMPL::TOPLEVEL-INIT)
16: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
17: ((FLET "WITHOUT-INTERRUPTS-BODY-7" :IN SAVE-LISP-AND-DIE))
18: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

unhandled condition in --disable-debugger mode, quitting

strace