( SPI_App)

OSCLI" DIR <rforth$dir>.Support"

OSCLI" RMEnsure GPIO 0.00 RMLoad GPIO"
OSCLI" RMEnsure GPIO 0.40 ERROR HELP can't find GPIO module"

OSCLI" DIR <rforth$dir>.WAUG"

 FLOAD" GPio_pi"
( FLOAD" Step_Motor")
 FLOAD" SPI_Progs4"
 FLOAD" DACtoADC"
( FLOAD" ADC_stepper")

 FLOAD" Complex"
 FLOAD" FFT_ADC"
 FLOAD" FFT_plotADC"
 FLOAD" FFT_TestADC"

: FFT_examples
   just_cosine   250 Tdelay
   2*cosine      250 Tdelay
   4*cosine      250 Tdelay
   square_pulse  250 Tdelay
   16 spike      250 Tdelay
   just_sine     250 Tdelay
   ( sin+cos+level 250 Tdelay) ;

