i see the problem
TRISA = %11110100 'Enable Pins A.0, A.1, A.3
PORTA = %00001001 'Turn on Pins A.0, A.3 (Led 2 and 9)
TRISA = %11110100 == bad
you can only light 1 led at a time , only two pins can be outputs at any one time (one high one low) the others need to be in a high impedence state [not high - high impedence ie input]

to simulate multiple lit leds the the charlieplex needs to be driven multiplex style
Code:
'****************************************************************
'*  Name    : charlieplex.pbp                                        *
'*  Author  : richard                                   *
'*  Notice  :                                *
'*          :                                *
'*  Date    :                                          *
'*  Version :    16f84A                                   *
'*  Notes   :       *
'*          :              *
'*            
'****************************************************************
#CONFIG
cfg = _XT_OSC
cfg&= _WDT_ON
cfg&= _PWRTE_OFF
cfg&= _CP_OFF
  __CONFIG cfg
#ENDCONFIG
 define osc 10
led var byte
tmp var byte

  
' tris port
'1 1100 0010    12,2
'2 1100 0001    12,1
'3 1001 0100    9,4 
'4 1001 0010    9,2
'5 0011 1000    3,8
'6 0011 0100    3,4
'7 1010 0100    10,4
'8 1010 0001    10,1
'9 0101 1000    5,8
'10 0101 0010    5,2
'11 0110 1000    6,6
'12 0110 0001    6,1
 
   
mainloop:
    
    for led=0 to 11
        lookup led,[12,12,9,9,3,3,10,10,5,5,6,6],tmp
        TRISA = $f0|tmp
        lookup led,[ 2, 1,4,2,8,4, 4, 1,8,2,6,1],tmp
        PORTA = tmp
        pause 200
    next 
    
;leds 2,9
   tmp=255
while tmp
    TRISC = $f0|12
    latC = 1
    pause 10
    TRISC = $f0|5
    latC = 8
    pause 10
    tmp=tmp-1
 wend
 
;leds 10,12 
    tmp=255
while tmp
    TRISC = $f0|5
    latC = 2
    pause 10
    TRISC = $f0|1
   latC = 1
    pause 10
    tmp=tmp-1
 wend
 
;leds 4,8
   tmp=255
while tmp
    TRISC = $f0|9
    latC = 2
    pause 10
    TRISC = $f0|10
    latC = 1
    pause 10
    tmp=tmp-1
 wend
 
;leds 7,11 
    tmp=255
while tmp
    TRISC = $f0|10
    latC = 4
    pause 10
    TRISC = $f0|6
    latC = 6
    pause 10
    tmp=tmp-1
 wend 
 
     
    
goto mainloop