Permanent sleep

[Russ Kincaid]

This is my first PIC project. I am using PBC with a 16F627A. Sleep is defined for periods from 1 to 65535, but what happens if I use SLEEP 0? I want the PIC to go into low power mode until power is cycled off and on. If I let the program go to END, is that equivalent to sleep?

[mister_e]

no, and it will be in low current consumption.

BTW, who'll know that if you set the SLEEP to it's maximum and do a loop... few usec in hours in not low consumption...

GoodNight:
    SLEEP 65535
    goto GoodNight

[Melanie]

Permanent Sleep eh?.... Well apart from a Sledge Hammer... try...

@ SLEEP

The PIC will sleep PERMANENTLY until woken by an interrupt event... this does not mean you have to embed Assembler interrupts or the like, execution of the program 'should' continue from the next instruction when the PIC is woken from it's slumber.

For example this snippet of code shows (for a 16F628) what Registers you need to set in order to trigger a wake event...

	'
	'	PIC Low-Power Sleep Routine
	'	---------------------------
		'
		'	Set Sleep Interrupts
		'	--------------------
	INTCON=%00011000	' Interrupt Control Register
				'    7=0 - GIE  - Global Interrupt Enable
				'    6=0 - PEIE - Peripheral Interrupt Enable
				'    5=0 - TOIE - TMR0 Overflow Interrupt Enable
                                '    4=1 - INTE - RB0/INT Enable
				'    3=1 - RBIE - PORTB change interrupt Enable
				'    2=0 - TOIF - TMR0 Overflow Flag
				'    1-0 - INTF - RB0/Ext Interrupt Flag
				'    0=0 - RBIF - PORTB Interrupt Flag
	OPTION_REG.6=1		' 1=RB0 Rising-Edge Trigger, 0=Falling-Edge Trigger
		'
		'	Reset Interrupt Flags
		'	---------------------
	INTCON.1=0		' Reset RB0 Flag
	INTCON.0=0		' Reset PORTB change Flag
		'
		'	Sleep
		'	-----
	@ SLEEP
	Pause 100		' Needed for system Wake-Up

You can see that I'm setting a wake-up call using either RB0 or PortB inputs. The Pause can be omitted, but works for me, so that the PIC can have a stretch, yawn, light-up a cigarette etc...

[charudatt]

Hello Mel,

I am trying to get this sleep comand to work and it simply does not work.

my code:
@ DEVICE PIC16F628A, INTRC_OSC_NOCLKOUT, WDT_OFF, LVP_OFF, PWRT_OFF, PROTECT_OFF, BOD_OFF
CMCON=7
VRCON=%01101100 'VRCON bit7 is OFF for no current drain
OPTION_REG.7 = 0 ' ENABLE INTERNAL PULLUPS
Trisa = %01111111
Trisb = %11111111
LED VAR PORTA.7

'
' PIC Low-Power Sleep Routine
' ---------------------------
'
' Set Sleep Interrupts
' --------------------
INTCON=%00011000 ' Interrupt Control Register
' 7=0 - GIE - Global Interrupt Enable
' 6=0 - PEIE - Peripheral Interrupt Enable
' 5=0 - TOIE - TMR0 Overflow Interrupt Enable
' 4=1 - INTE - RB0/INT Enable
' 3=1 - RBIE - PORTB change interrupt Enable
' 2=0 - TOIF - TMR0 Overflow Flag
' 1-0 - INTF - RB0/Ext Interrupt Flag
' 0=0 - RBIF - PORTB Interrupt Flag
OPTION_REG.6=1 ' 1=RB0 Rising-Edge Trigger, 0=Falling-Edge Trigger

CYCLE:
'
' Reset Interrupt Flags
' ---------------------
INTCON.1=0 ' Reset RB0 Flag
INTCON.0=0 ' Reset PORTB change Flag
'
' Sleep
' -----
LOW LED
@ SLEEP
@ nop
@ nop
@ nop
@ nop

Pause 100 ' Needed for system Wake-Up
HIGH LED : PAUSE 200 : LOW LED
GOTO CYCLE

Maybe I could be missing some thing. The LED just keeps blinking.

Basically I am trying to incorporate this in a garage code lock project.

any help ?

[Acetronics2]

