[game]
definevar([pw_qresponse],"int"); // You can ignore this.
definevar([pw_choicesfx],"string"); // This is what your "choice" sound's name is.
definevar([pw_answer],"string"); // This is the script you want it to jump to.
setvar([pw_choicesfx],"sfx-selectblip2.wav"); // This is the default.

[pw_doquestion]
setvar([pw_q1gfx],30500);
setvar([pw_q2gfx],30501);
setvar([pw_q3gfx],30502);
setvar([pw_q4gfx],30503);
runscript("hidepwmenu");
runscript("pw_setupquestions");
runscript("pw_showquestion");
waitsignal("qreply",[pw_qresponse]);
definevar([blink],"string");
setvar([blink],"pw_qreply");
appendtostring([blink],[pw_qresponse]);
loadandplaysfx([pw_choicesfx],0);
placeblink([blink],"button",20,3,0);
wait(20);
runscript("pw_hideselectananswer");
runscript("hidepwmenu");
runscript("pw_showadvarrowmenu");
appendtostring([pw_answer],[pw_qresponse]);
runscript("pw_hideselectananswer");
runscript([pw_answer]);

[game]
runscript("pw_showattorneystand");
runscript("pw_setnameboxtophoenix");
runscript("pw_enablephoenixthinking");
message("Yes, Your Honor?\nYou had a question for me?");
runscript("case1_question1"); // Execute our question! we'll continue below after they have got the question right!
runscript("pw_showattorneystand");
runscript("pw_setnameboxtophoenix");
runscript("pw_enablephoenixthinking");
runscript("pw_bluemessagebox");
message("(Whew.. I'm glad I knew the answer\nto that one!");
quit();

[case1_question1]
runscript("pw_enablejudgemad"); // This is our character
runscript("pw_setnameboxtojudge"); // Characters namebox
runscript("setlipsynctochar"); // Set lip-sync to our character. (incase it was unsync'd at some point)
runscript("pw_showmessagebox"); // Show the messagebox (incase it was hidden at some point)
messageauto("Please state the name of\n$c{colorpworange}the defendant$c{colorpwwhite} in this case."); // This is his speech. It's auto so it'll go straight into the question once he's finished speaking.
setvar([pw_maxquestions],4); // We have four possible choices
replacetexture(30500,"choice1-1.png"); // we replace
replacetexture(30501,"choice2-1.png"); // the graphics of the
replacetexture(30502,"choice3-1.png"); // answers accordingly to
replacetexture(30503,"choice4-1.png"); // what we want them to be
setvar([pw_answer],"case1_q1a"); // So in this instance, we will jump to case1_q1aX where X is the choice.
runscript("pw_doquestion"); // run our pretty answer script above.

[case1_q1a1]
runscript("pw_enablejudgeshake");
message("I am sorry, Mr. Wright. That is the wrong choice.\nTry Again.");
runscript("case1_question1");

[case1_q1a2]
runscript("case1_q1a1"); // We decide we don't want different "no" for this one, so we can use the first.

[case1_q1a3]
runscript("pw_enablejudgeshock");
messageauto("I am not the defendant!");
runscript("pw_enablejudgemad");
messageappend("\nTry Again.");
runscript("case1_question1");

[case1_q1a4]
runscript("pw_enablejudgenod");
message("That is correct."); // Because we've been using runscript, it will now go back to where we started this.

[case1_monologue3]
runscript("pw_setnameboxtophoenix");
runscript("setlipsynctonoone");
runscript("pw_showmessagebox");
message("And so, my first\ntrial came to a close.");
message("Larry slapped me on the back\nand said, \"Gee, Nick, it's good\nto have friends!\"");
messageauto("But I'm pretty sure he's not\ngoing to pay me, ");
wait(10);
messageappend("unless you\ncount the clock he gave Mia.");
message("...");
stopmp3(0);
message("I didn't know it then...");
message("but that clock was soon\ngoing to be at the center\nof another incident.");
message("And my promise to tell the\nchief about me and Larry...");
message("would be one promise that\nI wouldn't be able to keep.");
runscript("pw_hidemessagebox");
setbg(30529); // This is a texture with "The End" on it.
setbgsizefromtexture();
placefade("pw_bg","bg",50,"I");
wait(200);
placefade("pw_bg","bg",100,"O");
wait(100);
runscript("pw_hidemessagebox");
runscript("hidepwmenu");
setgenobjsize("aige_fadescreen","genobj",256,384);
runscript("pw_endcase");

