home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Exec 5 / CD_Magazyn_EXEC_nr_5.iso / Programy / Programowanie / AmigaE / yaec.lha / testsrc / select.e < prev    next >
Encoding:
Text File  |  2001-02-23  |  144 b   |  16 lines

  1. PROC main()
  2.    DEF a
  3.    a := 21
  4.    SELECT a
  5.    CASE 5 TO 20
  6.       PrintF('yep!\n')
  7.    DEFAULT
  8.       PrintF('nope!\n')
  9.    ENDSELECT
  10. ENDPROC
  11.  
  12.  
  13.  
  14.  
  15.  
  16.