New World Inc.

[Speedster]

Hey everybody we got some big updates. First off, thanks to our excellent ASM member, sonic1, we are close to inserting the world map. Here is a video showing how the maps will work out: http://www.youtube.com/watch?v=X_bsHWZCEDI The scripts will most likely be turned into level scripts. So as you walk to a new region of the world map a new world map will appear. Next off, if you check the first post you'll see that we are working on the fakedex. Not all sprites are included yet and it will be updated constantly. If you guys have ideas you might want to share say so.

[Ray Maverick]

Thought of announcing the legendaries:


Xo'rath

and



Cyranion

[XxXRy0MaEcHiZenXxX]

Sorry For The Inactive We Have A Retreat And A Christmas Party And So The Sprite Has Arrived!! I Will Do It Now...

[Speedster]

Originally Posted by XxXRy0MaEcHiZenXxX

Sorry For The Inactive We Have A Retreat And A Christmas Party And So The Sprite Has Arrived!! I Will Do It Now...

Now I feel bad for nagging you about the userbar. Next time just tell me. Also if no one has noticed the userbars have been added to the first post. Along with a new section of "Updates" which will show who has the current patch and other things.

[Ray Maverick]

I've made the first town and route, and I'd post it if it wasn't revealing way too much about the hack, lol

But if I have Speedy's permission, k then.

[Speedster]

Originally Posted by Ray Maverick

I've made the first town and route, and I'd post it if it wasn't revealing way too much about the hack, lol

But if I have Speedy's permission, k then.

Ray and I have discussed it and we will not release the maps to everyone.... for now.... Soon we will have a progressing thread hack up as soon as we finish 2 or so more maps and add some scripts and other things!

[Tesbi]

Skill(s):Advanced Scripting/Music Composing/Music Insertion
Proof Of Work:You've seen/heard it but here it is:

Spoiler:

#org $exchange
lock
faceplayer
checkflag 0x1487
if b_false goto $pokeone
checkflag 0x1488
if b_false goto $question2
checkflag 0x1489
if b_false goto $question3
checkflag 0x1490
if b_false goto $question4
checkflag 0x1492
if b_false goto $question5
checkflag 0x1493
if 0x01 goto $after
countpokemon
compare LASTRESULT 0x6
if b_== goto $full
#raw 0x7A 0x9B 0x00
fanfare 0x13E
#raw 0xCA
message $1
$1 1 = \c\h01\h02You received a weird egg from\nGentleman Thomas!
boxset 4
waitfanfare
#raw 0x68
#raw 0xCB
message $58
$58 1 = I've been incubating that egg for\nquite some time!\pI'm just too old to be a Pokémon\ntrainer now!\pSeeing those tremendous skills of\nyours sealed my conclusion of\lhanding it over to you!\pPlease take good care of it!
setflag 0x1493
boxset 6
release
end

#org $after
message $59
$59 1 = I don't have any more challenges\nfor you at the moment.\pFeel free to check-in at a later\ntime!
boxset 6
release
end

#org $prize
#raw 0x7A 0x9B 0x00
fanfare 0x13E
#raw 0xCA
message $60
$60 1 = \c\h01\h02You received a weird egg from\nGentleman Thomas!
boxset 4
waitfanfare
#raw 0x68
#raw 0xCB
message $57
$57 1 = I've been incubating that egg for\nquite some time!\pI'm just too old to be a Pokémon\ntrainer now!\pSeeing those tremendous skills of\nyours sealed my conclusion of\lhanding it over to you!\pPlease take good care of it!
setflag 0x1492
setflag 0x1493
boxset 6
release
end


