Test

by Super Saiyan X
ID:516614
 
le poop
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
le poop
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle




proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))




Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid




Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))




Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid




Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))




Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid




Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))




Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid




Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle

proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle
proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle

proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while(findtext(pfans,"[html_encode("\">")]"))
var
a = findtext(pfans, "[html_encode("\">")]")
keyg
m
if(findtext(copytext(pfans, a, a+16), "[html_encode("<img")]"))
pfans = copytext(pfans, a+16)
a = findtext(pfans, "[html_encode("\">")]")
m = 1
var/b = findtext(pfans, "[html_encode("</a>")]", a)
keyg = copytext(pfans, a+9, b)
pfans = (copytext(pfans, b+4))
.[keyg] = (m? "MEMBER" : )
Get_User_Title(member)
var/p = RetrievePage(member,"mtitle")
var/ptitle = copytext(p, findtext(p,"[html_encode("membership_info\">")]")+24, findtext(p, "[html_encode("</a></div>")]"))
return ptitle

proc
RetrievePage(page,type)
switch(type)
if("fans") page = "http://byond.com/hub/[page]&command=view_fans"
if("id") page = "http://byond.com/hub/[page]"
if("mtitle") page = "http://www.byond.com/members/?command=pager_popup_ajax&key=[page]"
var/list/http[]=world.Export(page)
if(!http)
world << "FAIL @ [page]"
return html_encode(file2text(http["CONTENT"]))

Get_HubID(hub)
var
p = RetrievePage(hub,"id")
begin= findtext(p,"hub_attachment_")
end = findtext(p,"{",begin)
pid = copytext(p,begin+15,end-3)
return pid

Get_Fans(hub)
var/p = RetrievePage(hub,"fans")
. = list()
if(!findtext(p,"guild_member_list"))
return
var/pfans = copytext(p,findtext(p,"guild_member_list")+30, findtext(p,"bottom_space"))
while
poop le
Instructions to observe the bug in action.
Edit the comment two above this.
Remove the 'e' in while, at the very bottom of the comment.
Save.
Refresh the page.
Bug is gone.
Put the 'e' back, the bug comes back.

Adding anything after the while will make it cut off.
This is seen in a lot of posts around the forum with a lot of text in DM tags. I haven't seen this occur outside of DM tags.