Pic18f67k22 WDT

[eyalbiton]

Hello

Is it pbp use one of the timer to monitor WATCHDOG TIMER ?
in my program i use timer0, timer1, timer3.

i write test loop to runout the MCU (confirmed all the i/o get "crazy"), but the WDT not restart the MCU.

reset config setting:
CONFIG PWRTEN = ON ;Power-up Timer
CONFIG BOREN = SBORDIS ; Brown-out Reset Enabled in hardware, SBOREN disabled
CONFIG BORPWR = HIGH ;BOR MV set to high power level
CONFIG BORV = 2; 3 ; Brown-out Reset 0=3v, 1=2.7v, 2=2v, 3=1.8v
CONFIG WDTEN = SWDTDIS ;WDT enabled in hardware; SWDTEN bit disabled
CONFIG WDTPS = 64;512 ;WDT (i try many options from 1 to 1024)
CONFIG STVREN = ON ;Stack Full/Underflow Reset

i need some help please.

:)

[richard]

Is it pbp use one of the timer to monitor WATCHDOG TIMER ?

no.



i write test loop to runout the MCU (confirmed all the i/o get "crazy"), but the WDT not restart the MCU.

means very little to anyone.

post a minimal complete and compliable version of your program that demonstrates your issue with the WDT [in code tags]

[eyalbiton]

Hi


In this loop i load receiving scan resolute list from wifi module, and load only the ssid name and rssi to message array.
The loop do the job perfect, but in the beginning i did mistake with "if CHECK=>AX1 THEN GOTO break33 'END OF LIST"
So the MCU become "MAD" ,turn-on the buzzer , and few output i have on my pcb and even send "nul" at uart Tx and stay at loop forever.
It made me wonder, why the WDT didn't reset.

Here is the loop.

RE var byte[998]
Message var byte[998]
;AX1 is total receiving bytes.
;CHECK is the start point



'******************************
SearchSymbol: 'search "," Symbol
'*** Must set T4 before send to this loop
T1=0
FOR A3 = CHECK TO AX1'
IF RE[A3]=Symb THEN T1=T1+1
IF T1=T4 THEN break9
NEXT A3
break9:
CHECK=A3
return


'*********************************************
'*** load all +SCAN SSID,RSSI list to Message array ***
'*********************************************
GET_SSID_list:
MessageL=0
T4=2 'multiple of the symbol x time "space"

GET_SSID_list1:
Symb=" " '"Space"
GOSUB SearchSymbol 'Search THE SYMBOLE
if CHECK=>AX1 THEN GOTO break33 'END OF LIST


CHECK=CHECK+1 'to jump on the "space"
if RE[CHECK]="," THEN 'If hidden wifi move to next line
T4=1 'multiple of the symbol
goto GET_SSID_list1
endif

FOR A3 = CHECK TO AX1 'Get SSID name
if RE[A3]="," then break31
Message[MessageL]=RE[A3]
MessageL=MessageL+1
next A3
break31:
T4=2 'multiple of symbol, JUMP on channel
Symb=","
gosub SearchSymbol


CHECK=A3+1 'jump on ","
Message[MessageL]="," 'insert "," Between ssid to rssi (ssid,rssi)
MessageL=MessageL+1
FOR A3 = CHECK TO AX1 'Get RSSI
if RE[A3]=$D then break32 'CR
Message[MessageL]=RE[A3]
MessageL=MessageL+1
NEXT A3
break32:
CHECK=A3
if CHECK=>AX1 THEN GOTO break33 'END OF LIST


Message[MessageL]=$A 'insert LF
MessageL=MessageL+1
T4=1 'multiple of the symbol
GOTO GET_SSID_list1 'Next line
break33:
RETURN

:)

[richard]

i see a code snippet that cannot be compiled.
a code snippet not in code tags.
a code snippet that does not demonstrate in any way how you have configured the wdt
a code snippet that does not demonstrate how you have employed any clrwdt instructions to
achieve a reset when needed

a minimal, complete and verifiable example MCVE is the best way to get help
https://stackoverflow.com/help/minimal-reproducible-example

[eyalbiton]

Hello Richard

Apologies, I have attached a file for review.



