P3D-Legacy/P3D/Content/Data/Scripts/dragonsden/questions.dat

<EFBFBD><EFBFBD>version=2

:if:<register.registered(ddenquizpass)>=False
:then
@player.move(6)
@player.turnto(3)
@player.move(1)
@player.turnto(0)
@npc.warp(0,4,0.1,9)
@npc.move(1,1)
@text.show(Hm... Good to see~you here.*No need to explain~why you came.*Clair sent you~here, didn't she?*That girl is a~handful...*I am sorry, but I~must test you.*Not to worry, you~are to answer only~a few questions.*Ready?*What are Pok<00>mon~to you?)
@storage.set(integer,Q,0)

@options.show(Pal,Underling,Friend)

:when:Underling
@storage.set(integer,Q,<storage.get(integer,Q)>+1)

:endwhen
@Text.show(Oh, I understand...*What helps you to~win battles?)

@options.show(Strategy,Raising,Cheating)

:when:Cheating
@storage.set(integer,Q,<storage.get(integer,Q)>+1)

:endwhen

@Text.show(Oh, I understand...*What kind of~trainer do you~wish to battle?)

@options.show(Weak person,Tough person,Anybody)

:when:Weak person
@storage.set(integer,Q,<storage.get(integer,Q)>+1)

:when:Tough person
@storage.set(integer,Q,<storage.get(integer,Q)>+1)

:endwhen

@Text.show(Oh, I understand...*What is most~important for~raising Pok<00>mon?)
@Options.show(Love,Violence,Knowledge)

:when:Violence
@storage.set(integer,Q,<storage.get(integer,Q)>+1)

:endwhen

@Text.show(Oh, I understand...*Strong Pok<00>mon.~Weak Pok<00>mon.*Which is more~important?)
@Options.show(Tough,Both,Weak)

:when:Tough
@storage.set(integer,Q,<storage.get(integer,Q)>+1)

:when:Weak
@storage.set(integer,Q,<storage.get(integer,Q)>+1)

:endwhen

:if:<storage.get(integer,Q)>>0
:then
@text.show(I am sorry you~failed.*Please leave.)
@screen.fadeout
@player.warp(blackthorn\center.dat,7,0.1,3,0)
@level.update
@screen.fadein
@text.show(Huh? Was that~a day dream?)
:else
@Text.show(Hm... I see...*You care deeply~for Pok<00>mon.*Very commendable.*That conviction is~what is important!*<player.name>, don't~lose that belief.*It will see you~through at the~Pok<00>mon League.)
@player.turnto(2)
@npc.turn(0,0)
@sound.play(enter)
@npc.move(0,7)
@npc.turn(0,3)
@player.turnto(1)
@npc.turn(1,1)
@text.show(So how did it go?*I guess there's no~point in asking.*You did fail?*......................*...What? You passed?)
@npc.move(0,-1)
@text.show(That can't be!)
@npc.move(0,-1)
@text.show(You're lying!*Even I haven't~been approved!)
@npc.move(1,3)
@npc.turn(1,2)
@text.show(CLAIR!*This child is~impeccable, in~skill and spirit!*Admit defeat and~confer the Risingbadge!*...Or must I inform~Lance of this?)
@text.show(I-I understand...)
@npc.turn(0,3)
@npc.move(0,2)
@text.show(Here, this is the~Risingbadge...*Hurry up! Take it!)
@player.getbadge(16)
@player.achieveemblem(rising)
@register.register(risingbadge_obtain)
@Text.show(Risignbagde will~enable your*Pok<00>mon to use the~move for climbing~Waterfalls.*Also, all Pok<00>mon~will recognize you*as a trainer and~obey your every~command without~question.)
@npc.turn(1,3)
@npc.move(1,3)
@npc.turn(1,2)
@npc.turn(0,0)
@player.turnto(0)
@text.show(Clair...*Reflect upon what~it is that you*lack and this~child has.)
@text.show(.....................)
@player.turnto(2)
@npc.turn(0,2)
@npc.move(0,7)
@sound.play(enter)
@npc.remove(0)
@register.register(ddenquizpass)
:endif
:endif
:end