wz6ver

WZ6/マクロ集/外部ツール

公開中のwz6のバージョンをチェック表示します。

//20091115分離して修正
#include <windows.h>
#include <text.h>
//##切り出す
HTEXT newobj kiridashi(HTEXT text,char* strmae,char* strato){
	jumpend(text);
	INT size=getadr(text);
	UINT pLen;
	INT hajime=searchex(text,0,size,strmae,SEARCH_ALL|SEARCH_RE,&pLen);
	if (hajime != IFILE_ERROR) {
		delarea(text,0,(hajime+pLen));
	}
	jumpend(text);
	size=getadr(text);
	
	INT owari=searchex(text,0,size,strato,SEARCH_ALL|SEARCH_RE,NULL);
	if(owari != IFILE_ERROR){
		delarea(text,owari,size);
	}
	jumptop(text);
	return(text);
}
//##ページ取得
HTEXT newobj http_gets(HTEXT arg){
	HTEXT recv=new();
	if(internetconnect()){
		if(internetable()){
			recv =httprecv(arg);
			tosjis(recv,detectkc(recv));
			internetclose();
			internetend();
		}else{
			add(recv,"接続できません\n");
		}
	}
	else{
		add(recv,"接続できませんでした\n");
	}
	return(recv);
}
//##wz6ver取得
wz6ver{
	title: 公開中WZ6のバージョンをチェックします。
	tool:wz6ver
	HTEXT arg=new();
	arg.clmurl="http://www.wzsoft.jp/wz6/dload.htm";
	HTEXT recv=http_gets(arg);
	char* saki="公開の「";
	char* ato=\"」です。\<br\>\<\/b\>";
	kiridashi(recv,saki,ato);
	iprintf(recv);
	iprintf("\n%s\n",arg.clmurl);
}