' Set Sleep Interrupts
' --------------------
INTCON=%00011000 ' Interrupt Control Register
' 7=0 - GIE - Global Interrupt Enable
' 6=0 - PEIE - Peripheral Interrupt Enable
' 5=0 - TOIE - TMR0 Overflow Interrupt Enable
' 4=1 - INTE - RB0/INT Enable
' 3=1 - RBIE - PORTB change interrupt Enable
' 2=0 - TOIF - TMR0 Overflow Flag
' 1-0 - INTF - RB0/Ext Interrupt Flag
' 0=0 - RBIF - PORTB Interrupt Flag
OPTION_REG.6=1 ' 1=RB0 Rising-Edge Trigger, 0=Falling-Edge Trigger

?

Hi, Charudatt

May be you could simply enable the interrupts before sleeping ... might work better.

Yess GIE = 1 ... ( INTCON.7 = 1 )



oh, oh ... you are still asleep ???

Alain

[Melanie]

You are obviously being woken from Sleep, so find out what is causing it...

...and ground all the INPUT pins on PortB in case one is floating.

[Acetronics2]

Heuuu

No GIE = No Sleep ( RTFDatasheet ... $ 14.8.1 - Greyed Note ), so we set GIE Bit

Then ... Executes the 1St NOP

Then ... Branches to location 0004 ...

But there is a supposed Interrupt stubb here instead of falling into the "program" ...

a single " DEFINE INTHAND INIT " without any interrupt stubb ( LOL ! ) would push the libs away from the 4 first program locations ... and allow restarting the PIC as a first power up ...

We could also Branch to the "Pause 100" ... to have some visual effect before re-entering sleep ... ( wich is better ...I think)

Sooo ...

we add :

DEFINE INTHAND _BLINK ' near top of program

and

BLINK:

Before

Pause 100 ' Needed for system Wake-Up
HIGH LED : PAUSE 200 : LOW LED
GOTO CYCLE




I am right, Mel ???

Alain

PS: We are aboard PBC list ... what about interrupts in PBC ???

[T.Jackson]

"Super Acetronics" - I think he might be right. He should change his name to Supertronics

[Acetronics2]

Hehe, Trend ...

You did not know about the Underscored Inthand name ... I presume.

Permits LOTS of good things, especially if context must not be saved ( what is lots of encountered situations ...).

Also REALLY Instant Basic Pseudo-Interrupts !!! ( The return adress MUST be explicitly given )

Alain

[Ron Marcus]

Heuuu

No GIE = No Sleep ( RTFDatasheet ... $ 14.8.1 - Greyed Note ), so we set GIE Bit

Then ... Executes the 1St NOP

Then ... Branches to location 0004 ...

But there is a supposed Interrupt stubb here instead of falling into the "program" ...

a single " DEFINE INTHAND INIT " without any interrupt stubb ( LOL ! ) would push the libs away from the 4 first program locations ... and allow restarting the PIC as a first power up ...

We could also Branch to the "Pause 100" ... to have some visual effect before re-entering sleep ... ( wich is better ...I think)

Sooo ...

we add :

DEFINE INTHAND _BLINK ' near top of program

and

BLINK:

Before

Pause 100 ' Needed for system Wake-Up
HIGH LED : PAUSE 200 : LOW LED
GOTO CYCLE




I am right, Mel ???

Alain

I am using the '690. In that FM, the processor will still wake from sleep if the flag is set without the GIE set. With the GIE set you have to service the interrupt. Without, it starts up right after the sleep command.

Ron

[Acetronics2]

Hi Ron,

You're perfectly right with the '690 ... but, care ... GIE settings do not have the same effects for the '628 ... and GIE *must* be set to enter sleep ( sleep ignored if GIE = 0 ) .

Alain

[charudatt]

Hello Ron and Other,

I did not understand the Int_handler part. You mean to say , declare a Int_handler without a lable and make the pic reset.

Well setting GIE made it to go to sleep (LED not blinking but current 6mA) but did not come out of it.

any further help?

regards

[Ron Marcus]

Hi Ron,

You're perfectly right with the '690 ... but, care ... GIE settings do not have the same effects for the '628 ... and GIE *must* be set to enter sleep ( sleep ignored if GIE = 0 ) .

Alain

I did check the '628 book and you are correct sir! I reread it twice to catch it.
Ron