#org $pokeone
checkflag 0x1491
if 0x01 goto $question
message $2
$2 1 = Greetings, adventurer!\nAre you in search of a quest?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $3
$3 1 = Spiffing!\nYou've come to the right house, hah!\pI've seen kids running around with\nan err\hB0\pPocket Dex?!\pI don't know what this toy is called.\nMumble mumble\hB0\pAnyway!\nThat's not the point!\pThe point is I decided to acquire\none for myself to see what's so\lspecial about them!\pIt turns out I don't actually know\nhow to use it, hah!\pI need to get this thing filled up\na little more so I can show the\lpictures to my grandson.\pCould you kindly help me out?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $4
$4 1 = Oh, how grand!\pMy grandson will be delighted; he\nloves to draw new Pokémon!\pOkay!\pLet's see what you can help me\nwith\hB0
boxset 6
applymovement 1 $move
$move 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $5
$5 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0xCB
message $6
$6 1 = Hmm\hB0\pAh, here it is!
boxset 6
faceplayer
message $7
$7 1 = Could you go and find the Pokémon\nspecified under number 204 and\lbring it to me, please?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $8
$8 1 = Bless you!\pDo return when you have captured\nthe Pokémon.\pGood luck!
boxset 6
setflag 0x1491
release
end

#org $end
message $11
$11 1 = What a pity\hB0\pDo return when you're in need of a\nquest.
boxset 6
release
end

#org $false
message $13
$13 1 = Hmm, it seems like you do not have\nthe Pokémon\hB0\pDo bring it to me when you have\ncaptured it.
boxset 6
release
end

#org $question
message $9
$9 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokeonex
message $10
$10 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $pokeonex
setvar 0x8004 0x204
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movetwo
$movetwo 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $14
$14 1 = \c\h01\h02Pineco registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0xCC 0x00 0x0A 0x03
#raw 0xCB
message $12
$12 1 = Yes, yes, what an interesting\nPokémon!
boxset 6
#raw 0x76
faceplayer
message $15
$15 1 = Well, well, well!\pYou have my sincere gratitude for\nyour efforts!\pPlease, take this as a token of my\nappreciation.
boxset 6
giveitem 0x15 1
message $16
$16 1 = Okay!\nSecond Pokémon!\pLet's hack a quick look here\hB0
boxset 6
applymovement 1 $movetwo
pausemove 0
fanfare 0x13E
#raw 0xCA
message $17
$17 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $18
$18 1 = I'm looking for a Pokémon specified\nunder number 17\hB0\pCould you find it for me?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $19
$19 1 = Marvellous!\pDo bring it here when you have\ncaptured it!
boxset 6
setflag 0x1487
release
end

#org $question2
message $20
$20 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $poketwox
message $21
$21 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $poketwox
setvar 0x8004 0x17
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movethree
$movethree 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $22
$22 1 = \c\h01\h02Pidgeotto registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0x11 0x00 0x0A 0x03
#raw 0xCB
message $23
$23 1 = Impressive! What a divine Pokémon!
boxset 6
#raw 0x76
faceplayer
message $24
$24 1 = Well, it looks like you've completed\nthe second task!\pHere's a little something as a gift\nof praise.
boxset 6
giveitem 0x3 20
message $25
$25 1 = Let's proceed onto Pokémon three,\nshall we?
boxset 6
applymovement 1 $movefour
$movefour 1 ; #binary 0x66 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $26
$26 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $27
$27 1 = Okay!\pThe next Pokémon up is specified\nunder number 294.\pAre you up for the challenge?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $28
$28 1 = How noble!\pAs always, bring the Pokémon to me\nwhen you find it.\pGood luck!
boxset 6
setflag 0x1488
release
end

#org $question3
message $29
$29 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokethreex
message $30
$30 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $pokethreex
setvar 0x8004 0x294
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movefive
$movefive 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $31
$31 1 = \c\h01\h02Dustox registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0x26 0x01 0x0A 0x03
#raw 0xCB
message $32
$32 1 = What a beautiful Pokémon!
boxset 6
#raw 0x76
faceplayer
message $33
$33 1 = You never cease to impress me, young\none.\pHere's one of my old fishing rods,\nI was one of the best anglers back\lin the day, hah hah!
boxset 6
giveitem 0x107 1
message $34
$34 1 = I caught some mighty Magikarp on\nthat beauty!\pEhem!\pAnyway, are you ready for the\npenultimate challenge?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
applymovement 1 $movefive
pausemove 0
fanfare 0x13E
#raw 0xCA
message $35
$35 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $36
$36 1 = All right!\pI'm looking for a Pokémon specified\nunder the number 108!\pI hear it's been seen in Serenity\nField, hah.\pCould you find that Pokémon for me?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $37
$37 1 = You are most gracious, young one!\nI trust you won't keep me waiting!
boxset 6
setflag 0x1489
release
end