'************************************************* ***************
'* Name : UNTITLED.BAS *
'* Author : [select VIEW...EDITOR OPTIONS] *
'* Notice : Copyright (c) 2024 [select VIEW...EDITOR OPTIONS] *
'* : All Rights Reserved *
'* Date : 11/16/2024 *
'* Version : 1.0 *
'* Notes : *
'* : *
'************************************************* ***************
#config
CONFIG RETEN=OFF
CONFIG XINST = OFF ;Extended Instruction Set
CONFIG FOSC = INTIO2 ;internal RC oscillator
;CONFIG FOSC = EC3 ; HS oscillator (high power > 16 MHz)
CONFIG SOSCSEL=DIG
;CONFIG SOSCSEL=HIGH
CONFIG FCMEN = OFF ;Fail-Safe Clock Monitor ****
CONFIG IESO = OFF ;Two-Speed Start-up is disabled
CONFIG PLLCFG = OFF ;4x xtal PLL


CONFIG PWRTEN = ON ;Power-up Timer
CONFIG BOREN = SBORDIS ; Brown-out Reset Enabled in hardware, SBOREN disabled
CONFIG BORPWR = HIGH ;BOR MV set to high power level
CONFIG BORV = 2 ; Brown-out Reset 0=3v, 1=2.7v, 2=2v, 3=1.8v

CONFIG WDTEN = SWDTDIS ;ON ;OFF ;WDT enabled in hardware; SWDTEN bit disabled
CONFIG WDTPS = 64;512 ;WDT

CONFIG RTCOSC = INTOSCREF ; RTCC uses INTRC
;CONFIG ECCPMX = PORTH ; Enhanced CCP1/3 [P1B/P1C/P3B/P3C] muxed with RH7/RH6/RH5/RH4 (pwm)
;CONFIG CCP2MX = PORTBE ;PORTC

CONFIG MCLRE = ON

CONFIG STVREN = ON ;Stack Full/Underflow Reset
; CONFIG BBSIZ = BB1KL ; 1K word Boot Block size
; CONFIG BBSIZ = BB2K ; 2K word Boot Block size
CONFIG DEBUG = OFF ;Background Debugger

CONFIG CP0 = ON ;code-protected
CONFIG CP1 = ON
CONFIG CP2 = ON
CONFIG CP3 = ON
CONFIG CP4 = ON
CONFIG CP5 = ON
CONFIG CP6 = ON
CONFIG CP7 = ON
CONFIG CPB = ON ;Boot Block Code Protection
CONFIG CPD = ON ;Data EEPROM Code Protection

; CONFIG CP0 = OFF ;code-protected
; CONFIG CP1 = OFF
; CONFIG CP2 = OFF
; CONFIG CP3 = OFF
; CONFIG CP4 = OFF
; CONFIG CP5 = OFF
; CONFIG CP6 = OFF
; CONFIG CP7 = OFF
; CONFIG CPB = OFF ;Boot Block Code Protection
; CONFIG CPD = OFF ;Data EEPROM Code Protection
#endconfig

'DEFINE RESET_ORG 4000h'4000h HID bootloader must org the program at 2000 HEX
include "fp1832L.bas"
'include "FLASH.bas"

'*** At 64MHz each instruction cycle is 62.5ns
OSCCON=%11110100 'OSCILLATOR CONTROL & Frequency (16M RC)
OSCTUNE.6=1 'Frequency Multiplier PLL Enable bit FOR INIT RC

DEFINE OSC 64

INTCON2.7=1 'PORTB Pull-up Disable
PADCFG1.7=0 'PORTD Pull-up Disable
PADCFG1.6=0 'PORTE Pull-up Disable
PADCFG1.5=0 'PORTJ Pull-up Disable


ANCON0=0 'AN0-AN7 digital port
ANCON1=0 'AN8-AN15 digital port
ANCON2=0 'AN16-AN23 dig
CM1CON.7=0 'COMPERATOR1 OFF
CM2CON.7=0 'COMPERATOR2 OFF
CM3CON.7=0 'COMPERATOR3 OFF

PSPCON.4=0 'General Purpose I/O mode 'PSPMODE: Parallel Slave Port Mode Select bit


Restart:
TRISA=$FF
TRISB=$FF
TRISC=$FF
TRISD=$FF
TRISE=$FF
TRISF=$FF
TRISG=%11111
'*************


TRISC=%10111110
LATC.0=1 'HOST RTS 1=STOP SEND 0=ALOW TO SEND
'*C.1=MODULE RTS
'*C.2=1 Pump Sence
'*C.3=SCL RTC
'*C.4=SDA RTC
'*C.5=MFP RTC
LATC.6=1 'Tx1 WiFi
'*C7=RX1 WiFi
TRISA=%11101110 '
LATA.0=1 'PD_SCK HX711 low power mode
'*A0=PD_SCK HX711
'*A1=DOUT HX711
'*A2= HX711 TEMP SENSOR '02-09-2024
'*A3= INT IC PCAL6524HEAZ '02-09-2024
'*A5= general I/O connected to Test Point X16 '02-09-2024
latA.4=1 'wifi BW16 Reset/Disable 1=Reset/Disable


