From http://www.myke.com/basic.htm
This is a practical application of conditional
replacement. I think this subroutine demonstrates how the code works
quite well.
ToUpper:
addlw 255 - 'z' ; Get the High limit
addlw 'z' - 'a' + 1 ; Add Lower Limit to Set Carry
btfss STATUS, C ; If Carry Set, then Lower Case
addlw h'20' ; Carry NOT Set, Restore Character
addlw 'A' ; Add 'A' to restore the Character
return
See:
Questions:
Comments: