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
ID:516614
Mar 14 2012, 2:29 pm
|
|
le poop
|
Mar 14 2012, 2:29 pm
|
|
le poop
|
proc |
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. |