I c'ant switching hpwm between RB.0 AND RB.3 please can any one help me

pic is 16f88:


INCLUDE "modedefs.bas" ' Include serial modes


@ DEVICE MCLR_ON, HS_OSC, WDT_OFF, LVP_OFF, BOD_OFF, PWRT_ON, PROTECT_OFF ,CCPMX_ON

define OSC 20


OPTION_REG = $7f ' Enable PORTB pullups= %01111111
ANSEL = %10000001 ' 'Set PORTA.0 analog rest digital
ADCON1 = %10000000 'Right justify result
ADvalue VAR WORD
DutyCycle VAR WORD $22
Frequency VAR WORD
TRISA = %10000001
TRISB = %10000000
PORTB = 0


'LOW PORTB.0
'LOW PORTB.3 ; Set CCP1 pin to output low

Frequency = 50
DutyCycle = 50
PAUSE 500
loop:



if portb.7 = 0 then
goto left
else
goto right
endif
'=============================

left:

if portb.7 = 1 then right

LOW PORTB.3

@ DEVICE pic16F88, HS_OSC , CCPMX_ON
PAUSE 100 ' start-up delay
TRISB=0
DEFINE CCP1_REG PORTB
DEFINE CCP1_BIT 3


HPWM 1, DutyCycle, Frequency
GOTO left

'=============================
right:
if portb.7 = 0 then left

LOW PORTB.0
@ DEVICE pic16F88, HS_OSC , CCPMX_OFF

PAUSE 100 ' start-up delay
TRISB=0
DEFINE CCP1_REG PORTB
DEFINE CCP1_BIT 1

HPWM 1, DutyCycle, Frequency

GOTO right
'============================

goto loop


END