TRISB=%11111111
'B0-B4 not connected
'*B5= GENERAL I/O
'*B6=PROGRAMMING
'*B7=PROGRAMMING
TRISD=%00100011
' RD0 = scl2 AT24C16
' RD1 = sda2 AT24C16
LATD.2=0 'Buzzer
LATD.3=0 'External Unit Power on/off 1=on
LATD.4=0 'SDO2 FLASH
'D5=SDI2 FLASH
LATD.6=0 'SCK2 FLASH
LATD.7=1 'SS2 FLASH WP WRITE PROTECTION (0=PROTECT 1=ENABLE)

TRISE=%10011100
LATE.0=0 'HOLD FLASH 1=ACTIVE 0=HOLD
LATE.1=1 'CE FLASH 0=ENABLE 1=DISABLE
'*E2-E3= n.c
'*E4= Extension i/o
LATE.5=0 '1= Reset IC PCAL6524HEAZ
LATE.6=0 'AO3400A PWM6
'*E7= n.c
TRISF=%11111111
'*F0= n.c
'*F1= Power Fail input
'*F2= n.c
'*F3=Current Sense
TRISF.4=0 : LATF.4=1 ' Software Tx
'*F5= Software Rx
'*F6= Extension GENERAL I/O
'*F7= Extension GENERAL I/O
TRISG=%11101
'*G0= Busy
LATG.1=1 'TX2
'*G2= RX2
'*G3= Extension GENERAL I/O
'*G4= Extension GENERAL I/O


'**************
'**** WIFI ****
'**************

DEFINE HSER_RCSTA 90h ' Enable serial port & continuous receive
DEFINE HSER_TXSTA 24h ' Enable transmit, BRGH = 1
DEFINE HSER_SPBRG 34 ' 115200 Baud @ 64MHz, -0.79%
DEFINE HSER_CLROERR 1 ' Clear overflow automatically


'****************
'**** Uart 2 ****
'****************

DEFINE HSER2_RCSTA 90h ' Enable serial port & continuous receive for RAFID
DEFINE HSER2_TXSTA 24h ' Enable transmit, BRGH = 1
DEFINE HSER2_SPBRG 34 ' 115200 Baud @ 64MHz, -0.79%
DEFINE HSER2_CLROERR 1 ' Clear overflow automatically
'********************************

'****************
'**** Debug ****
'****************
DEFINE DEBUG_REG PORTF
DEFINE DEBUG_BIT 4
DEFINE DEBUG_BAUD 115200
DEFINE DEBUG_MODE 0 '0=TRUE 1=INVERTER
'************************************************* ************************************





A VAR BYTE 'general use
RE VAR BYTE[999]' wifi Rx buffer
'SSID_N VAR BYTE[32] 'SSID NAME buffer
'SSID_nC VAR BYTE 'SSID NAME BYTE COUNTER
'SSID_P VAR BYTE[128] 'SSID PASWORD buffer
'SSID_pC VAR BYTE 'SSID PASSWORD BYTE COUNTER
A1 VAR WORD
A2 VAR WORD
A3 VAR WORD
CHECK VAR WORD
COUNT_A VAR BYTE[50]
T VAR BYTE[50]
T1 VAR BYTE
T2 VAR WORD
T3 VAR BYTE
T4 VAR BYTE
Tlong VAR long '
AX1 VAR WORD 'WIFI
AX2 VAR WORD 'WIFI
Message var byte[500] ' for APP
MessageL VAR WORD 'Message Length
RSSI var LONG 'SSID signal
RxEvent var LONG 'wifi
ReplyEvent VAR LONG 'WIFI
Symb VAR BYTE
CLEAR

pause 100


'Note: at GET_SSID_list1 loop, remove " if CHECK=>AX1 THEN GOTO break33 ' ***** to runout MCU *****

Main:
Gosub DEMO_RECEIVE 'Simulation of receiving DATA from wifi module
gosub Decoding 'Decoding the received data

debug "SSID LIST:<ssid>,<rssi>",$D,$A,STR Message\MessageL

End










Decoding: 'Decoding the received data
''*** 128 Indicates end of array ****
arraywrite T,["+WSCAN:",128] 'COUNT_A[15] 'search '+WSCAN:
T3=18 'COUNT_A[] number
GOSUB ConfirmMessage
if COUNT_A[18]=$FF THEN 'found?
RxEvent.18=1
COUNT_A[18]=0
GOSUB GET_SSID_list 'load the SSID list to the Message array
endif
return