#org $question4
message $38
$38 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokefourx
message $39
$39 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $pokefourx
setvar 0x8004 0x108
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movesix
$movesix 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $40
$40 1 = \c\h01\h02Lickitung registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0x6C 0x00 0x0A 0x03
#raw 0xCB
message $41
$41 1 = What a bizzare Pokémon!\nGood job!
boxset 6
#raw 0x76
faceplayer
message $42
$42 1 = So you've almost completed all my\ntasks!\pPlease, take this as a token of\nfriendship! You deserve it!
boxset 6
giveitem 0x13C 1
message $43
$43 1 = TM28 contains Dig!\pYou can dig your way out of deep,\ndark caves or use it to confuse\lyour enemy!\pIt comes in very handy if you want\nto become a Hiker!
boxset 6
pause 0x10
message $44
$44 1 = Hah!\nSo here it is, the final challenge!\pDo you have what it takes?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $45
$45 1 = I'll hold you to that!
boxset 6
applymovement 1 $movesix
pausemove 0
fanfare 0x13E
#raw 0xCA
message $46
$46 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $47
$47 1 = Ehem!\pThe final Pokémon I'd like you to\nbring to me is specified under the\lnumber 212 .\pI heard this Pokémon is tough to\ntame!\pAre you prepared to dive straight\ninto this ultimate task?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $48
$48 1 = That's the spirit!\pI'll bide my time in waiting for\nthis one, hah hah!\pFarewell, adventurer!
boxset 6
setflag 0x1490
release
end

#org $question5
message $49
$49 1 = Welcome back!\nHave you captured the Pokémon yet?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokefivex
message $50
$50 1 = What a shame.\pDo return when you have captured\nthe Pokémon; I'll have something\lgood to give to you.
boxset 6
release
end

#org $pokefivex
setvar 0x8004 0x377
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false2
applymovement 1 $moveseven
$moveseven 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $51
$51 1 = \c\h01\h02Scizor registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0xD4 0x00 0x0A 0x03
#raw 0xCB
message $52
$52 1 = What an awe-inspiring creature!\nYou are a true hero!
boxset 6
#raw 0x76
faceplayer
applymovement 1 $moveeight
$moveeight 1 ; #binary 0x52 0x66 0xFE
pausemove 0
message $53
$53 1 = So you've completed all my tasks!\nCongratulations, adventurer!\pAs promised, here is your gift!
boxset 6
countpokemon
compare LASTRESULT 0x6
if b_<< goto $prize
message $54
$54 1 = It seems your party is full.\nPlease make some room for this gift!
boxset 6
setflag 0x1492
release
end

#org $full
message $55
$55 1 = Your party is full.\nPlease make some room for this gift.
boxset 6
release
end

#org $false2
message $56
$56 1 = Hah hah! You got me excited there!
boxset 6
release
end

#org $script
jingle
message $1
$1 1 = [text]
boxset 6
applymovement 0xFF $move6
$move6 1 ; #binary 0x63 0xFE
special 0x113
applymovement 0x7F $screenright
$screenright 1 ; #binary 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0xFE
pausemove 0
applymovement 10 $move7
$move7 1 ; #binary 0x62 0x04 0xFE
pausemove 0
message $2
$2 1 = [text]
boxset 6
applymovement 10 $move8
$move8 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 7 $move9
$move9 1 ; #binary 0x01 0xFE
applymovement 8 $mai
$mai 1 ; #binary 0x04 0xFE
pausemove 0
message $3
$3 1 = [text]
boxset 6
applymovement 8 $move10
applymovement 7 $move10
$move10 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 5 $move11
$move11 1 ; #binary 0x62 0xFE
pausemove 0
message $4
$4 1 = [text]
boxset 6
applymovement 5 $movet
$movet 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 9 $move
$move 1 ; #binary 0x04 0xFE
pausemove 0
message $6
$6 1 = [text]
boxset 6
applymovement 9 $mover
$mover 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 6 $make
$make 1 ; #binary 0x02 0x65 0xFE
pause 0x20
applymovement 6 $then
$then 1 ; #binary 0x03 0xFE
message $98
$98 1 = [text]
boxset 6
applymovement 9 $move5
applymovement 10 $move5
applymovement 5 $move5
applymovement 7 $move5
applymovement 8 $move5
$move5 1 ; #binary 0x10 0x10 0x10 0x10 0x10 0x13 0x13 0x13 0x13 0xFE
pausemove 0
applymovement 0x7F $screenleft
$screenleft ; #binary 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0xFE
pausemove 0
applymovement 6 $move4
$move4 1 ; #binary 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1D 0x1F 0xFE
pausemove 0
applymovement 0xFF $move5
$move5 1 ; #binary 0x13 0x13 0x13 0xFE
pausemove 0
message $7
$7 1 = [text]
boxset 6
applymovement 6 $final
$final 1 ; #binary 0x20 0x20 0x20 0x1E 0x20 0x20 0x20 0x20 0x20 0xFE
pausemove 0
applymovement 0x7F $finall
$finall 1 ; #binary 0x0B 0x0B 0x0B 0x0B 0xFE
pausemove 0
special 0x114
removesprite 6
removesprite 9
removesprite 10
removesprite 5
removesprite 7
removesprite 8
setflag 0x1410
setflag 0x1411
setflag 0x1412
setflag 0x1413
setflag 0x1414
setflag 0x1415
setvar 0x6032 0x0001
release
end

