diff options
Diffstat (limited to 'npc/custom/eAAC_Scripts/messageboards.txt')
| -rw-r--r-- | npc/custom/eAAC_Scripts/messageboards.txt | 646 |
1 files changed, 329 insertions, 317 deletions
diff --git a/npc/custom/eAAC_Scripts/messageboards.txt b/npc/custom/eAAC_Scripts/messageboards.txt index 7dae78cfc..c6c59edcb 100644 --- a/npc/custom/eAAC_Scripts/messageboards.txt +++ b/npc/custom/eAAC_Scripts/messageboards.txt @@ -1,421 +1,433 @@ +//===== rAthena Script ======================================= +//= Message Man +//===== By: ================================================== +//= Vicious +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= rAthena SVN +//===== Description: ========================================= +//= a message board where you can post and read messages +//===== Additional Comments: ================================= +//= +//============================================================ + geffen,122,102,4 script Message Man 774,{ -mes "[Robert]"; -mes "Hello, I am here to serve you. Enjoy my service. ^_-"; -next; -mes "[Robert]"; -mes "Please keep in mind, that all messages are wiped once every two days"; -mes "-Msg From Creator- In new version this will be set able, look forward to this! -End Msg From Creator-"; -next; + mes "[Robert]"; + mes "Hello, I am here to serve you. Enjoy my service. ^_-"; + next; + mes "[Robert]"; + mes "Please keep in mind, that all messages are wiped once every two days"; + mes "-Msg From Creator- In new version this will be set able, look forward to this! -End Msg From Creator-"; + next; L_Menu01: -mes "[Robert]"; -mes "What would you like to do??"; -next; -if((getgmlevel() >= 90)) menu "Public board",L_pubgmmenu,"Gm Board",L_gmmenu,"Close Public Board",L_clospub,"Open Public Board",L_openpub; -if(($messagepubclose == 1)) goto L_pubclosed; -menu "Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave; + mes "[Robert]"; + mes "What would you like to do??"; + next; + if((getgmlevel() >= 90)) menu "Public board",L_pubgmmenu,"Gm Board",L_gmmenu,"Close Public Board",L_clospub,"Open Public Board",L_openpub; + if(($messagepubclose == 1)) goto L_pubclosed; + menu "Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave; L_pubgmmenu: -if(($messagepubclose == 1)) goto L_pubclosed; -menu "Re-set the rotation",L_setrot,"Reset Message",L_Clearmsgs,"Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave; + if(($messagepubclose == 1)) goto L_pubclosed; + menu "Re-set the rotation",L_setrot,"Reset Message",L_Clearmsgs,"Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave; L_gmmenu: -menu "Read messages!",L_gmboardread,"Post a Message!",L_gmboardpost,"Reset Messages",L_gmboardreset; + menu "Read messages!",L_gmboardread,"Post a Message!",L_gmboardpost,"Reset Messages",L_gmboardreset; L_openpub: -mes "[Robert]"; -mes "Are you sure?"; -menu "Yes",-,"No",L_openpubn; -mes "[Robert]"; -mes "It is done."; -close2; -set $messagepubclose,0; -end; + mes "[Robert]"; + mes "Are you sure?"; + menu "Yes",-,"No",L_openpubn; + mes "[Robert]"; + mes "It is done."; + close2; + set $messagepubclose,0; + end; L_openpubn: -mes "[Robert]"; -mes "Very well it shall remain closed."; -close; + mes "[Robert]"; + mes "Very well it shall remain closed."; + close; L_pubclosed: -mes "[Robert]"; -mes "Im sorry. The public boards are currently Closed."; -close; + mes "[Robert]"; + mes "Im sorry. The public boards are currently Closed."; + close; L_clospub: -mes "[Robert]"; -mes "Are you sure?"; -next; -menu "Yes.",-,"No",L_closepubn; -mes "[Robert]"; -mes "Very well I will not allow anyone into the public board."; -close2; -set $messagepubclose,1; -end; + mes "[Robert]"; + mes "Are you sure?"; + next; + menu "Yes.",-,"No",L_closepubn; + mes "[Robert]"; + mes "Very well I will not allow anyone into the public board."; + close2; + set $messagepubclose,1; + end; L_closepubn: -mes "[Robert]"; -mes "Have a nice day"; -close; + mes "[Robert]"; + mes "Have a nice day"; + close; L_gmboardreset: -mes "[Robert]"; -mes "This will require atleast 2 GM's approval to reset the gm board."; -mes "-Msg From Creator- This is bugged same gm can vote twice. Planned to revise in next version. -End Msg From Creator-"; -next; -menu "Vote for reset.",L_gmboardresetvote,"Back to main.",L_Menu01,"Leave.",L_leave; + mes "[Robert]"; + mes "This will require atleast 2 GM's approval to reset the gm board."; + mes "-Msg From Creator- This is bugged same gm can vote twice. Planned to revise in next version. -End Msg From Creator-"; + next; + menu "Vote for reset.",L_gmboardresetvote,"Back to main.",L_Menu01,"Leave.",L_leave; L_gmboardresetvote: -callfunc "F_gmresetcheck"; -set @tempid,getcharid(0); -set $gmboardresetvotenumb,$gmboardresetvotenumb+1; -set $gmboardresetvoted[$gmboardresetvotenumb],1; -set $gmboardresetvoteid[$gmboardresetvotenumb],@tempid; -set @tempid,0; -set $gmboardreset,$gmboardreset-1; -mes "[Robert]"; -mes "Thank you."; -next; -if(($gmboardreset == 0)) goto L_gmresetdone; -if(($gmboardreset >= 1)) goto L_gmresetnotdone; -close; + callfunc "F_gmresetcheck"; + set @tempid,getcharid(0); + set $gmboardresetvotenumb,$gmboardresetvotenumb+1; + set $gmboardresetvoted[$gmboardresetvotenumb],1; + set $gmboardresetvoteid[$gmboardresetvotenumb],@tempid; + set @tempid,0; + set $gmboardreset,$gmboardreset-1; + mes "[Robert]"; + mes "Thank you."; + next; + if(($gmboardreset == 0)) goto L_gmresetdone; + if(($gmboardreset >= 1)) goto L_gmresetnotdone; + close; L_gmresetdone: -deletearray $gmmessageboardpost$[1],$gmmessageboardpostnumber; -deletearray $gmmessageboardpostdate$[1],$gmmessageboardpostnumber; -deletearray $gmmessageboardpostname$[1],$gmmessageboardpostnumber; -deletearray $gmmessageboardeditdate$[1],$gmmessageboardpostnumber; -deletearray $gmboardresetvoted[1],$gmboardresetvotenumber; -deletearray $gmboardresetvoted[1],$gmboardresetvotenumber; -deletearray $gmboardresetvoteid[1],$gmboardresetvotenumber; -set $gmboardresetvotenumber,0; -set $gmboardreset,2; -mes "[Robert]"; -mes "The reset has been done."; -close; + deletearray $gmmessageboardpost$[1],$gmmessageboardpostnumber; + deletearray $gmmessageboardpostdate$[1],$gmmessageboardpostnumber; + deletearray $gmmessageboardpostname$[1],$gmmessageboardpostnumber; + deletearray $gmmessageboardeditdate$[1],$gmmessageboardpostnumber; + deletearray $gmboardresetvoted[1],$gmboardresetvotenumber; + deletearray $gmboardresetvoted[1],$gmboardresetvotenumber; + deletearray $gmboardresetvoteid[1],$gmboardresetvotenumber; + set $gmboardresetvotenumber,0; + set $gmboardreset,2; + mes "[Robert]"; + mes "The reset has been done."; + close; L_gmresetnotdone: -mes "[Robert]"; -mes "There needs to be "+$gmboardreset+" more gm(s) approval to do the reset."; -close; + mes "[Robert]"; + mes "There needs to be "+$gmboardreset+" more gm(s) approval to do the reset."; + close; L_gmboardread: -if(($gmmessageboardpostnumber == 0)) goto L_msgno; -callfunc "F_gmmessage"; -end; + if(($gmmessageboardpostnumber == 0)) goto L_msgno; + callfunc "F_gmmessage"; + end; L_gmboardpost: -if(($gmmessageboardpostnumber >= 127)) goto L_postmsgyestm; -set @gmmessageboardpostername$,strcharinfo(0); -set @gmmessageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21); -set $gmmessageboardpostnumber,$gmmessageboardpostnumber+1; -input @gmmsgboardmsgt$; -set $gmmessageboardpost$[$gmmessageboardpostnumber],@gmmsgboardmsgt$; -set $gmmessageboardpostdate$[$gmmessageboardpostnumber],@gmmessageboarddate$; -set $gmmessageboardpostname$[$gmmessageboardpostnumber],@gmmessageboardpostername$; -mes "[Robert]"; -mes "Here is what your message looks like"; -next; -mes "Posted by: "+$gmmessageboardpostname$[$gmmessageboardpostnumber]+"."; -mes "On: "+$gmmessageboardpostdate$[$gmmessageboardpostnumber]+"."; -mes $gmmessageboardpost$[$gmmessageboardpostnumber]; -close; + if(($gmmessageboardpostnumber >= 127)) goto L_postmsgyestm; + set @gmmessageboardpostername$,strcharinfo(0); + set @gmmessageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21); + set $gmmessageboardpostnumber,$gmmessageboardpostnumber+1; + input @gmmsgboardmsgt$; + set $gmmessageboardpost$[$gmmessageboardpostnumber],@gmmsgboardmsgt$; + set $gmmessageboardpostdate$[$gmmessageboardpostnumber],@gmmessageboarddate$; + set $gmmessageboardpostname$[$gmmessageboardpostnumber],@gmmessageboardpostername$; + mes "[Robert]"; + mes "Here is what your message looks like"; + next; + mes "Posted by: "+$gmmessageboardpostname$[$gmmessageboardpostnumber]+"."; + mes "On: "+$gmmessageboardpostdate$[$gmmessageboardpostnumber]+"."; + mes $gmmessageboardpost$[$gmmessageboardpostnumber]; + close; L_setrot: -set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages. -if(($@determinedayrotation == 0)) set $rotation,0; -if(($@determinedayrotation == 1)) set $rotation,1; -if(($@determinedayrotation == 2)) set $rotation,0; -if(($@determinedayrotation == 3)) set $rotation,1; -if(($@determinedayrotation == 4)) set $rotation,0; -if(($@determinedayrotation == 5)) set $rotation,1; -if(($@determinedayrotation == 6)) set $rotation,0; -mes "It is done."; -close; + set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages. + if(($@determinedayrotation == 0)) set $rotation,0; + if(($@determinedayrotation == 1)) set $rotation,1; + if(($@determinedayrotation == 2)) set $rotation,0; + if(($@determinedayrotation == 3)) set $rotation,1; + if(($@determinedayrotation == 4)) set $rotation,0; + if(($@determinedayrotation == 5)) set $rotation,1; + if(($@determinedayrotation == 6)) set $rotation,0; + mes "It is done."; + close; L_Clearmsgs: -mes "[Robert]"; -mes "Are you sure?"; -next; -menu "Yes",L_clearmsgsy,"No thanks.",L_Menu01; + mes "[Robert]"; + mes "Are you sure?"; + next; + menu "Yes",L_clearmsgsy,"No thanks.",L_Menu01; L_clearmsgsy: -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $messageboardeditdate$[1],$messageboardpostnumber; -deletearray $mymessage[1],$messageboardpostnumber; -set $messageboardpostnumber,0; -mes "[Robert]"; -mes "It is done."; -close; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $messageboardeditdate$[1],$messageboardpostnumber; + deletearray $mymessage[1],$messageboardpostnumber; + set $messageboardpostnumber,0; + mes "[Robert]"; + mes "It is done."; + close; L_leave: -close; + close; L_Postmsg: -mes "[Robert]"; -mes "What do you want to say in your message?"; -next; -set @msgboardmsgt$,0; -input @msgboardmsgt$; -mes "[Robert]"; -mes "are you sure this is the message you want?"; -mes @msgboardmsgt$; -next; -menu "Yes!",L_postmsgyes,"No let me re-do it!",L_Postmsg,"Ive changed my mind let me leave.",lleave; + mes "[Robert]"; + mes "What do you want to say in your message?"; + next; + set @msgboardmsgt$,0; + input @msgboardmsgt$; + mes "[Robert]"; + mes "are you sure this is the message you want?"; + mes @msgboardmsgt$; + next; + menu "Yes!",L_postmsgyes,"No let me re-do it!",L_Postmsg,"Ive changed my mind let me leave.",lleave; L_postmsgyes: -if(($messageboardpostnumber >= 127)) goto L_postmsgyestm; -set @messageboardpostername$,strcharinfo(0); -set @messageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21); -set $messageboardpostnumber,$messageboardpostnumber+1; -set @mymessage2,$messageboardpostnumber; -set $mymessage[$messageboardpostnumber],5; -set $messageboardpost$[$messageboardpostnumber],@msgboardmsgt$; -set $messageboardpostdate$[$messageboardpostnumber],@messageboarddate$; -set $messageboardpostname$[$messageboardpostnumber],@messageboardpostername$; -mes "[Robert]"; -mes "here is what your message looks like"; -next; -mes "Posted by: "+$messageboardpostname$[$messageboardpostnumber]+"."; -mes "On: "+$messageboardpostdate$[$messageboardpostnumber]+"."; -mes $messageboardpost$[$messageboardpostnumber]; -close; + if(($messageboardpostnumber >= 127)) goto L_postmsgyestm; + set @messageboardpostername$,strcharinfo(0); + set @messageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21); + set $messageboardpostnumber,$messageboardpostnumber+1; + set @mymessage2,$messageboardpostnumber; + set $mymessage[$messageboardpostnumber],5; + set $messageboardpost$[$messageboardpostnumber],@msgboardmsgt$; + set $messageboardpostdate$[$messageboardpostnumber],@messageboarddate$; + set $messageboardpostname$[$messageboardpostnumber],@messageboardpostername$; + mes "[Robert]"; + mes "here is what your message looks like"; + next; + mes "Posted by: "+$messageboardpostname$[$messageboardpostnumber]+"."; + mes "On: "+$messageboardpostdate$[$messageboardpostnumber]+"."; + mes $messageboardpost$[$messageboardpostnumber]; + close; L_postmsgyestm: -set @mesboardmsgt$,0; -mes "[Robert]"; -mes "Im sorry your going to have to wait till more space opens up for messages, it should be in 1 or 2 days =)"; -close; + set @mesboardmsgt$,0; + mes "[Robert]"; + mes "Im sorry your going to have to wait till more space opens up for messages, it should be in 1 or 2 days =)"; + close; lleave: -deletearray $messageboardpost$[@tempview],@tempview; -deletearray $messageboardpostname$[@tempview],@tempview; -deletearray $messageboardpostdate$[@tempview],@tempview; -deletearray $mymessage[@tempview],@tempview; -set $messageboardpostnumber,$messageboardpostnumber-1; -set @msgboardmsgt$,0; -close; + deletearray $messageboardpost$[@tempview],@tempview; + deletearray $messageboardpostname$[@tempview],@tempview; + deletearray $messageboardpostdate$[@tempview],@tempview; + deletearray $mymessage[@tempview],@tempview; + set $messageboardpostnumber,$messageboardpostnumber-1; + set @msgboardmsgt$,0; + close; L_readmsg: -if(($messageboardpostnumber == 0)) goto L_msgno; -callfunc "F_message"; -end; + if(($messageboardpostnumber == 0)) goto L_msgno; + callfunc "F_message"; + end; L_msgno: -mes "[Robert]"; -mes "There are currently no messages."; -close; + mes "[Robert]"; + mes "There are currently no messages."; + close; OnInit: -set $gmboardreset,2; -set $gmboardresetvotenumb,0; -end; + set $gmboardreset,2; + set $gmboardresetvotenumb,0; + end; OnInterIfInitOnce: -set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages. -if(($@determinedayrotation == 0)) set $rotation,0; -if(($@determinedayrotation == 1)) set $rotation,1; -if(($@determinedayrotation == 2)) set $rotation,0; -if(($@determinedayrotation == 3)) set $rotation,1; -if(($@determinedayrotation == 4)) set $rotation,0; -if(($@determinedayrotation == 5)) set $rotation,1; -if(($@determinedayrotation == 6)) set $rotation,0; -end; + set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages. + if(($@determinedayrotation == 0)) set $rotation,0; + if(($@determinedayrotation == 1)) set $rotation,1; + if(($@determinedayrotation == 2)) set $rotation,0; + if(($@determinedayrotation == 3)) set $rotation,1; + if(($@determinedayrotation == 4)) set $rotation,0; + if(($@determinedayrotation == 5)) set $rotation,1; + if(($@determinedayrotation == 6)) set $rotation,0; + end; OnSun1200: -if(($rotation == 1)) end; -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $mymessage[1],$messageboardpostnumber; -set $messageboardpostnumber,0; -end; + if(($rotation == 1)) end; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $mymessage[1],$messageboardpostnumber; + set $messageboardpostnumber,0; + end; OnSat1200: -if(($rotation == 0)) end; -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $mymessage[1],$messageboardpostnumber; -set $messageboardpostnumber,0; -end; + if(($rotation == 0)) end; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $mymessage[1],$messageboardpostnumber; + set $messageboardpostnumber,0; + end; OnMon1200: -if(($rotation == 1)) end; -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $mymessage[1],$messageboardpostnumber; -set $messageboardpostnumber,0; -end; + if(($rotation == 1)) end; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $mymessage[1],$messageboardpostnumber; + set $messageboardpostnumber,0; + end; OnTue1200: -if(($rotation == 0)) end; -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $mymessage[1],$messageboardpostnumber; -set $messageboardpostnumber,0; -end; + if(($rotation == 0)) end; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $mymessage[1],$messageboardpostnumber; + set $messageboardpostnumber,0; + end; OnWed1200: -if(($rotation == 1)) end; -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $mymessage[1],$messageboardpostnumber; -set $messageboardpostnumber,0; -end; + if(($rotation == 1)) end; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $mymessage[1],$messageboardpostnumber; + set $messageboardpostnumber,0; + end; OnThu1200: -if(($rotation == 0)) end; -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $mymessage[1],$messageboardpostnumber; -set $messageboardpostnumber,0; -end; + if(($rotation == 0)) end; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $mymessage[1],$messageboardpostnumber; + set $messageboardpostnumber,0; + end; OnFri1200: -if(($rotation == 1)) end; -deletearray $messageboardpost$[1],$messageboardpostnumber; -deletearray $messageboardpostdate$[1],$messageboardpostnumber; -deletearray $messageboardpostname$[1],$messageboardpostnumber; -deletearray $mymessage[@tempview],@tempview; -set $messageboardpostnumber,0; -end; + if(($rotation == 1)) end; + deletearray $messageboardpost$[1],$messageboardpostnumber; + deletearray $messageboardpostdate$[1],$messageboardpostnumber; + deletearray $messageboardpostname$[1],$messageboardpostnumber; + deletearray $mymessage[@tempview],@tempview; + set $messageboardpostnumber,0; + end; } function script F_gmresetcheck { -set @tempcheck,0; + set @tempcheck,0; L_top: -set @tempcheck,@tempcheck+1; -if(($gmboardresetvoted[@tempview] == 1)) goto L_votecheck; -if(($gmboardresetvoted[@tempview] == 0)) return; -goto L_top; -end; - + set @tempcheck,@tempcheck+1; + if(($gmboardresetvoted[@tempview] == 1)) goto L_votecheck; + if(($gmboardresetvoted[@tempview] == 0)) return; + goto L_top; + end; L_votecheck: -set @tempcheckid,0; -set @tempcheckid,getcharid(0); -if(($gmboardresetvoteid[@tempview] != @tempcheckid)) goto L_top; -if(($gmboardresetvoteid[@tempview] == @tempcheckid)) goto L_voted; -end; + set @tempcheckid,0; + set @tempcheckid,getcharid(0); + if(($gmboardresetvoteid[@tempview] != @tempcheckid)) goto L_top; + if(($gmboardresetvoteid[@tempview] == @tempcheckid)) goto L_voted; + end; } function script F_gmmessage { -set @tempview,0; + set @tempview,0; L_top: -set @tempview,@tempview+1; -mes "Posted By: "+$gmmessageboardpostname$[@tempview]+"."; -mes "On: "+$gmmessageboardpostdate$[@tempview]+"."; -mes $gmmessageboardpost$[@tempview]+"."; -menu "Next Message",L_top2; - + set @tempview,@tempview+1; + mes "Posted By: "+$gmmessageboardpostname$[@tempview]+"."; + mes "On: "+$gmmessageboardpostdate$[@tempview]+"."; + mes $gmmessageboardpost$[@tempview]+"."; + menu "Next Message",L_top2; L_top2: -if(($gmmessageboardpostnumber > @tempview)) goto L_top; -close; + if(($gmmessageboardpostnumber > @tempview)) goto L_top; + close; } function script F_message { -set @tempview,0; + set @tempview,0; L_top: -set @tempview,@tempview+1; -mes "Posted By: "+$messageboardpostname$[@tempview]+"."; -mes "On: "+$messageboardpostdate$[@tempview]+"."; -mes $messageboardpost$[@tempview]+"."; -next; -if(($mymessage[@tempview] == 5) && (getgmlevel()>0)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy,"Delete This message",L_Del; -if((getgmlevel()>0)) menu "Next Message",L_top2,"Delete This message",L_Del; -if(($mymessage[@tempview] == 5)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy; -menu "Next message",L_top2; -close; + set @tempview,@tempview+1; + mes "Posted By: "+$messageboardpostname$[@tempview]+"."; + mes "On: "+$messageboardpostdate$[@tempview]+"."; + mes $messageboardpost$[@tempview]+"."; + next; + if(($mymessage[@tempview] == 5) && (getgmlevel()>0)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy,"Delete This message",L_Del; + if((getgmlevel()>0)) menu "Next Message",L_top2,"Delete This message",L_Del; + if(($mymessage[@tempview] == 5)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy; + menu "Next message",L_top2; + close; L_editmy: -mes "Are you sure?"; -next; -menu "Yes",L_editmyy,"No",L_editmyn; + mes "Are you sure?"; + next; + menu "Yes",L_editmyy,"No",L_editmyn; L_editmyy: -mes "what do you want your new message to be?"; -next; -mes "Current message!"; -mes $messageboardpost$[@tempview]; -set @tempeditmsg$,0; -input @tempeditmsg$; -next; -mes "is this what you want?"; -mes @tempeditmsg$; -next; -menu "Yes!",L_editmyyy,"No.",L_editmyyn; + mes "what do you want your new message to be?"; + next; + mes "Current message!"; + mes $messageboardpost$[@tempview]; + set @tempeditmsg$,0; + input @tempeditmsg$; + next; + mes "is this what you want?"; + mes @tempeditmsg$; + next; + menu "Yes!",L_editmyyy,"No.",L_editmyyn; L_editmyyy: -deletearray $messageboardpost$[@tempview],@tempview; -set $messageboardpost$[@tempview],@tempeditmsg$; -mes "Here is what your new message looks like."; -next; -mes "Posted By: "+$messageboardpostname$[@tempview]+"."; -mes "On: "+$messageboardpostdate$[@tempview]+"."; -mes $messageboardpost$[@tempview]+"."; -close2; -set @tempview,0; -end; + deletearray $messageboardpost$[@tempview],@tempview; + set $messageboardpost$[@tempview],@tempeditmsg$; + mes "Here is what your new message looks like."; + next; + mes "Posted By: "+$messageboardpostname$[@tempview]+"."; + mes "On: "+$messageboardpostdate$[@tempview]+"."; + mes $messageboardpost$[@tempview]+"."; + close2; + set @tempview,0; + end; L_editmyn: -Mes "So be it."; -set @tempview,0; -close; + Mes "So be it."; + set @tempview,0; + close; L_editmyyn: -mes "So be it!"; -set @tempeditmsg$,0; -set @tempview,0; -close; + mes "So be it!"; + set @tempeditmsg$,0; + set @tempview,0; + close; L_delmy: -mes "Are you sure...?"; -next; -menu "Yes",L_delmyy,"No thanks.",L_delmyn; + mes "Are you sure...?"; + next; + menu "Yes",L_delmyy,"No thanks.",L_delmyn; L_delmyy: -deletearray $messageboardpost$[@tempview],@tempview; -deletearray $messageboardpostname$[@tempview],@tempview; -deletearray $messageboardpostdate$[@tempview],@tempview; -deletearray $mymessage[@tempview],@tempview; -deletearray $messageboardeditdate$[@tempview],@tempview; -set $messageboardpostnumber,$messageboardpostnumber-1; -set @tempview,0; -mes "It is done."; -close; + deletearray $messageboardpost$[@tempview],@tempview; + deletearray $messageboardpostname$[@tempview],@tempview; + deletearray $messageboardpostdate$[@tempview],@tempview; + deletearray $mymessage[@tempview],@tempview; + deletearray $messageboardeditdate$[@tempview],@tempview; + set $messageboardpostnumber,$messageboardpostnumber-1; + set @tempview,0; + mes "It is done."; + close; L_delmyn: -mes "Come back soon."; -set @tempview,0; -close; + mes "Come back soon."; + set @tempview,0; + close; L_top2: -if(($messageboardpostnumber > @tempview)) goto L_top; -close; + if(($messageboardpostnumber > @tempview)) goto L_top; + close; L_Del: -mes "Are you sure?"; -next; -menu "Yes",L_Dely,"No",L_Deln; + mes "Are you sure?"; + next; + menu "Yes",L_Dely,"No",L_Deln; L_Dely: -deletearray $messageboardpost$[@tempview],@tempview; -deletearray $messageboardpostname$[@tempview],@tempview; -deletearray $messageboardpostdate$[@tempview],@tempview; -deletearray $mymessage[@tempview],@tempview; -deletearray $messageboardeditdate$[@tempview],@tempview; -set $messageboardpostnumber,$messageboardpostnumber-1; -mes "It is done."; -set @tempview,0; -close; + deletearray $messageboardpost$[@tempview],@tempview; + deletearray $messageboardpostname$[@tempview],@tempview; + deletearray $messageboardpostdate$[@tempview],@tempview; + deletearray $mymessage[@tempview],@tempview; + deletearray $messageboardeditdate$[@tempview],@tempview; + set $messageboardpostnumber,$messageboardpostnumber-1; + mes "It is done."; + set @tempview,0; + close; L_Deln: -mes "Come back soon!"; -set @tempview,0; -close; -}
\ No newline at end of file + mes "Come back soon!"; + set @tempview,0; + close; +} |