tskseeのフォロー処理のメモ

if instr instr(text,0,"@tsksee")!=-1{
if instr instr(screen_name,0,"tsksee")=-1{
if instr instr(text, 0, "フォロー")!=-1 or instr(text, 0, "ふぉろー")!=-1{
mes "フォローモード"
if instr instr(friend_list, 0,""+uid+",")=-1{
mes "まだフォローしてないユーザです..."
repl=0
twttt=0
if instr instr(text, 0, "key=")!=-1{
mes"キーが存在します..."
split text,"key=",dst,keyword
if instr keyword=0+gettime(0)+gettime(1)+gettime(3)+gettime(4){
mes "キーが一致しました..."
repeat 10
mes "Following... "+screen_name
follow screen_name
mes stat
if instr stat=200{
friend_list+=""+uid+","
mes"ふぉろー完了"
plsms=""
repeat 5
tweet"@"+screen_name+" フォロー完了したのっ♪"+plsms+"",id
if instr stat=403&cnt>=4:er=1:mes"送信エラー":break
if instr stat=200:er203=0{
mid=id
repl=0
break
}
plsms+="　"
loop
break
}
wait 1
loop
}else{
//キーワードが違う
mes"キーが一致しません..."
plsms=""
repeat 5
tweet "@"+screen_name+" 認証キーが違うの＞＜"+plsms+"",id
if instr stat=403&cnt>=4:er=1:mes"送信エラー":break
if instr stat=200:er203=0{
mid=id
repl=0
break
}
break
plsms+="　"
loop
repl=0
}
}else{
//キーワードがない
mes "キーがありません..."
plsms=""
repeat 15
tweet "@"+screen_name+" 認証キーがないからできないの＞＜\n認証キーもつけてねっ♪"+plsms+"",id
mes stat
if instr stat=403&cnt>=4:er=1:mes"送信エラー"
if instr stat=200:er203=0{
mid=id
repl=0
break
}
mes cnt
plsms+="　"
loop
repl=0
}

}else{
//すでにフォローしてる
mes"すでにフォローしています..."
plsms=""
repeat 5
tweet"@"+screen_name+" うるせえクソガキ"+plsms+"",id
mes stat
if instr stat=200:repk++:lastscreen_name=screen_name:er203=0:mes"[完了]":repl=0:break
if instr stat=403:plsms="　　"
if instr stat=403&cnt=4:er403++:mes "[送信エラー]":break
plsms+="　"
loop
}
}
}
}