home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / coders / jËzyki_programowania / amigae / e_v3.2a / src / reqs / ereq.e < prev    next >
Text File  |  2001-03-31  |  261b  |  13 lines
  1. /* simple requesters ... */
  2.  
  3. OPT OSVERSION=37
  4.  
  5. PROC main()
  6.   DEF r
  7.   r:=request('Ahem...','Sure|Nope',NIL)
  8.   request('Your selection: \d','what do i care ...',[r])
  9. ENDPROC
  10.  
  11. PROC request(body,gadgets,args)
  12. ENDPROC EasyRequestArgs(0,[20,0,0,body,gadgets],0,args)
  13.