[savnik]

Hello Mel,

I am trying to get this sleep comand to work and it simply does not work.

my code:
@ DEVICE PIC16F628A, INTRC_OSC_NOCLKOUT, WDT_OFF, LVP_OFF, PWRT_OFF, PROTECT_OFF, BOD_OFF
CMCON=7
VRCON=%01101100 'VRCON bit7 is OFF for no current drain
OPTION_REG.7 = 0 ' ENABLE INTERNAL PULLUPS
Trisa = %01111111
Trisb = %11111111
LED VAR PORTA.7

'
' PIC Low-Power Sleep Routine
' ---------------------------
'
' Set Sleep Interrupts
' --------------------
INTCON=%00011000 ' Interrupt Control Register
' 7=0 - GIE - Global Interrupt Enable
' 6=0 - PEIE - Peripheral Interrupt Enable
' 5=0 - TOIE - TMR0 Overflow Interrupt Enable
' 4=1 - INTE - RB0/INT Enable
' 3=1 - RBIE - PORTB change interrupt Enable
' 2=0 - TOIF - TMR0 Overflow Flag
' 1-0 - INTF - RB0/Ext Interrupt Flag
' 0=0 - RBIF - PORTB Interrupt Flag
OPTION_REG.6=1 ' 1=RB0 Rising-Edge Trigger, 0=Falling-Edge Trigger

CYCLE:
'
' Reset Interrupt Flags
' ---------------------
INTCON.1=0 ' Reset RB0 Flag
INTCON.0=0 ' Reset PORTB change Flag
'
' Sleep
' -----
LOW LED
@ SLEEP
@ nop
@ nop
@ nop
@ nop

Pause 100 ' Needed for system Wake-Up
HIGH LED : PAUSE 200 : LOW LED
GOTO CYCLE

Maybe I could be missing some thing. The LED just keeps blinking.

Basically I am trying to incorporate this in a garage code lock project.

any help ?

Change the
OPTION_REG.7 = 0 ' ENABLE INTERNAL PULLUPS
to
OPTION_REG.7 = 1 ' DISABLE INTERNAL PULLUPS

[Acetronics2]

Hi, Charudatt

Do not worry !!! This is certainly one of the least documented feature of PBP ...

DEFINE INTHAND _INTER ...

1) keeps prog mem locations 2 and 3 free ...

2) places a GOTO _INTER at location 4 ... or a bit further if more than 1 program page ...and COULD need context saving.
_INTER ( Note the Leading Underscore ) is the PBP "INTER:" Label readable by Assembler ...

Consider it as a "classical" GOTO ... but you reach it when an "interrupt reason" occurs ... no latency then.

INIT (Without Underscore !!! ) is the first ASSEMBLER line your Program really executes at power ON ...

So, as is ... you can i.e. restart your PIC, ... without using MCLR - if not disposable !!!
... or goto the label you want !!!

Alain

[Ron Marcus]

Allain,
I was right. Clearing GIE does work as it does on the '690. It will wake and continue without needing an interrupt handler.

Ron

[mister_e]

<table><td>Vermont : 1
France : 0</td><td></td></table>

[Acetronics2]

Allain,
I was right. Clearing GIE does work as it does on the '690. It will wake and continue without needing an interrupt handler.

Ron

What about ENTERING sleep ??? 628A datasheet clearly says IF GIE = 0 , the SLEEP command is treated as a NOP ...

I'm a bit confused here ... or I do not have the latest datasheet !!!

Alain

[Ron Marcus]

The little window says if GIE is 0 and both the flag bit and enable bit are set, it will treat the sleep command as a nop. If the flag bit is cleared, it will sleep. It IS confusingly written!

[charudatt]

ALAIN,

It still does not work,

"DEFINE INTHAND INIT" , maybe puts it to sleep and never comes out.
and "DEFINE INTHAND _BLINK" keeps the led blinking.

regards

[Acetronics2]

Hi, RON

Ok, Thanks for the explanation ...

It really might be written instead of BUT ... : AND any interrupt ... !!!

So, appears no real need to set the GIE bit here ...


Back to Charudatt's program ...


mighn't there be a PORTB reading ... ( to end the "mismatch condition" ) ???.

Alain

Charudatt :