#org $start
jingle
playsound 0
nop
special 0x113
applymovement 0x7F $screenup
$screenup 1 ; #binary 0x0D 0x0D 0x0E 0x0D 0xFE
pausemove 0
message $1
$1 1 = [private]
boxset 6
applymovement 15 $movee
applymovement 0x7F $movee
$movee 1 ; #binary 0x10 0x13 0x10 0xFE
pausemove 0
playsound 0x133
nop
message $2
$2 1 = [private]
boxset 6
applymovement 0xFF $move
$move 1 ; #binary 0x62 0xFE
pausemove 0
applymovement 0x7F $moveee
$moveee 1 ; #binary 0x08 0xFE
message $3
$3 1 = [private]
boxset 6
applymovement 0xFF $move1
$move1 1 ; #binary 0x63 0xFE
pausemove 0
message $4
$4 1 = [private]
boxset 6
applymovement 14 $movet
applymovement 15 $movet
applymovement 16 $movet
$movet 1 ; #binary 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0xFE
pausemove 0
special 0x114
fadesound 0x125
nop
removesprite 14
removesprite 15
removesprite 16
setflag 0x1419
setflag 0x1420
setflag 0x1421
setvar 0x6034 0x0001
release
end

Obviously the music is private.
Experience:You already know.
Time Zone:GMT-1, England
Contact Info (Optional):[email protected] (you have it)

[Speedster]

Originally Posted by Tesbi

Skill(s):Advanced Scripting/Music Composing/Music Insertion
Proof Of Work:You've seen/heard it but here it is:

Spoiler:

#org $exchange
lock
faceplayer
checkflag 0x1487
if b_false goto $pokeone
checkflag 0x1488
if b_false goto $question2
checkflag 0x1489
if b_false goto $question3
checkflag 0x1490
if b_false goto $question4
checkflag 0x1492
if b_false goto $question5
checkflag 0x1493
if 0x01 goto $after
countpokemon
compare LASTRESULT 0x6
if b_== goto $full
#raw 0x7A 0x9B 0x00
fanfare 0x13E
#raw 0xCA
message $1
$1 1 = \c\h01\h02You received a weird egg from\nGentleman Thomas!
boxset 4
waitfanfare
#raw 0x68
#raw 0xCB
message $58
$58 1 = I've been incubating that egg for\nquite some time!\pI'm just too old to be a Pokémon\ntrainer now!\pSeeing those tremendous skills of\nyours sealed my conclusion of\lhanding it over to you!\pPlease take good care of it!
setflag 0x1493
boxset 6
release
end

#org $after
message $59
$59 1 = I don't have any more challenges\nfor you at the moment.\pFeel free to check-in at a later\ntime!
boxset 6
release
end