'******************************************
'**** SEARCH MESSAGE AT RECEIVED ARRAY ****
'******************************************
ConfirmMessage:
for T4 = 0 to 49 'GET T array Length
if T[T4]=128 THEN GOTO break5
NEXT T4
break5:

FOR CHECK = 0 TO AX1
IF RE[CHECK]=T[0] THEN 'confirm the first charter at T array
COUNT_A[T3]=COUNT_A[T3]+1
FOR T1= 1 TO T4-1 'the number of charter need to confirm
IF RE[CHECK+T1]=T[T1] THEN
COUNT_A[T3]=COUNT_A[T3]+1 'if charter true then count
ELSE
COUNT_A[T3]=0 'if one of charter not the same, clear counter
goto break24
ENDIF
next T1
break24:
if COUNT_A[T3]=T4 THEN
COUNT_A[T3]=$FF 'True
' if T3=7 then ReplyEvent.14=1 '+WSCANACTIVE Confirm found the ssid 'RxEvent.14
' if T3=19 THEN ReplyEvent.19=1 '+WSCAN Confirm found the ssid 'RxEvent.19
GOTO break7
endif
ENDIF

'IF pir1.0 THEN gosub CLEAR_TIMER1'TIMER1 OVER FLOW 20ms
next CHECK
break7:
T[T4]=0 'clear T
return
'******************************************



DEMO_RECEIVE:
arraywrite RE,[$d,$a,_
"+WSCAN:index SSID,CH,RSSI",$d,$a,_
"1 TP-Link_Guest_ABD6_5G,48,-42",$d,$a,_
"2 TP-Link_ABD6,48,-42",$d,$a,_
"3 ,48,-42",$d,$a,_
"4 TP-Link_ABD6,1,-45",$d,$a,_
"5 TP-Link_Guest_ABD6,1,-45",$d,$a,_
"6 ,1,-45",$d,$a,_
"7 Mamad_EXT2,4,-46",$d,$a,_
"8 Mamad_EXT5g 2,48,-48",$d,$a,_
"9 ,10,-57",$d,$a,_
"10 HOME,11,-68",$d,$a,_
"11 HOME_EXT,11,-74",$d,$a,_
"12 ,52,-80",$d,$a,_
"13 HOME_5G,52,-80",$d,$a,_
"14 HOTWiFi-D7D,6,-85",$d,$a,_
"15 HOME_5G_EXT,52,-85",$d,$a,_
"16 Mali,6,-89",$d,$a,_
"17 lior,11,-92",$d,$a,_
$d,$a,"OK",$d,$a]
'Rx Byte:360
AX1=360 'received byte
return

'******************************
SearchSymbol: 'search "," Symbol
'*** Must set T4 before send to this loop
T1=0
FOR A3 = CHECK TO AX1'
IF RE[A3]=Symb THEN T1=T1+1
IF T1=T4 THEN break9
NEXT A3
break9:
CHECK=A3
return


'*********************************************
'*** load all +SCAN SSID,RSSI list to Message array ***
'*********************************************
GET_SSID_list:
MessageL=0
T4=2 'multiple of the symbol x time "space"

GET_SSID_list1:
Symb=" " '"Space"
GOSUB SearchSymbol 'Search THE SYMBOLE

if CHECK=>AX1 THEN GOTO break33 'END OF LIST ***** REMOVED to runout MCU *****


CHECK=CHECK+1 'to jump on the "space"
if RE[CHECK]="," THEN 'If hidden wifi move to next line
T4=1 'multiple of the symbol
goto GET_SSID_list1
endif

FOR A3 = CHECK TO AX1 'Get SSID name
if RE[A3]="," then break31
Message[MessageL]=RE[A3]
MessageL=MessageL+1
next A3
break31:
T4=2 'multiple of symbol, JUMP on channel
Symb=","
gosub SearchSymbol


CHECK=A3+1 'jump on ","
Message[MessageL]="," 'insert "," Between ssid to rssi (ssid,rssi)
MessageL=MessageL+1
FOR A3 = CHECK TO AX1 'Get RSSI
if RE[A3]=$D then break32 'CR
Message[MessageL]=RE[A3]
MessageL=MessageL+1
NEXT A3
break32:
CHECK=A3