[pw_processquestionanswer]
runscript("pw_showselectananswer");
runscript("hidepwmenu");
runscript("pw_setupquestions");
runscript("pw_showquestion");
runscript("pw_processquestionanswerex");
runscript("pw_showadvarrowmenu");

[pw_processquestionanswerex]
definevar([qreplyname],"string"); 
waitsignal("qreply",[pw_questionanswer]);
runscript("pw_hideselectananswer");
//kill al others, but show the one the user clicked!
disablebutton("pw_qreply1");
disablebutton("pw_qreply2");
disablebutton("pw_qreply3");
disablebutton("pw_qreply4");
setvar([qreplyname],"pw_qreply");
appendtostring([qreplyname],[pw_questionanswer]);
enablebutton([qreplyname]);
loadandplaysfx("sfx-selectblip2.wav",0);
placeblink("button",[qreplyname],20,3,0);
wait(21);
placeflip("button",[qreplyname],40,1,-90,0);
wait(11);
runscript("pw_hidequestionex");

[pw_hidequestionex]
runscript("pw_hidecourtrecordbtn");
wait(9);
disablebutton("pw_qreply1");
disablebutton("pw_qreply2");
disablebutton("pw_qreply3");
disablebutton("pw_qreply4");
wait(10);
hidegenobj("pw_scanlines");
hidegenobj("pw_frame");
hidegenobj("pw_eviback");
runscript("pw_allowsaving");

placefade("pw_char", char, 45, "O");

#include(pwlib/pwlib.hlsl)

//general
//[pw_whitemessagebox]
//[pw_bluemessagebox]
//[pw_greenmessagebox]
//[pw_orangemessagebox]
//setmsgboxtextcolor(ALPHA, RED, GREEN, BLUE);
//FIX ISSUE with reload case.
//FIX ISSUE with center text
//FIX ISSUE with fade only top
//FIX ISSUE with typewriter not runing off.
//1 wait = 1/60 second


//startup

[game]
jumptoscript("setup");

[setup]
runscript("pw_initpwlib");
runscript("pw_initpwbgs");
setvar([pw_titlescript],"run");
setvar([pw_episodepath],"cust/"); //directory for where custom case selection is.case1.png case1bg.png episode1.png
setvar([pw_episodes],2);
runscript("charcreation");
runscript("loadcustom");
runscript("loadevidence");
runscript("loadprofile");
changetitle("Apollo Justice: Ace Apprentice");
loadandplaymp3("ccbg.mp3",0,"N");
jumptoscript("run");

//load

[loadcustom]
loadtexture(70010,"cust/background-ajlogo.png"); //Logo
loadtexture(70000,"cust/arumajikitroupe.png"); //Trio
loadtexture(70001,"cust/justterrifying.png"); //KGavin end
loadtexture(70011,"cust/placeholder.png"); //Blank
loadtexture(70003,"cust/gavinsister.png"); //currently placeholder, file does not exist
loadtexture(70004,"cust/ohnoesshot.png"); //Trio accident pic
loadtexture(70002,"PW/bg/gs4_klavieroffice.png"); //Galvin Bros. Office (to be modified)
[pw_usepwlogo]
setbg(70010);
setvar([pw_currentbackground],70010);
setbgsizefromtexture();
[pw_usegavinoffice]
setbg(70002);
setvar([pw_currentbackground],70002);
setbgsizefromtexture();
[pw_setnameboxtosystem]
setgenobjtexturecoordinates("pwnamebox",0,0,50,14); //placeholder
showgenobj("pwnamebox");
[loadevidence]
loadtexture(80901,"PW/evidence/lawyer badge.png");
loadtexture(80902,"cust/heartkeys.png");
[loadprofile]
loadtexture(90900,"PW/profile/garyuu.png"); //Kristoph
loadtexture(90901,"PW/profile/minuki.png"); //Trucy
loadtexture(90902,"PW/profile/kyouya.png"); //Klavier
[charcreation]
runscript("pw_createema");
runscript("pw_createtrucy");
runscript("pw_createhobophoenix");
[evidenceprofilecreationcase1]
 setvar([evidencenumber],900);
 setvar([evidencegfs],80901);
 setvar([evidencegfl],80901);
 setvar([evidencesup],0);
 setvar([evidencename],"Attorney's Badge");
 setvar([evidencesdesc],"Type: Other\nOne of my possessions.");
 setvar([evidenceldesc],"This is my defense attorney badge.\nI just got the replacement last week.");
 runscript("createevidence");
 setvar([evidencenumber],901);
 setvar([evidencegfs],80902);
 setvar([evidencegfl],80902);
 setvar([evidencesup],0);
 setvar([evidencename],"Klavier's Keychain");
 setvar([evidencesdesc],"Type: Other\nFound in my office.");
 setvar([evidenceldesc],"A string of keys on a heart shaped keychain");
 runscript("createevidence");
  setvar([profilenumber],800);
 setvar([profilegfs],90900);
 setvar([profilegfl],90900);
 setvar([profilename],"Kristoph Gavin");
 setvar([profilesdesc],"Age: 26\nGender: Male\nOccupation: Defense Attorney");
 setvar([profileldesc],"A calm and collected attorney. \nHas a penchant for Ariadoney nail polish.");
 runscript("createprofile");
 setvar([profilenumber],801);
 setvar([profilegfs],90901);
 setvar([profilegfl],90901);
 setvar([profilename],"Trucy Wright");
 setvar([profilesdesc],"Age: 9\nGender: Female");
 setvar([profileldesc],"A energetic carefree girl.");
 runscript("createprofile");
  setvar([profilenumber],802);
 setvar([profilegfs],90902);
 setvar([profilegfl],90902);
 setvar([profilename],"Klavier Gavin");
 setvar([profilesdesc],"Age: 18\nGender: Male\nOccupation: Prosecutor/ \nRock Band Vocalist");
 setvar([profileldesc],"A young prosecutor known for his honesty.\nKlavier is the vocalist of the Gavinners.");
 runscript("createprofile");
 
