source: pfa3.appjet.net

/* appjet:version 0.1 */

import("storage");
import("quickforms");
page.setTitle("PFA HOMEPAGE");
page.body.write("<body bgcolor='black'>")
if (! storage.totalmembers)
 storage.totalmembers = 0;
if (! storage.counter)
 storage.counter = 0;
if (! storage.totalposts)
 storage.totalposts = 0;
if (storage.lastpost=='')
 storage.lastpost= "Visitor";
if (storage.lastmessage=='')
 storage.lastmessage='Nothing';

if (! storage.members)
 storage.members = new StorableCollection();
/* storage.counter=961 */
/* storage.totalposts=203 */

var form = new QuickForm({action: "/newmember"});
form.addInputText("Name", {label: "Name "});
form.addInputText("Post", {Label: "Post "});
form.addSubmit("add", "Post");

print(raw("""<IMG width=200px src="//img144.imageshack.us/img144/2917/pfapurplecomiccb5.jpg">"""));
print(raw(" "));
print(raw(" "));
print(raw(" "));
print(raw(" "));

 if(storage.lastpost=="Dweezle")
 print(Q('Last post by '+storage.lastpost+' who declared, "'+storage.lastmessage+'"'));
 /* print(Q(' Dweezle will be superior to Moonunit until she stops spamming')); */
 else if(storage.lastpost=="Dumkins")
 print(Q('Last post by '+storage.lastpost+' who announced, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Moonunit")
 print(Q('Last post by '+storage.lastpost+' who proposed, "'+storage.lastmessage+'"'));
 /* print(P(": ",storage.lastpost, "'s message posting abilities were revoked.")); */
 else if(storage.lastpost=="Admin")
 print(Q('Last post by '+storage.lastpost+' who COMMANDED EVERYONE TO "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Quiet")
 print(Q('Last post by '+storage.lastpost+' who whispered, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Robber")
 print(Q('Last post by '+storage.lastpost+' who demanded, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Psychic")
 print(Q('Last post by '+storage.lastpost+' who communcated telepathically that, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Question")
 print(Q('Last post by '+storage.lastpost+' who asked, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Cow")
 print(Q('Last post by '+storage.lastpost+' who mooed, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="German")
 print(Q('Last post by '+storage.lastpost+' who besagtes, "'+storage.lastmessage+' danke"'));
 else if(storage.lastpost=="Victory")
 print(Q('Last post by '+storage.lastpost+' who whooped, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Frenchy")
 print(Q('Last post by '+storage.lastpost+' qui dit, "'+storage.lastmessage+'"'));
 else if(storage.lastpost=="Visitor")
 print(Q("Someone said something"));
 else
 print(Q('Last post by '+storage.lastpost+' who said, '+storage.lastmessage));

print(raw(" "));
print(raw(" "));
print(raw(" "));
print(raw(" "));
print('Join PFA, the most Elite forum in the world. To join, just post a message.');
print(raw(" "));
print('Action Names: Quiet, Robber, Psychic, Question, Cow, Victory, German, Frenchy.');
print(raw(" "));
print(raw(" "));

function post_newmember() {
 storage.totalposts++
 storage.members.add({Name: request.param("Name"), Post: request.param("Post"), lastpost: request.param("Name")});
 storage.totalmembers++;
 storage.lastpost=request.param("Name");
 storage.lastmessage=request.param("Post");
 storage.members.postid=storage.totalposts
 response.redirect("/");

}
print(form);
print(raw(" "));
print("Recent Posts");
print(raw(" "));
function get_main() {

 storage.members.forEach(function(member) {

 if(! member.Post=="")
 if(member.Name=="Dweezle")
 print(P(": ", member.Name, " declared, ", member.Post));
 else if(member.Name=="Dumkins")
 print(P(": ", member.Name, " announced, ", member.Post));
 else if(member.Name=="Moonunit")
 print(P(": ", member.Name, " proposed, ", member.Post));
 /* print(P(": ",member.Name, "'s message posting abilities were revoked.")); */
 else if(member.Name=="Admin")
 print(P(": ", member.Name, " COMMANDED EVERYONE TO ", member.Post));
 else if(member.Name=="Quiet")
 print(P(": ", member.Name, " whispered, ", member.Post));
 else if(member.Name=="Robber")
 print(P(": ", member.Name, " demanded ", member.Post));
 else if(member.Name=="Psychic")
 print(P(": ", member.Name, " anounced telepathically that ", member.Post));
 else if(member.Name=="Question")
 print(P(": ", member.Name, " asked ", member.Post,"?"));
 else if(member.Name=="Cow")
 print(P(": ", member.Name, " mooed ", member.Post));
 else if(member.Name=="German")
 print(P(": ", member.Name, " besagtes Hallo, ", member.Post+" danke"));
 else if(member.Name=="Victory")
 print(P(": ", member.Name, " whooped ", member.Post,'!!!'));
 else if(member.Name=="Frenchy")
 print(P(": ", member.Name, " a dit ", member.Post,'!!!'));
 else if(member.Name=="test")
 var a=3/* print(P(": this is a test ")); */
 else if(member.Name=="")
 /* print(P(": ",member.Name, " said, ",member.Post)); */
 var a=2
 else
 print(P(": ",member.Name, " said, ",member.Post));
 else
 print(P(": ", member.Name, " joined PFA"));

 });

}

dispatch();
storage.counter++;
print(raw(" "));
print(raw("<center>"));
print(raw("""<IMG width=300px src="//www.channel4.com/entertainment/tv/microsites/U/udderbelly/images/cow_frontpage.gif">"""));
print(raw(" "));
print(raw(" "));
print(storage.counter+" visits and "+storage.totalposts+" recent posts, including tests");
print(raw(" "));

print(form);
print(raw(" "));

print(raw("</center>"));

if(storage.totalposts>200)
 storage.members.forEach(function(member) {
 member.Name=''
 storage.lastpost='POSTS CLEARED'
 storage.totalposts=0
 });

/* appjet:css */
P {
 border: 1px dashed purple;
 margin: 1em;
 padding: 0.25em 0.125em;
 font-family: arial;
 font-color: white;
}
Q {
 border: 1px solid green;
 margin: 1em;
 padding: 0.5em 0.5em;
 font-family: arial;
 font-color: white;
}
P2 {
 border: 1px solid white;
 margin: 1em;
 padding: 0.5em 0.5em;
 font-family: arial;
 font-color: white;
}

body {
 color: white;
 }