The greatest and worst method evARR!!!

class String
    def random_caps
        letters = self.split("")
        letters.length.times do |n|
            letters[n] = letters[n].upcase if rand(4) == 0
        end
        letters.join("")
    end
end

created after total boredom.

discuss uses, etc.


;RANDOM_CAPS
;THIS ROUTINE REQUIRES 2 2-BYTE POINTERS IN ZERO PAGE
; IDENTIFYING WHERE THE INPUT AND OUTPUT STRINGS ARE
;SELECT APPROPRIATE LOCATIONS FOR YOUR SYSTEM
;THE FOLLOWING WORKS ON COMMODORE 64 ARCHITECTURE
INPUT  EQU 251
OUTPUT EQU 253
;STRINGS MUST BE TERMINATED WITH A ZERO BYTE AND BE LESS
; THAN 255 CHARACTERS IN LENGTH
;THIS ROUTINE ALSO REQUIRES ANOTHER ROUTINE NAMED 'RANDOM'
; THAT PRODUCES A RANDOM OR PSEUDORANDOM NUMBER IN .A
; YOU HAVE TO WRITE THAT ONE YOUR DAMN SELF
RNDCAP LDY #0 ;START AT 0
LOOP   LDA (INPUT),Y ;GET A CHAR
       BEQ DONE ;IF ZERO, STOP
       TAX ;SAVE IN X
       JSR RANDOM ;GET RANDOM
       CMP 64 ;64 FOR 1 IN 4 CHANCE
       BCS SKIP ;IF MORE THAN 64 SKIP IT
       TXA ;GET BACK A
       AND #%11011111 ;TURN OFF BIT 6, MAEK IT CAPITAL
       JMP CONT ;NXT PLZ
SKIP   TXA
       STA (OUTPUT),Y ;STORE THE SHIT
CONT   INY ;SO, NXT PLZ
       BEQ DONE; BUT IF .Y = 0 IT FLIPPED OVER, QUIT
       JMP LOOP; LOOP
DONE   RTS
;STUB ROUTINE, MAKE YOUR OWN
RANDOM LDA #255
       RTS