今天又测试了一下spinnerchief的API

时间: 2010-12-16 / 分类: C# / 浏览次数: 5,861 views / 0个评论 发表评论

发现自己喜欢上用DELPHI弄些小软件,虽然我很菜,但是我很快乐,弄成一个小软件后有一种非常愉悦的感觉

有点时候,竟然能废寝忘食地全心投入到那种工作中

第一次用spinnerchief就知道它有一个API接口,但那时候没时间研究它的使用方法

今天仔细看了一下,原来它是模拟成一个虚拟主机下的程序

用POST方式把需要伪原创的文章POST到这个网址http://127.0.0.1:9001/spintype=0&spinfreq=4&synonymsdatabase=0&favoriatecategory=all&autospin=1?? 就可以了,程序会自动返回修改过的文章

上面的是原理,那么看看实现的方法

首先,必须开着spinnerchief软件,这个不一定在自己机子上,在服务器上面也可以,但是上面网址的IP就得换一下了,而且要保证那个端口是可以在外网访问的,如果在自己机子上运行就没那么多限制,打开软件,进到software页,再切换到Developer API页面,然后点Begin to listen就把本地的服务器架设好了,以后都不能关这个软件,否则API就不能用了

剩下就是用软件POST数据了,作者给了一个例子是用C#写的,我看了一下,简单的几行,大概也就是POST的动作,用DELPHI弄弄也可以弄得出来。

我拖了两个MEMO和一个BUTTON出来,一个MEMO作为原始文章输入的地方,另外一个作为转换后的文章输出地方,按钮自然是发出POST的动作,还有一个IdHTTP是POST必须的组件

Memo1: TMemo;
Memo2: TMemo;
Button1: TButton;
IdHTTP1: TIdHTTP;

然后双击按钮输入必要的测试代码

procedure TForm1.Button1Click(Sender: TObject);
var
strMsg:string;
sParams: TStringStream;
IdHTTP1:TIdHTTP;
begin
sParams := TStringStream.create(”);
IdHTTP1:=TIdHTTP.Create(Nil);
IdHTTP1.Request.ContentType := ‘application/x-www-form-urlencoded’;
try
sParams.WriteString(Memo1.Text);
strMsg:=IdHTTP1.post(‘http://127.0.0.1:9001/spintype=1&spinfreq=1&synonymsdatabase=2&favoriatecategory=all&autospin=1’,sParams);
Memo2.Text:=UTF8Decode(strmsg);

finally
sParams.Free;
IdHTTP1.Free;
end;
end;

那个网址就要说明一下了

http://127.0.0.1:9001/spintype=1&spinfreq=1&synonymsdatabase=2&favoriatecategory=all&autospin=1

spintype是伪原创模式,0是返回spinnerchief编辑模式的内容,就是带有很多{}的文章,大括号里的词可以随意替换的

1就是返回修改后的文章

spinfreq是修改幅度,为3就是有三分之一的词会被替换,为4就是四分之一

synonymsdatabase=0只使用读取的本地词典替换,=1就是用喜欢的词替换,=2就是两者都使用

如果上面这个参数是1或者2那么就需要后面这个参数了favoriatecategory喜欢用的词的分类

最后一个参数autospin=0就只替换{}大括号格式的词,=1就不管三七二十一,只要文中有能替换的词都尝试替换一下

经过测试,成功显示结果

但是有一个得说明一下,这种自动替换出来的文章真实惨不忍睹,一点都不人性化,没有可读性

但是,骗骗搜索引擎还是可以的

发表评论

您的昵称 *

您的邮箱 *

您的网站