umouse

umouse.git
git clone git://git.lenczewski.org/umouse.git
Log | Files | Refs | Submodules | README

rebootSTM32.fth (886B)


      1 \ RebootSTM32.fth - Reboots STM32 CPUs
      2 
      3 ((
      4 Copyright (c) 2010
      5 MicroProcessor Engineering
      6 133 Hill Lane
      7 Southampton SO15 5AF
      8 England
      9 
     10 tel: +44 (0)23 8063 1441
     11 fax: +44 (0)23 8033 9691
     12 net: mpe@mpeforth.com
     13      tech-support@mpeforth.com
     14 web: www.mpeforth.com
     15 
     16 From North America, our telephone and fax numbers are:
     17   011 44 23 8063 1441
     18   011 44 23 8033 9691
     19 
     20 
     21 To do
     22 =====
     23 
     24 Change history
     25 ==============
     26 ))
     27 
     28 decimal
     29 
     30 \ ==========
     31 \ *> drivers
     32 \ *S Rebooting the CPU
     33 \ ==========
     34 \ *P The word *\fo{REBOOT} permits the system to be reset by
     35 \ ** disabling all interrupts and activating the watchdog.
     36 
     37 : reboot	\ --
     38 \ *G Reboots the CPU by activating the watchdog.
     39   di
     40   bit0 _RCC rccCSR + or!		\ enable LSI oscillator
     41   $CCCC _IWDG iwdgKR + !		\ start watchdog
     42   begin again				\ wait for reset
     43 ;
     44 
     45 
     46 \ ======
     47 \ *> ###
     48 \ ======
     49 
     50 decimal
     51