#include "ehttp_mod.as"
;Special thanks : だてしむ氏 http://www.mynet.ne.jp/~simodate/
	title" "
	objmode 2,1 : font"",12
	sdim a,128000 : notesel a : mesbox a,640,450,5
	font"",14
	button "GET",*ex
	pos 80,451 : button "CLR",*clr
	pos 160,451 : chkbox "中断",r
	sdim d,1024000
	gsel 0,1
	stop
*ex
	notemax n
	repeat n
	if r=1 : break
	noteget c,cnt
	ehttp_seturl c
	ehttp_get d
	strlen e,d
	bsave ".\\files\\"+cnt+".txt",d,e
	f=".\\files\\"+cnt+".txt"
	exec "notepad "+f,0
	wait 1
	loop

	stop
*clr
	objprm 0,""
	stop