.nolist
    #include    "ti83plus.inc"
.list
.org    $9D93
.db    t2ByteTok, tAsmCmp
 LD A,(IY + AppLwrCaseFlag)
 XOR %00001000
 LD (IY + AppLwrCaseFlag),A
 RET
.end
.end