Contest: [HACK-A-LONG] Beginners competion! #HA3 Practise your Scripting!~join now!

[Flying Turtle]

After four hours and lots of failures, I finally completed this! Yay, I can script! ^^ When I was learning, I noticed that even though it isn't the easiest thing in the world, scripting isn't so hard as it seems at first glance.

Task 1:

Spoiler:

#dynamic 0x800000
#org @start
lock
faceplayer
msgbox @Finally,[PLAYER]!\nIthought... 0x6
release
end

#org @Finally,[PLAYER]!\nIthought...
= Finally, [PLAYER]!\nI thought you were going to be late!

Task 2:

Spoiler:

#dynamic 0x800100
#org @start
lock
faceplayer
checkflag 0x200
if 0x0 goto @momitem01
msgbox @Sigh...Uh?Whyare... 0x6
release
end

#org @momitem01
msgbox @[PLAYER],Icantbelieve... 0x6
giveitem 0xBD 0x1 MSG_OBTAIN
setflag 0x200
release
end

#org @[PLAYER],Icantbelieve...
= [PLAYER], I can't believe you're\nalready leaving home...\pHere, take this item to give\nyou luck.

#org @Sigh...Uh?Whyare...
= Sigh... Uh? Why are you still\nhere?

Task 3: (This one was really tricky, I needed help :p)

Spoiler:

#dynamic 0x800200
#org @start
lock
faceplayer
checkflag 0x201
if 0x0 goto @PALLETPOKE1
checkflag 0x820
if 0x1 goto @BADGE1BEATEN
msgbox @[rival]:Whatdoyouwantnow?\nDoyou... 0x5
compare LASTRESULT 0x1
if 0x1 goto @RIVAL1
msgbox @[rival]:Hmph.Youknowwhats\ngood... 0x6
release
end


#org @PALLETPOKE1
msgbox @[rival]:Oh,itsyou,[player].\nMygrandpa... 0x6
givepokemon 0x3 0x14 0x1 0x0 0x0 0x0
fanfare 0x13E
msgbox @VENUSAURPALLET 0x4
waitfanfare
closeonkeypress
setflag 0x201
msgbox @VENUSAURPALLETNICK 0x5
compare LASTRESULT 0x1
if 0x1 call @VENUSAURPALLETNICKYES
msgbox @[rival]:Pfft.YourPokemonisso\nstupid... 0x6
release
end

#org @RIVAL1
trainerbattle 0x1 0x146 0x0 @RIVAL1BEFORE @RIVAL1AFTER @RIVAL1BEATEN

#org @RIVAL1BEFORE
= Let's fight then!

#org @RIVAL1AFTER
= Oh. Uhm. Derp.

#org @RIVAL1BEATEN
msgbox @Hmph.YouonlywonbecauseI\ndidnt... 0x6
setflag 0x820
fanfare 0x13E
msgbox @GIVEBADGE1 0x4
waitfanfare
closeonkeypress
release
end

#org @BADGE1BEATEN
msgbox @[rival]:Hmph.Imstillbetter\nthan... 0x6
release
end

#org @VENUSAURPALLETNICKYES
call 0x1A74EB
return

#org @[rival]:Oh,itsyou,[player].\nMygrandpa...
= [rival]: Oh, it's you, [player].\nMy grandpa told me to give you this\lPok\h1Bmon.\p[rival]: It's probably a stupid\nMagikarp or something like it.

#org @VENUSAURPALLET
= [black_fr]You received a Venusaur!

#org @VENUSAURPALLETNICK
= [black_fr]Would you like to give a\nnickname to Venusaur?

#org @[rival]:Pfft.YourPokemonisso\nstupid...
= [rival]: Pfft. Your Pok\h1Bmon is so\nstupid. Just like you.

#org @[rival]:Whatdoyouwantnow?\nDoyou...
= [rival]: What do you want now?\nDo you wanna battle?

#org @[rival]:Hmph.Youknowwhats\ngood...
= [rival]: Hmph. You know what's\ngood for you.

#org @Hmph.YouonlywonbecauseI\ndidnt...
= Hmph. You only won because I\ndidn't attack with my full\lstrength.\pAnyway, I think now I have to give\nyou this.

#org @GIVEBADGE1
= [black_fr][player] received the IDIOTBADGE!

#org @[rival]:Hmph.Imstillbetter\nthan...
= [rival]: Hmph. I'm still better\nthan you.