#org $prize
#raw 0x7A 0x9B 0x00
fanfare 0x13E
#raw 0xCA
message $60
$60 1 = \c\h01\h02You received a weird egg from\nGentleman Thomas!
boxset 4
waitfanfare
#raw 0x68
#raw 0xCB
message $57
$57 1 = I've been incubating that egg for\nquite some time!\pI'm just too old to be a Pokémon\ntrainer now!\pSeeing those tremendous skills of\nyours sealed my conclusion of\lhanding it over to you!\pPlease take good care of it!
setflag 0x1492
setflag 0x1493
boxset 6
release
end


#org $pokeone
checkflag 0x1491
if 0x01 goto $question
message $2
$2 1 = Greetings, adventurer!\nAre you in search of a quest?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $3
$3 1 = Spiffing!\nYou've come to the right house, hah!\pI've seen kids running around with\nan err\hB0\pPocket Dex?!\pI don't know what this toy is called.\nMumble mumble\hB0\pAnyway!\nThat's not the point!\pThe point is I decided to acquire\none for myself to see what's so\lspecial about them!\pIt turns out I don't actually know\nhow to use it, hah!\pI need to get this thing filled up\na little more so I can show the\lpictures to my grandson.\pCould you kindly help me out?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $4
$4 1 = Oh, how grand!\pMy grandson will be delighted; he\nloves to draw new Pokémon!\pOkay!\pLet's see what you can help me\nwith\hB0
boxset 6
applymovement 1 $move
$move 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $5
$5 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0xCB
message $6
$6 1 = Hmm\hB0\pAh, here it is!
boxset 6
faceplayer
message $7
$7 1 = Could you go and find the Pokémon\nspecified under number 204 and\lbring it to me, please?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $8
$8 1 = Bless you!\pDo return when you have captured\nthe Pokémon.\pGood luck!
boxset 6
setflag 0x1491
release
end

#org $end
message $11
$11 1 = What a pity\hB0\pDo return when you're in need of a\nquest.
boxset 6
release
end

#org $false
message $13
$13 1 = Hmm, it seems like you do not have\nthe Pokémon\hB0\pDo bring it to me when you have\ncaptured it.
boxset 6
release
end

#org $question
message $9
$9 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokeonex
message $10
$10 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $pokeonex
setvar 0x8004 0x204
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movetwo
$movetwo 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $14
$14 1 = \c\h01\h02Pineco registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0xCC 0x00 0x0A 0x03
#raw 0xCB
message $12
$12 1 = Yes, yes, what an interesting\nPokémon!
boxset 6
#raw 0x76
faceplayer
message $15
$15 1 = Well, well, well!\pYou have my sincere gratitude for\nyour efforts!\pPlease, take this as a token of my\nappreciation.
boxset 6
giveitem 0x15 1
message $16
$16 1 = Okay!\nSecond Pokémon!\pLet's hack a quick look here\hB0
boxset 6
applymovement 1 $movetwo
pausemove 0
fanfare 0x13E
#raw 0xCA
message $17
$17 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $18
$18 1 = I'm looking for a Pokémon specified\nunder number 17\hB0\pCould you find it for me?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $19
$19 1 = Marvellous!\pDo bring it here when you have\ncaptured it!
boxset 6
setflag 0x1487
release
end

#org $question2
message $20
$20 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $poketwox
message $21
$21 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $poketwox
setvar 0x8004 0x17
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movethree
$movethree 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $22
$22 1 = \c\h01\h02Pidgeotto registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0x11 0x00 0x0A 0x03
#raw 0xCB
message $23
$23 1 = Impressive! What a divine Pokémon!
boxset 6
#raw 0x76
faceplayer
message $24
$24 1 = Well, it looks like you've completed\nthe second task!\pHere's a little something as a gift\nof praise.
boxset 6
giveitem 0x3 20
message $25
$25 1 = Let's proceed onto Pokémon three,\nshall we?
boxset 6
applymovement 1 $movefour
$movefour 1 ; #binary 0x66 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $26
$26 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $27
$27 1 = Okay!\pThe next Pokémon up is specified\nunder number 294.\pAre you up for the challenge?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $28
$28 1 = How noble!\pAs always, bring the Pokémon to me\nwhen you find it.\pGood luck!
boxset 6
setflag 0x1488
release
end