1) DEFINE ...INIT ... the result is quite normal !!! Pic wakes up to fall asleep ...

2) if the led keeps blinking means ... the program always stay in the interrupt stubb !!! We've traced it now.

in this case ... interrupt flags are not cleared ... : good reason, no ?

[Acetronics2]

Hi, Charudatt

Straight from my test bench :


@ __CONFIG _INTOSC_OSC_NOCLKOUT & _WDT_OFF & _LVP_OFF & _PWRTE_OFF & _CP_OFF & _BODEN_OFF

DEFINE NO_CLRWDT 1
DEFINE LCD_EBIT 1

CMCON=7
VRCON=%01101100 'VRCON bit7 is OFF for no current drain
OPTION_REG.7 = 1 ' DISABLE INTERNAL PULLUPS
Porta = 0
PORTB = 0
Trisa = %11111111
Trisb = %01111111

LED VAR PORTB.5
SleepLed var PORTB.7
Dummy var byte

'
' PIC Low-Power Sleep Routine
' ---------------------------
'
' Set Sleep Interrupts
' --------------------
INTCON=%00010000 ' Interrupt Control Register
' 7=0 - GIE - Global Interrupt Enable
' 6=0 - PEIE - Peripheral Interrupt Enable
' 5=0 - TOIE - TMR0 Overflow Interrupt Enable
' 4=1 - INTE - RB0/INT Enable
' 3=0 - RBIE - PORTB change interrupt Enable
' 2=0 - TOIF - TMR0 Overflow Flag
' 1-0 - INTF - RB0/Ext Interrupt Flag
' 0=0 - RBIF - PORTB Interrupt Flag
OPTION_REG.6=1 ' 1=RB0 Rising-Edge Trigger, 0=Falling-Edge Trigger

PAUSE 500
LCDOUT $FE,1
CYCLE:
'
' Reset Interrupt Flags
' ---------------------
INTCON.1=0 ' Reset RB0 Flag
INTCON.0=0 ' Reset PORTB change Flag
'
' Sleep
' -----
LOW LED


LCDOUT $FE,2 , "*** SLEEPING ***"
High Sleepled

@ SLEEP

Dummy = PORTB
LOW SleepLed
@ nop
@ nop
@ nop

Pause 100 ' Needed for system Wake-Up
HIGH LED : PAUSE 200

LCDOUT $FE,1, " HURRY UP "

PAUSE 5000
LOW LED

GOTO CYCLE

END

CONFIG Modified to suit MPLAB Requirements ...

I used a LCD to show what happening and fixed LEDs for Wake (green) /Sleep ( Red ) states ...

disabled CLRWDT PbP insertions ... ( a passing idea ??? )

also disabled the WPU ... but that is not problematic.

also changed LEDs PORTs ...

As PORTB was used ... I did not try "Interrupt change on PortB" ... but works great with B.0 interrupt.

Works fine ... as you intended to program it !!!

Regards

Alain

[charudatt]

I'll give it a shot tomorrow and post my feedback.

regards

p.s. Today after the failed experiments, i am planning the same thing on 16F73. Lets hope it works. I shall post my feedback on both tomorrow.

[Acetronics2]

Hi, Charudatt



@ __CONFIG _INTOSC_OSC_NOCLKOUT & _WDT_OFF & _LVP_OFF & _PWRTE_OFF & _CP_OFF & _BODEN_OFF

DEFINE NO_CLRWDT 1

CMCON=7
VRCON=%01101100 'VRCON bit7 is OFF for no current drain
OPTION_REG.7 = 0 ' ENABLE INTERNAL PULLUPS
Porta = 0
PORTB = %11110001
Trisa = %11110011
Trisb = %01111111

LED VAR PORTA.2
SleepLed var PORTA.3
Dummy var byte

'
' PIC Low-Power Sleep Routine
' ---------------------------
'
' Set Sleep Interrupts
' --------------------
INTCON=%00011000 ' Interrupt Control Register
' 7=0 - GIE - Global Interrupt Enable
' 6=0 - PEIE - Peripheral Interrupt Enable
' 5=0 - TOIE - TMR0 Overflow Interrupt Enable
' 4=1 - INTE - RB0/INT Enable
' 3=1 - RBIE - PORTB change interrupt Enable
' 2=0 - TOIF - TMR0 Overflow Flag
' 1-0 - INTF - RB0/Ext Interrupt Flag
' 0=0 - RBIF - PORTB Interrupt Flag