[pw_giveevidence]
setvar([pw_headeviaddmsg],"");
setvar([pw_taileviaddmsg]," was added\nto the Court Record.");
runscript("pw_startevidenceadd");

//run


[run]
runscript("pw_usepwlogo");
runscript("pw_showmain");
waitresponse();
runscript("pw_hidemain");
jumptoscript("casemenu");

[casemenu]
runscript("pw_caseselect");
waitresponse();

//case1

[begin_case1]
jumptoscript("casestartprepone");

[casestartprepone]
stopmp3(0);
runscript("evidenceprofilecreationcase1");
setvar([evidencenumber],900);
runscript("addevidence");
setvar([profilenumber],800);
runscript("addprofile");
setvar([profilenumber],802);
runscript("addprofile");
jumptoscript("enterscene1_1");

//intro

[enterscene1_1]
setbg(70011);
loadandplaymp3("case1intro.mp3",0,"N");
wait(25);
placeflash(2);
setbg(70004);
runscript("pw_showmessagebox");
runscript("pw_setnameboxtonoone");
setmsgboxtickersound("null.wav");
runscript("setlipsynctonoone");
messageauto("The death of a mother");
wait(283);
placeflash(2);
setbg(70000);
messageappendauto("\n...fallout of a trio");
wait(282);
placeflash(2);
setbg(70003);
messageappendauto("\n...trajedy of a friend.");
wait(99);
setbg(70011);
messageauto("\n.");
wait(50);
messageappendauto(".");
wait(50);
messageappendauto(".");
wait(50);
messageauto("Little did I know that everything \nwould change.");
wait(60);
messageappendauto(".");
wait(30);
messageappendauto(".");
wait(30);
messageappendauto(".");
wait(10);
setbg(70001);
placefade("pw_bg","bg",50,"I");
messageauto("It was he who introduced me to justice.");
wait(100);
placefade("pw_bg","bg",50,"O");
wait(55);
setbg(70011);
runscript("showpwchar");
runscript("pw_enablehobophoenixnormal"); //Phoenix
placefade("pw_char","char",50,"I");
messageauto("...he who destroyed a dream");
wait(240);
runscript("hidepwchar");
messageauto("...he who took justice away.");
wait(180);
placefade("pw_bg","bg",100,"O");
wait(100);
jumptoscript("case1_scene1_b");
[case1_scene1_b]
runscript("pw_usegavinoffice");
placefade("pw_bg","bg",10,"I");
wait(10);
stopmp3(0);
runscript("showpwmenu");
runscript("pw_settypewritermsgbox");
runscript("pw_greenmessagebox");
message("                       May 24, 8:20 AM \n                   Gavin Bros. Law Office");
runscript("pw_hidemessagebox");
runscript("setlipsynctonoone");
wait(15);
runscript("pw_setnameboxtonoone");
//loadandplaysfx(".wav",0); //find the surprised one
//runscript("setlipsynctochar");
//runscript("showpwchar");
//runscript("pw_enablekyouyanormal"); //Klavier
//runscript("pw_setnameboxtokyouya"); //Klavier
runscript("pw_showmessagebox");
runscript("pw_whitemessagebox");
messageauto("Hey!");
wait(5);
message("Oh, it's you.");
message("I didn't expect you to be here this early,\nKristoph.");
//runscript("pw_setnameboxtokristoph"); //Kristoph
//runscript("setlipsynctonoone"); //disable lip-sync
message("Me? You're usually practicing your guitar\nat this time Klavier.");
//runscript("pw_setnameboxtokyouya");
//runscript("setlipsynctochar");
//runscript("pw_enablekyouyalaugh"); //Klavier
messageauto("Ha ha");
//runscript("pw_enablekyouyanormal");
messageappendauto(", true.");
wait(15);
message("Actually, I'm here because I left the key to\nmy guitar case on the desk yesterday \nand I can't find it.");
message("If you're not doing anything, can you help \nme find it?");
//runscript("setlipsynctonoone);
//runscript("pw_setnameboxtokristoph")
runscript("pw_bluemessagebox");
jumptoscript("kyouya_office_force_examine");