#org $question3
message $29
$29 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokethreex
message $30
$30 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $pokethreex
setvar 0x8004 0x294
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movefive
$movefive 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $31
$31 1 = \c\h01\h02Dustox registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0x26 0x01 0x0A 0x03
#raw 0xCB
message $32
$32 1 = What a beautiful Pokémon!
boxset 6
#raw 0x76
faceplayer
message $33
$33 1 = You never cease to impress me, young\none.\pHere's one of my old fishing rods,\nI was one of the best anglers back\lin the day, hah hah!
boxset 6
giveitem 0x107 1
message $34
$34 1 = I caught some mighty Magikarp on\nthat beauty!\pEhem!\pAnyway, are you ready for the\npenultimate challenge?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
applymovement 1 $movefive
pausemove 0
fanfare 0x13E
#raw 0xCA
message $35
$35 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $36
$36 1 = All right!\pI'm looking for a Pokémon specified\nunder the number 108!\pI hear it's been seen in Serenity\nField, hah.\pCould you find that Pokémon for me?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $37
$37 1 = You are most gracious, young one!\nI trust you won't keep me waiting!
boxset 6
setflag 0x1489
release
end

#org $question4
message $38
$38 1 = Welcome back!\nDo you have the Pokémon I seek?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokefourx
message $39
$39 1 = Pity.\pDo return when you have captured\nthe Pokémon.
boxset 6
release
end

#org $pokefourx
setvar 0x8004 0x108
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false
applymovement 1 $movesix
$movesix 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $40
$40 1 = \c\h01\h02Lickitung registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0x6C 0x00 0x0A 0x03
#raw 0xCB
message $41
$41 1 = What a bizzare Pokémon!\nGood job!
boxset 6
#raw 0x76
faceplayer
message $42
$42 1 = So you've almost completed all my\ntasks!\pPlease, take this as a token of\nfriendship! You deserve it!
boxset 6
giveitem 0x13C 1
message $43
$43 1 = TM28 contains Dig!\pYou can dig your way out of deep,\ndark caves or use it to confuse\lyour enemy!\pIt comes in very handy if you want\nto become a Hiker!
boxset 6
pause 0x10
message $44
$44 1 = Hah!\nSo here it is, the final challenge!\pDo you have what it takes?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $45
$45 1 = I'll hold you to that!
boxset 6
applymovement 1 $movesix
pausemove 0
fanfare 0x13E
#raw 0xCA
message $46
$46 1 = \c\h01\h02Gentleman Thomas searched through\nthe Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
faceplayer
#raw 0xCB
message $47
$47 1 = Ehem!\pThe final Pokémon I'd like you to\nbring to me is specified under the\lnumber 212 .\pI heard this Pokémon is tough to\ntame!\pAre you prepared to dive straight\ninto this ultimate task?
boxset 5
compare 0x800D 0x0001
if b_false goto $end
message $48
$48 1 = That's the spirit!\pI'll bide my time in waiting for\nthis one, hah hah!\pFarewell, adventurer!
boxset 6
setflag 0x1490
release
end

#org $question5
message $49
$49 1 = Welcome back!\nHave you captured the Pokémon yet?
boxset 5
compare 0x800D 0x0001
if 0x01 goto $pokefivex
message $50
$50 1 = What a shame.\pDo return when you have captured\nthe Pokémon; I'll have something\lgood to give to you.
boxset 6
release
end

#org $pokefivex
setvar 0x8004 0x377
special2 0x800D 0x17C
compare 0x800D 0x1
if b_false goto $false2
applymovement 1 $moveseven
$moveseven 1 ; #binary 0x03 0xFE
pausemove 0
fanfare 0x13E
#raw 0xCA
message $51
$51 1 = \c\h01\h02Scizor registered into Gentleman\nThomas' Pokédex\hB0
boxset 4
waitfanfare
#raw 0x68
#raw 0x75 0xD4 0x00 0x0A 0x03
#raw 0xCB
message $52
$52 1 = What an awe-inspiring creature!\nYou are a true hero!
boxset 6
#raw 0x76
faceplayer
applymovement 1 $moveeight
$moveeight 1 ; #binary 0x52 0x66 0xFE
pausemove 0
message $53
$53 1 = So you've completed all my tasks!\nCongratulations, adventurer!\pAs promised, here is your gift!
boxset 6
countpokemon
compare LASTRESULT 0x6
if b_<< goto $prize
message $54
$54 1 = It seems your party is full.\nPlease make some room for this gift!
boxset 6
setflag 0x1492
release
end

