tell application "Netscape Navigatorª 2.01"
	if (list windows) is {} then
		copy "" to nowURL
	else
		try
			get URL of the window 1
			copy the result to nowURL
			copy nowURL to orgURL
			get name of the window 1
			copy the result to nowName
		on error
			copy "" to nowURL
		end try
	end if
end tell
if nowURL is "" or nowURL does not contain "://" then
	beep
else
	
	if nowURL starts with "ftp://" then
		if nowURL ends with "/" then
			copy "DIR " & nowURL to nowURL
		else
			copy "GET " & nowURL to nowURL
		end if
		copy "AURL" to nowType
		copy "Arch" to nowCreator
	else
		copy "URL " to nowType
		copy "MOSS" to nowCreator
	end if
	--WRITE DATA
	new file with prompt "Bookmark File:" default name nowName
	copy the result to nowFile
	copy (open for access nowFile with write permission) to fref
	write nowURL to fref
	close access fref
	--CHANGE FILEINFO
	tell application "Finder"
		set file type of nowFile to nowType
		set creator type of nowFile to nowCreator
		set comment of nowFile to orgURL
		--UPDATE??
		update nowFile
	end tell
	
end if