# File test/tc_atari_800.rb, line 6
  def test_atari_800_images

  
    sniff_url("http://www.atariarchives.org/oldhackers/OHJFM00A.ATR",Atr,AtariDos,[
      {:filename=>"HELP.DOC",:expected_native_file_type=>AtariText,:text_starts_with=>" The OL' HACKERS Disk  Newsletter Help\n"},
      {:filename=>"GDRIVES.TXT",:expected_native_file_type=>AtariText,:text_starts_with=>"  Life Insurance For Your Disk Drives\n             by Ron Fetzer\n\n      Are you"},
      {:filename=>'DUP.SYS',:expected_native_file_type=>AtariBinary,:load_address=>0x1F0C,:can_execute=>:to_disassembly},
      {:filename=>"WELCOME.BAS",:expected_native_file_type=>AtariBasic,:listing_starts_with=>"10 DIM CIO$(20),SCR$(958):POKE 82,0:POKE 752,1:PRINT \"}\":POKE 559,0:POKE 709,12:POKE 710,20:POKE 712,24\n20 CIO$="},
    ])

    sniff_url("http://www.atariarchives.org/oldhackers/OHJFM00B.ATR",Atr,AtariDos,[
      {:filename=>"LABEL.TUR",:expected_native_file_type=>AtariBasic,:can_execute=>:to_listing},
      {:filename=>"SUBATACK.TUR",:expected_native_file_type=>AtariBasic,:can_execute=>:to_listing},
    ])
    sniff_url("http://ape.dyndns.org:8085/A-J/Bank_Street_Writer.atr",Atr,AtariDos,
    [
      {:filename=>'UTILA.SYS',:expected_native_file_type=>AtariBasic,:can_execute=>:to_listing},
    ])
    
    
end