?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.     MODULE Fetcher
  2.  
  3. fetchFromNet:
  4.     call Gopher.makeRequest : jr c, .error
  5.     call Gopher.loadBuffer
  6.     jp MediaProcessor.processResource
  7. .error
  8.     ld hl, .err : call DialogBox.msgBox
  9.     jp History.back
  10.    
  11. .err db "Document fetch error! Check your connection or hostname!", 0
  12.  
  13.  
  14. fetchFromFS:
  15.     call UrlEncoder.extractPath
  16. loadFile
  17.     ld hl, nameBuffer
  18.     call Dos.loadBuffer
  19.     jp MediaProcessor.processResource
  20.     ENDMODULE