I think it's a problem with the title of my topic ... since me I am not intelligent enough to solve this !
I try another way :
Code:
@ Device PIC12F675,INTRC_OSC_NOCLKOUT, WDT_OFF,PWRT_ON,PROTECT_OFF,MCLR_OFF,BOD_OFF

CLEAR
DEFINE OSC 4
ANSEL=0       
CMCON=7
TRISIO=%00100000

maneta      var GPIO.5
LED         var GPIO.2         ' set GPIO.0 port as OUTPUT (LED)
wipp_time   var word           ' number of seconds while LED=off
nr          var word

nr = 0

Main:
IF maneta = 1 then
nr = nr + 1
    if nr= 1 then
       gosub memo
         else
       gosub wipper
    endif
ENDIF    
Goto Main

memo:
    while maneta = 1
    low led
      	wipp_time = wipp_time + 1    ' counting in 100 ms steps                
    pause 100
    wend
nr = 1 
return

Wipper:
    while maneta = 1 
        high led
        pause 1000
        low led 
        pause wipp_time * 100
    wend 
nr = 0
wipp_time = 0    
Return
Without results ! Variable "nr" seems to NOT increase ...I push "maneta", then go to memo, I push again, then go to wipper, I push again, then go to wipper again ?!?