Advertisement
Guest User

Untitled

a guest
Dec 2nd, 2016
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.94 KB | None | 0 0
  1. AREA ProperCase, CODE, READONLY
  2. IMPORT main
  3. EXPORT start
  4.  
  5. start
  6. LDR R1, =testStr ;
  7. LDRB R2, [R1] ; store first letter
  8. CMP R2, #'a' ; compare to lower case letter a to understand whether it is capital or lower case
  9. BLO endwhFirstLetter
  10. checkFirstLetter
  11. CMP R2, #'Z'
  12. BHI firstLetter
  13. B endwhFirstLetter
  14. firstLetter
  15. SUB R2, R2, #0x20;
  16. STRB R2, [R1] ;
  17. endwhFirstLetter
  18. ADD R1, R1, #1 ;
  19. LDRB R2, [R1] ;
  20. CMP R2, #0x0 ; compare for null char,
  21. BEQ endLoop ; if null reached end loop
  22. CMP R2, #' ' ;
  23. BEQ firstLetterAdd ;
  24. CMP R2, #'Z' ; to check if it is lowercase already
  25. BHI endwhFirstLetter
  26. CMP R2, #'a' ;
  27. BLO lowercaseLetter
  28. lowercaseLetter
  29. LDRB R2, [R1] ; store next letter
  30. ADD R2, R2, #0x20 ;
  31. STRB R2, [R1] ;
  32. B endwhFirstLetter
  33. firstLetterAdd
  34. ADD R1, R1, #1 ;
  35. LDRB R2, [R1] ;
  36. B checkFirstLetter
  37. endLoop
  38.  
  39. stop B stop
  40.  
  41. AREA TestData, DATA, READWRITE
  42.  
  43. testStr DCB "hello WORLD", 0
  44.  
  45. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement