home *** CD-ROM | disk | FTP | other *** search
/ Dream 57 / Amiga_Dream_57.iso / Amiga / Programmation / Basic / Ace / acesource.lha / Reqtool.b < prev    next >
Encoding:
Text File  |  1998-10-27  |  327 b   |  21 lines
  1. /* 
  2.     Magnus is using reqtools library
  3.     All rights reserved by Hippomus
  4. */
  5.  
  6.  
  7. #include <funcs/reqtools_funcs.h>
  8.  
  9. Library "reqtools.library"
  10.  
  11. a=rtEZRequestA("Hello Amigauser!","Okey|NO",0,0,0)
  12.  
  13. if a=1 then 
  14. rtezrequestA("Yes Amiga is cool!","OKEY",0,0,0)
  15.  
  16. end if
  17.  
  18. if a=0 then 
  19. rtezrequestA("So what are you?","SUCK",0,0,0)
  20. end if
  21.