#org $full
message $55
$55 1 = Your party is full.\nPlease make some room for this gift.
boxset 6
release
end

#org $false2
message $56
$56 1 = Hah hah! You got me excited there!
boxset 6
release
end

#org $script
jingle
message $1
$1 1 = [text]
boxset 6
applymovement 0xFF $move6
$move6 1 ; #binary 0x63 0xFE
special 0x113
applymovement 0x7F $screenright
$screenright 1 ; #binary 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0xFE
pausemove 0
applymovement 10 $move7
$move7 1 ; #binary 0x62 0x04 0xFE
pausemove 0
message $2
$2 1 = [text]
boxset 6
applymovement 10 $move8
$move8 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 7 $move9
$move9 1 ; #binary 0x01 0xFE
applymovement 8 $mai
$mai 1 ; #binary 0x04 0xFE
pausemove 0
message $3
$3 1 = [text]
boxset 6
applymovement 8 $move10
applymovement 7 $move10
$move10 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 5 $move11
$move11 1 ; #binary 0x62 0xFE
pausemove 0
message $4
$4 1 = [text]
boxset 6
applymovement 5 $movet
$movet 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 9 $move
$move 1 ; #binary 0x04 0xFE
pausemove 0
message $6
$6 1 = [text]
boxset 6
applymovement 9 $mover
$mover 1 ; #binary 0x02 0xFE
pausemove 0
applymovement 6 $make
$make 1 ; #binary 0x02 0x65 0xFE
pause 0x20
applymovement 6 $then
$then 1 ; #binary 0x03 0xFE
message $98
$98 1 = [text]
boxset 6
applymovement 9 $move5
applymovement 10 $move5
applymovement 5 $move5
applymovement 7 $move5
applymovement 8 $move5
$move5 1 ; #binary 0x10 0x10 0x10 0x10 0x10 0x13 0x13 0x13 0x13 0xFE
pausemove 0
applymovement 0x7F $screenleft
$screenleft ; #binary 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0xFE
pausemove 0
applymovement 6 $move4
$move4 1 ; #binary 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F 0x1D 0x1F 0xFE
pausemove 0
applymovement 0xFF $move5
$move5 1 ; #binary 0x13 0x13 0x13 0xFE
pausemove 0
message $7
$7 1 = [text]
boxset 6
applymovement 6 $final
$final 1 ; #binary 0x20 0x20 0x20 0x1E 0x20 0x20 0x20 0x20 0x20 0xFE
pausemove 0
applymovement 0x7F $finall
$finall 1 ; #binary 0x0B 0x0B 0x0B 0x0B 0xFE
pausemove 0
special 0x114
removesprite 6
removesprite 9
removesprite 10
removesprite 5
removesprite 7
removesprite 8
setflag 0x1410
setflag 0x1411
setflag 0x1412
setflag 0x1413
setflag 0x1414
setflag 0x1415
setvar 0x6032 0x0001
release
end

#org $start
jingle
playsound 0
nop
special 0x113
applymovement 0x7F $screenup
$screenup 1 ; #binary 0x0D 0x0D 0x0E 0x0D 0xFE
pausemove 0
message $1
$1 1 = [private]
boxset 6
applymovement 15 $movee
applymovement 0x7F $movee
$movee 1 ; #binary 0x10 0x13 0x10 0xFE
pausemove 0
playsound 0x133
nop
message $2
$2 1 = [private]
boxset 6
applymovement 0xFF $move
$move 1 ; #binary 0x62 0xFE
pausemove 0
applymovement 0x7F $moveee
$moveee 1 ; #binary 0x08 0xFE
message $3
$3 1 = [private]
boxset 6
applymovement 0xFF $move1
$move1 1 ; #binary 0x63 0xFE
pausemove 0
message $4
$4 1 = [private]
boxset 6
applymovement 14 $movet
applymovement 15 $movet
applymovement 16 $movet
$movet 1 ; #binary 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0xFE
pausemove 0
special 0x114
fadesound 0x125
nop
removesprite 14
removesprite 15
removesprite 16
setflag 0x1419
setflag 0x1420
setflag 0x1421
setvar 0x6034 0x0001
release
end