[kyouya_office_force_examine]
message("(Hmm...I think I put a key in the evidence \ndrawer yesterday)");
setbuttonarea("pw_examinearea1",178,192,18,88); //chest of papers
setvar([pw_examinemaxplaces],1); //for now
runscript("hidepwmenu");
runscript("pw_showspecialexamine");
runscript("pw_waitexaminetouch");
if(<compare([pw_examinearea],"equal",1)>,<jumptoscript("kyouya_office_1_2")>,<jumptoscript("kyouya_office_1_1")>);

[kyouya_office_1_1]
runscript("hidepwmenu");
runscript("pw_showadvarrowmenu");
message("(Nope, no keys here.)");
jumptoscript("kyouya_office_force_examine");

[kyouya_office_1_2]
runscript("hidepwmenu");
runscript("pw_showadvarrowmenu");
message("(Found it!)");
setvar([pw_evidtoshowinbox],80902);
runscript("pw_showflyingevidboxleft");
wait(30);
runscript("pw_hideflyingevidboxleft");
setvar([evidencenumber],901);
runscript("addevidence");
setvar([evidencenumber],901);
runscript("pw_giveevidence");
runscript("pw_bluemessagebox");
message("(Now to give it to Klavier.)");
runscript("pw_whitemessagebox");
jumptoscript("kyouya_office_1_3");

[kyouya_office_1_3]
definevar([signal],"int");
 runscript("pw_setnameboxtonoone");
 runscript("pw_greenmessagebox");
 messageauto("(Give Klavier his keys!)");
 runscript("pw_forcepresent");
 waitsignal("advance",[signal]);
 runscript("pw_hidemessagebox");
 runscript("pw_raisetakethat");
 wait(6);
if(<compare([currentitemcode],"equal",901)>,<jumptoscript("kyouya_office_1_5")>,<jumptoscript("kyouya_office_1_4")>);

[kyouya_office_1_4]
runscript("pw_showmessagebox");
runscript("pw_whitemessagebox");
//runscript("pw_setnameboxtokyouya");
message("That's not my keys!");
jumptoscript("kyouya_office_1_3");

[kyouya_office_1_5]
runscript("pw_showmessagebox");
runscript("pw_whitemessagebox");
//runscript("pw_setnameboxtokyouya");
messageauto("Thanks bro,");
wait(50);
messageappendauto("\nI have to go, I'm late for practice already.");
wait(150);
messageauto("By the way, there's a message for \nyou on the computer");
wait(150);
placefade("pw_char", char, 45, "O");
wait(45);
loadandplaymp3("pp.mp3",0,"N");
jumptoscript("kyouya_office_1_6");

[kyouya_office_1_6]
runscript("hidepwmenu");
runscript("pw_hidemessagebox");
setbuttonarea("pw_examinearea1",178,192,18,88); //chest of papers
setvar([pw_examinemaxplaces],1);
setvar([pw_examineexaminefunction],"kyouya_office_investigation_1");
setbuttongraphic("pw_investigmove1",9000,9000);
 setvar([pw_moveoption1],"police_hq_1_1");
 setvar([pw_movemaxplaces],1);
 runscript("pw_showinvestigationhalf");
jumptoscript("pw_investigprocessactions");

[kyouya_office_investigation_1]

//endcase
[endcase1]
runscript("pw_hidemessagebox");
runscript("hidepwmenu");
jumptoscript("pw_endcase");

//case2

[begin_case2]
runscript("case2_setup");
[case2_setup]
jumptoscript("pw_endcase");