home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 2 / AUCD2.iso / internet / acornet.spk / !Acornet / !Run < prev    next >
Text File  |  1996-04-27  |  786b  |  22 lines
  1. | set directory
  2. Set Acornet$Dir <Obey$Dir>
  3. Set Acornet$Path <Acornet$Dir>.
  4. | set sprites
  5. IconSprites <Acornet$Dir>.!Sprites
  6.  
  7. | See any resource apps we need to
  8. Run Acornet:SeeRes
  9. | Grab the Serial Dev path back in case an older version's been seen
  10. Set SerialDev$Path Acornet:Resources.!SerialDev.
  11. If "<Mail$Dir>" = "" Then Set Mail$Dir Acornet:Resources.!FreeUser.Files
  12.  
  13. | Normally we want to start !SLIPdial
  14. Set Alias$RunAcornet Run Acornet:Utils.!SLIPdial -task FreeSLIP -file Acornet:Utils.!Slipdial.Scripts.Acornet.Acornet
  15. | But have we been configured yet?
  16. Exist Acornet:Resources.!FreeUser.Files.SLIPinfo
  17. | If not, then launch the Config app straight away
  18. If "<Exist$Flag>"<>"File" Then Set Alias$RunAcornet Run Acornet:Utils.!NetConfig
  19.  
  20. | Run whichever is appropriate
  21. RunAcornet
  22.