Message[MessageL]=$A 'insert LF
MessageL=MessageL+1
T4=1 'multiple of the symbol
GOTO GET_SSID_list1 'Next line
break33:
RETURN

[Ioannis]

Use this tags to embed the code:

[ code ]

[/ code ]

without spaces.

Ioannis

[richard]

a simple example to demonstrate WDT


'************************************************* ***************'* Name : UNTITLED.BAS *
'* Author : richard *
'* Notice : Copyright (c) 2024 caveat emptor *
'* : All Rights Reserved *
'* Date : 17/11/2024 *
'* Version : 1.0 *
'* Notes : *
'* : *
'************************************************* ***************
#config
CONFIG RETEN=OFF
CONFIG XINST = OFF ;Extended Instruction Set
CONFIG FOSC = INTIO2 ;internal RC oscillator

CONFIG SOSCSEL=DIG


CONFIG FCMEN = OFF ;Fail-Safe Clock Monitor ****
CONFIG IESO = OFF ;Two-Speed Start-up is disabled
CONFIG PLLCFG = OFF ;4x xtal PLL



CONFIG PWRTEN = ON ;Power-up Timer
CONFIG BOREN = SBORDIS ; Brown-out Reset Enabled in hardware, SBOREN disabled
CONFIG BORPWR = HIGH ;BOR MV set to high power level
CONFIG BORV = 2 ; Brown-out Reset 0=3v, 1=2.7v, 2=2v, 3=1.8v

CONFIG WDTEN = SWDTDIS ;ON ;OFF ;WDT enabled in hardware; SWDTEN bit disabled
CONFIG WDTPS = 512 ;WDT 512*4Ms = 2 SECONDS

CONFIG RTCOSC = INTOSCREF ; RTCC uses INTRC



CONFIG MCLRE = ON


CONFIG STVREN = ON ;Stack Full/Underflow Reset


CONFIG DEBUG = OFF ;Background Debugger

CONFIG CP0 = ON ;code-protected
CONFIG CP1 = ON
CONFIG CP2 = ON
CONFIG CP3 = ON
CONFIG CP4 = ON
CONFIG CP5 = ON
CONFIG CP6 = ON
CONFIG CP7 = ON
CONFIG CPB = ON ;Boot Block Code Protection
CONFIG CPD = ON ;Data EEPROM Code Protection


#endconfig


DEFINE NO_CLRWDT 1 'Don’t insert CLRWDTs


DEFINE DEBUG_REG PORTD
DEFINE DEBUG_BIT 4
DEFINE DEBUG_BAUD 9600
DEFINE DEBUG_MODE 0 '0=TRUE 1=INVERTER


'*** At 64MHz each instruction cycle is 62.5ns
OSCCON=%11110100 'OSCILLATOR CONTROL & Frequency (16M RC)
OSCTUNE.6=1 'Frequency Multiplier PLL Enable bit FOR INIT RC


DEFINE OSC 64
TRISD=$ed
ANCON0=0 'AN0-AN7 digital port
ANCON1=0 'AN8-AN15 digital port
ANCON2=0 'AN16-AN23 dig
CM1CON.7=0 'COMPERATOR1 OFF
CM2CON.7=0 'COMPERATOR2 OFF
CM3CON.7=0 'COMPERATOR3 OFF


PSPCON.4=0 'General Purpose I/O mode 'PSPMODE: Parallel Slave Port Mode Select bit

latd=18
@ CLRWDT ;WDT needs to be cleared every 512*4Ms = 2 SECONDS at most else chip will reset

pause 100
@ CLRWDT
debug "ready",13,10
@ CLRWDT
MAIN: ; if porta.0 is not detected going high the wdt will overflow and reset chip
LATD.1=0
IF PORTA.0 THEN
@ CLRWDT ; in main loop the wdt is cleared when porta.0 goes high
WHILE PORTA.0 : WEND
ENDIF
GOTO MAIN





stop









9833

[amgen]

************************************************** **************'* Name : UNTITLED.BAS *
'* Author : richard *
'* Notice : Copyright (c) 2024 caveat emptor *
'* : All Rights Reserved *
'* Date : 17/11/2024 *
'* Version : 1.0 *
'* Notes : *
'* : *
'************************************************* ***************
#config
CONFIG RETEN=OFF
CONFIG XINST = OFF ;Extended Instruction Set

Are you a wizard of some kind.......... you wrote/posted this a day ahead of today...... writing now in the future ??????

warning: I am an idiot!

[richard]

you wrote/posted this a day ahead of today
the world is not flat , time is relative

[eyalbiton]

Hello Richard

Thanks a lot for the help.