12F683 Logic Output Problem?

[shockwave]

I wrote some program but it is not working completely: It is for mosfet motor controller, HPWM section works (in TEKYON subroutine) But I can't take high logics from GPIO.0 and GPIO.5 I added program. Are there any problem?:/ I tried with 4 12F683 but all have same problem.:/

@ device pic12f683, fcmen_off, ieso_off, intrc_osc, wdt_off@ device pic12f683, pwrt_off, mclr_off, protect_off 


ADCON0.7 = 1      ' Right justify result
ANSEL = 111000 ' Set AN3 analog, rest digital
CMCON0 = 7        ' Analog comparators off  
INTCON = 000000 
OSCCON = 100000 ' Internal 4MHz osc
WPU = 0 ' Internal pull-ups = off
trisio=10000 
DEFINE OSC 4




output gpio.0
output gpio.5


'Define ADCIN parameters
Define ADC_BITS 8 ' Set number of bits in result
Define ADC_CLOCK 3 ' Set clock source (3=rc)
Define ADC_SAMPLEUS 50 ' Set sampling time in uS
Define CCP1_REG GPIO 'PWM Output on gpio
Define CCP1_BIT 2 'Bit 2
Posit var Word
Speed var byte
x var byte




Tekyon:
ADCIN 3, Posit 
HPWM 1,posit,12000
high GPIO.0
low GPIO.5
Goto Tekyon 


'*****************