OPTION_REG.6=0 ' 1=RB0 Rising-Edge Trigger, 0=Falling-Edge Trigger

CYCLE:
'
' Reset Interrupt Flags
' ---------------------
INTCON.1=0 ' Reset RB0 Flag
INTCON.0=0 ' Reset PORTB change Flag
'
' Sleep
' -----
LOW LED

High Sleepled

@ SLEEP
@ nop

Dummy = PORTB
LOW SleepLed
@ nop
@ nop
@ nop

Pause 100 ' Needed for system Wake-Up

HIGH LED

While ( PORTB >> 4 ) <> %00001111 ' Wait Key release
Wend ' AND a PORTB Reading ...!!!

PAUSE 200

PAUSE 5000
LOW LED

GOTO CYCLE

END


Here it is with PORTB interrupts ... ( Note I modified all inputs to be active LOW ...)

I think the origin of the problem is you forgot to read PORTB for the end of the mismatch condition ... wich Also locks the flag cancelling ( a RTFDatasheet for me ... )

Heuuuuu, CHILLED, the beer, please !!!

Alain

PS : The interrupt way also works well ... if you're intersted in, I'll post it.

[Melanie]

The original program example I posted way back during another life is valid for the non-A version of the 16F62X. In the non-A version you get a wake from sleep regardless of the state of the GIE bit. However, the operation of the GIE bit differs in the A version in that respect and Alain is correct. It teaches us all a lesson here that some of the changes between PIC versions are seriously subtle! So it's read the Datasheet - thoroughly!

[mackrackit]

So it's read the Datasheet - thoroughly!

Not another RTFD?!?!

[charudatt]

Alain

PS : The interrupt way also works well ... if you're intersted in, I'll post it.[/QUOTE]

Thank you very much, I am just dying to test it out.

Yes Chilled beer for sure.

Post the Interrupt way code, if you can, Thank you once again.

regards

[Ron Marcus]

Hey Mel,
I read the data sheet on the A version. It says on page 111 that the PIC will wake from sleep if both the flag and interrupt bits are set. Will it not wake from sleep if the flag bit is set after initiating sleep? I don't see where it discusses this.

Ron

[Melanie]

I'm talking about the GIE bit here. In the A version, if GIE is not set, the SLEEP (the Assembler instruction) is treated as a NOP and the PIC never enters SLEEP. This didn't work that way in the non-A version. I've a (fortunately) obsolete product that used that feature... otherwise I'd be scratching my head trying to figure why the product didn't work as expected!

[Acetronics2]

Hi, Charudatt

Here it is :





@ __CONFIG _INTOSC_OSC_NOCLKOUT & _WDT_OFF & _LVP_OFF & _PWRTE_OFF & _CP_OFF & _BODEN_OFF

DEFINE NO_CLRWDT 1
DEFINE INTHAND _Blink


CMCON=7
VRCON=%01101100 'VRCON bit7 is OFF for no current drain
OPTION_REG.7 = 0 ' ENABLE INTERNAL PULLUPS
Porta = 0
PORTB = %11110001
Trisa = %11110011
Trisb = %11111111

LED VAR PORTA.2
SleepLed var PORTA.3
Dummy var byte

'
' PIC Low-Power Sleep Routine
' ---------------------------
'
' Set Sleep Interrupts
' --------------------
INTCON=%10011000 ' Interrupt Control Register
' 7=0 - GIE - Global Interrupt Enable
' 6=0 - PEIE - Peripheral Interrupt Enable
' 5=0 - TOIE - TMR0 Overflow Interrupt Enable
' 4=1 - INTE - RB0/INT Enable
' 3=1 - RBIE - PORTB change interrupt Enable
' 2=0 - TOIF - TMR0 Overflow Flag
' 1-0 - INTF - RB0/Ext Interrupt Flag
' 0=0 - RBIF - PORTB Interrupt Flag

OPTION_REG.6 = 0 ' 1=RB0 Rising-Edge Trigger, 0=Falling-Edge Trigger

CYCLE:
'
' Reset Interrupt Flags
' ---------------------

