home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 2 / AUCD2.iso / internet / acornet.spk / !Acornet / Apps / !POP / DummyTask (.txt) < prev    next >
RISC OS BBC BASIC V Source  |  1995-07-02  |  308b  |  15 lines

  1.  ** Send a command to POP
  2.     A$=""
  3.  "XOS_GetEnv" 
  4.  * Expect env to be "BASIC -quit <filename> <pop_commands>"
  5. par%=0
  6.  J=1 
  7.    par%=
  8. A$," ",par%)
  9.  par% 
  10.  par%+=1
  11.  par%>0 
  12.  "Wimp_Initialise",200,&4B534154,"POP "+
  13. A$,par%)
  14.  "Wimp_CloseDown"
  15.