Obviously the music is private.
Experience:You already know.
Time Zone:GMT-1, England
Contact Info (Optional):[email protected] (you have it)

Accepted of course. Hopefully I'll be ready to have you script tommorow.

[Lyzak]

Perhaps I'm late to the party, but I wanted to warn you that both of your maps are built on resolutions too large for FireRed's map (or the game screen!). Maps have to be 24 tiles wide and 18 tiles tall - There are also buffer regions 2 tiles thick on the top, and one tile thick on the bottom, left and right where the game cursor cannot move.

Good luck, btw!

EDIT
Blast it, Tesbi - I was considering asking if you'd consider being a part of my hack project. Oh well, too slow, I guess XD

[Speedster]

Originally Posted by Lyzak

Perhaps I'm late to the party, but I wanted to warn you that both of your maps are built on resolutions too large for FireRed's map (or the game screen!). Maps have to be 24 tiles wide and 18 tiles tall - There are also buffer regions 2 tiles thick on the top, and one tile thick on the bottom, left and right where the game cursor cannot move.

Good luck, btw!

EDIT
Blast it, Tesbi - I was considering asking if you'd consider being a part of my hack project. Oh well, too slow, I guess XD

Well as a matter of fact, thanks to our amazing ASMer, sonic1, we WILL be able to insert BOTH world maps with very few issues. The Region of Altica will grow larger so it fits well onto 4 different maps and a level script will change the world map as you reach a new area or world map. So we'll have no problems inserting it. Just you see!

[Lyzak]

I guess I will.

I have no such talent or talented staff, and am quite envious. =\

[Speedster]

Originally Posted by Lyzak

I guess I will.

I have no such talent or talented staff, and am quite envious. =\

I doubt you are totally unskilled but I was lucky to get the team I had today. Without them I'd be nothing. We are planning on making a lot of people envious with out hack

[UnForgiven*]

a job for me???????????!!!!!?

[Ray Maverick]

Originally Posted by Speedster

Accepted of course. Hopefully I'll be ready to have you script tommorow.

First we'll have to plan the events and sprite the whale Pokemon that will be resting around the peninsula.

[Lyzak]

Originally Posted by Speedster

I doubt you are totally unskilled but I was lucky to get the team I had today. Without them I'd be nothing. We are planning on making a lot of people envious with out hack

Heh heh - I certainly didn't say I'm untalented. I consider myself incredibly skilled with the creative applications of game design, such as mapping, art, music and story design. However, I can't do anything with these applications because I don't know how the process works mechanically (I cannot script, ASM, ect - plus, I'm lacking most of the vital tools, because my base OS is a Mac, and I have no sound on my windows side).

But yeah - a team is everything. My hack won't get past planning stage because I don't have one X\

[sonic1]

Hey guys, a couple days ago, Speedster asked me too do a grayscale hack for our hack, maybe for cutscenes/flashbacks or something like that. Well, here it is:
http://www.youtube.com/watch?v=CZBzIFQwtME

I was able to do it Sepia too! Tell me what you think.

~Sonic1

[Speedster]

Originally Posted by sonic1

Hey guys, a couple days ago, Speedster asked me too do a grayscale hack for our hack, maybe for cutscenes/flashbacks or something like that. Well, here it is:
http://www.youtube.com/watch?v=CZBzIFQwtME

I was able to do it Sepia too! Tell me what you think.

~Sonic1

Very excellent. This will help with seens in which you see the future and past. We will be to do a lot. Thanks so much sonic!

[Speedster]

Hey guys. Sorry for the inactivity...well on this thread at least. We still have been hard at work with great progress. HGSS OWs and indoor tiles are being inserted. New ASM routines are being made and so forth. We still are in desperate need of a very talented pixel artist/spriter to help Ray. So come on and sign up!

[Toomsey]

Is this hack still ongoing?

[giradialkia]

Hi Toomsey- unfortunately, your post revived this thread. There's a revival limit in Team Discussions, and if over two months has passed since the last valid post was made (valid meaning undeleted), then you cannot post in the thread unless you are its owner and have some kind of update to make.
Speedster, if you have such an update you'd like to post, just contact either DrFuji or myself to have this thread reopened. In the meantime, it's closed.
Closed~