INTCON.1 = 0 ' Reset RB0 Flag
INTCON.0 = 0 ' Reset PORTB change Flag
INTCON.7 = 1
'
' Sleep
' -----
LOW LED

High Sleepled

@ SLEEP
@ nop

Blink:

Dummy = PORTB
Pause 100 ' Needed for system Wake-Up

LOW SleepLed

HIGH LED

While ( PORTB >> 4 ) <> %00001111
Wend

PAUSE 200

PAUSE 5000
LOW LED

GOTO CYCLE

END



As you see it's not so different from the "non interrupted" way ...

But, IF I correctly understand Mel ( one more time, Mel : You're the one and Only ... !!! - no sexual meanings hidden ( LOL) ) , the interrupt way could fit both 628 and 628A ...

I must say I used a 16F628-04 batch N° 0145H9F for tests ( I do not have any 628A ... but will run a try with a brand new 648A.

********************************************
********************************************
A little "bug" in the "non interrupted" listing ... to correct:

TRISB must be % 11111111 ... instead of % 01111111

I was wondering why PortB.7 was inactive .... LOL !!!


Have fun, and read you soon

regards

Alain

[Acetronics2]

Those who really followed this thread have surely noticed there could have been other lines inserted between :

@ SLEEP
@ nop

AND ...

Blink:

didn't you ??? ....

Alain

[Pic_User]

Those who really followed this thread have surely noticed there could have been other lines inserted between :

@ SLEEP
@ nop

AND ...

Blink:

didn't you ??? ....

Alain

Hello Alain,

Do you mean:
@ SLEEP
@ nop
snore
Blink:
turn-over
@ SLEEP

Then again, sometimes I "just don’t quite get it"...
-Adam-

[mackrackit]

Gotta get new glasses.

@nap

Did not work

[mister_e]

<body onload="setInterval('blinkIt()',1000)">

<script type="text/javascript">
function blinkIt() {
if (!document.all) return;
else {
for(i=0;i<document.all.tags('blink').length;i++){
s=document.all.tags('blink')[i];
s.style.visibility=(s.style.visibility=='visible') ?'hidden':'visible';
}
}
}
</script>

<blink>@ NOP</blink>

@nap will just define a label
nap without the @, is a PBP function, and it's not the same as ASM

<blink>@ NOP</blink>

[charudatt]

A half hearted compile of your code (Alian) for the 16F873A gave an error with DEFINE INTHAND _Blink.

I changed it to DEFINE INTHAND Blink and it did not come out of sleep (I presume) the same code compiles OK for the 16F628A.

I am sorry , I was busy with some other job, but today I shall try your code for the intended chip and post results.

Thank you for all your help,

regards

[Acetronics2]

Hi, Charudatt

See chapter 9.3 ...

your device ( 16F873 ) has two mem. pages ... 16F628 only has ONE.

What does PbP for ASM Interrupts ???

What do you have to reserve as variables room ???


TWO beers now !!!

Cheers

Alain

[Acetronics2]

Hello Alain,

Do you mean:
@ SLEEP
@ nop
snore
Blink:
turn-over
@ SLEEP

Then again, sometimes I "just don’t quite get it"...
-Adam-

Hi, Adam

Snore never happens ... might be a LABEL to call before !!!

Alain

[T.Jackson]

<body onload="setInterval('blinkIt()',1000)">

<script type="text/javascript">
function blinkIt() {
if (!document.all) return;
else {
for(i=0;i<document.all.tags('blink').length;i++){
s=document.all.tags('blink')[i];
s.style.visibility=(s.style.visibility=='visible') ?'hidden':'visible';
}
}
}
</script>

<blink>@ NOP</blink>

@nap will just define a label
nap without the @, is a PBP function, and it's not the same as ASM

<blink>@ NOP</blink>

C'mon Mister_e, you can do better than that! - show us all some of your "real" java skills, like scrolling some 3D text with user definable parameters.

[mister_e]

euh... sorry i don't have any Java skills... i just copy/paste some script here and there.

[T.Jackson]

I'm about to start a Java unit soon - maybe I'll teach you a thing or two Out of interest, I've just found some good code for VB that allows serial comms without MSCOMM.ocx !!! http://www.thescarms.com/VBasic/commio.aspx No probs in XP either.