The PokéCommunity Forums  

Go Back   The PokéCommunity Forums > Members List
Sign Up Rules/FAQ Live Battle Blogs Mark Forums Read

Notices

sonic1's Profile Picture

sonic1 sonic1 is offline

ASM is my life now...

Visitor Messages

Showing Visitor Messages 11 to 20 of 138
  1. tajaros
    December 6th, 2012 03:07 AM
    tajaros
    Can you understand what I'm saying? lol. xD

  2. tajaros
    December 5th, 2012 05:40 AM
    tajaros
    I can't really explain that clearly w/o a script but anyways here's the thing that I want.

    First it tries to record the time that you accessed or created your account and stores it to a variable or something like that to save the Information. I don't really know I could do that practically I just want a script that let's you store money and have interest like 3% per week or something like that. I also want the function to let you take money and get money from the balance you have in the bank.

    The script that I want is just like something that happens to the money in real-life banks... :3

  3. tajaros
    December 5th, 2012 04:09 AM
    tajaros
    Ok, I'll explain it to you in a little while.

  4. redriders180
    December 3rd, 2012 08:38 PM
    redriders180
    It worked fine for WesleyFG in LightPlatinum, and they work for me as well...

  5. tajaros
    December 3rd, 2012 02:22 PM
    tajaros
    I just wanted to make those vars, comparing and writebytyetoooffset, in a ASM routine so I'll just run the callasm command.

  6. tajaros
    December 3rd, 2012 05:06 AM
    tajaros
    NarutoActor provided me with a script for a banking script that makes you create an account and store money and checks the money you have stored.

    Here's the script which I fixed some pointers and messages but sadly still doesn't work for me NarutoActor said he made it worked before but when he learned ASM he made one for it I'm not sure if he has the routine for it.

    Anyways here's the script:
    Spoiler:
    #dynamic 0x800000

    #org @bank
    lock
    checkflag 0x60C
    if 0x0 goto @create
    msgbox @greets 0x4
    closeonkeypress
    checkgender
    compare 0x800D 0x0
    if 0x1 goto @boy
    compare 0x800D 0x1
    if 0x1 goto @girl
    end


    #org @boy
    msgbox @welboy 0x4
    closeonkeypress
    goto @update

    #org @girl
    msgbox @welgirl 0x4
    closeonkeypress
    goto @update

    #org @update
    copybyte 0x202E598 0x300553C
    copyvar 0x5008 0x8000
    Writebytetooffset 0x08 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x06 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3F 'Subtracts vars Ex 5008=20(2020)-5006(2010)=10 5008=10
    copyvar 0x5006 0x5008
    compare 0x5008 0x0
    if 0x1 goto @mul1
    compare 0x5008 0x1
    if 0x1 goto @mul2
    compare 0x5008 0x2
    if 0x1 goto @mul3
    compare 0x5008 0x3
    if 0x1 goto @mul4
    compare 0x5008 0x4
    if 0x1 goto @mul5
    compare 0x5008 0x5
    if 0x1 goto @mul6
    compare 0x5008 0x6
    if 0x1 goto @mul7
    compare 0x5008 0x7
    if 0x1 goto @mul8
    compare 0x5008 0x8
    if 0x1 goto @mul9
    compare 0x5008 0x9
    if 0x1 goto @mulA
    goto @erro
    end

    #org @mul1
    setvar 0x5009 0x1
    goto @daycheck

    #org @mul2
    setvar 0x5009 0x2
    goto @daycheck

    #org @mul3
    setvar 0x5009 0x3
    goto @daycheck

    #org @mul4
    setvar 0x5009 0x4
    goto @daycheck

    #org @mul5
    setvar 0x5009 0x5
    goto @daycheck

    #org @mul6
    setvar 0x5009 0x6
    goto @daycheck

    #org @mul7
    setvar 0x5009 0x7
    goto @daycheck

    #org @mul8
    setvar 0x5009 0x8
    goto @daycheck

    #org @mul9
    setvar 0x5009 0x9
    goto @daycheck

    #org @mulA
    setvar 0x5009 0xA
    goto @daycheck

    #org @daycheck
    copybyte 0x202E59A 0x300553F
    copybyte 0x202E59C 0x3005540
    copyvar 0x500A 0x8002
    compare 0x8001 0x0
    if 0x1 goto @erro
    compare 0x8001 0x2
    if 0x1 goto @jan2
    compare 0x8001 0x3
    if 0x1 goto @feb2
    compare 0x8001 0x4
    if 0x1 goto @mar2
    compare 0x8001 0x5
    if 0x1 goto @apr2
    compare 0x8001 0x6
    if 0x1 goto @may2
    compare 0x8001 0x7
    if 0x1 goto @jun2
    compare 0x8001 0x8
    if 0x1 goto @jul2
    compare 0x8001 0x9
    if 0x1 goto @aug2
    compare 0x8001 0xA '10
    if 0x1 goto @stp2
    compare 0x8001 0xB '11
    if 0x1 goto @oct2
    compare 0x8001 0xC '12
    if 0x1 goto @nov2
    compare 0x8001 0xD
    if 0x4 goto @erro
    setvar 0x500B 0x16D 'one year, 365 days.
    Writebytetooffset 0x09 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0B 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x40 '5009x500B(year multiply by 365)
    Writebytetooffset 0x09 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0B 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3F
    Writebytetooffset 0x07 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x09 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3E
    Writebytetooffset 0x07 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0A 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3F
    goto @status

    #org @status
    compare 0x500D 0x0
    if 0x4 goto @nostatus
    compare 0x500D 0x64
    if 0x4 goto @setbasic
    compare 0x500D 0x1F4
    if 0x4 goto @setbrown
    compare 0x500D 0x3E8
    if 0x4 goto @setintermeidate
    compare 0x500D 0x1388
    if 0x4 goto @setsilver
    compare 0x500D 0x2710
    if 0x4 goto @setgold
    compare 0x500D 0xC350
    if 0x4 goto @setplatinum
    compare 0x500D 0xEA60
    if 0x4 goto @setmax
    goto @finalcheck

    #org @nostatus
    setvar 0x500C 0x2
    return

    #org @setbasic
    setvar 0x500C 0x6
    return

    #org @setbrown
    setvar 0x500C 0x14
    return

    #org @setintermeidate
    setvar 0x500C 0x50
    return

    #org @setsilver
    setvar 0x500C 0xFA '25,000 in intest if you have 500,000 per day :D
    return

    #org @setgold
    setvar 0x500C 0x320
    return

    #org @setplatinum
    setvar 0x500C 0x5DC
    return

    #org @setmax
    setvar 0x500D 0xEA60 'no need for intrest the acount is already at it's max.
    goto @wowmax

    #org @wowmax
    msgbox @ful 0x4
    closeonkeypress
    checkflag 0x60D
    if 0x1 goto @continue
    msgbox @egg 0x4
    closeonkeypress
    giveegg 0xAF 'togepi
    fanfare 0x13E 'Little cute music that plays when ever you get things.
    waitfanfare
    msgbox @give 0x4
    closeonkeypress
    setflag 0x60D
    goto @continue

    #org @finalcheck
    Writebytetooffset 0x07 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0C 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x40 '5007x500C amount of intest
    Writebytetooffset 0x0D 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x07 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3E '500D+5007 adds amount of intest gained to balance
    goto @continue

    #org @create
    showmoney 0x0 0x0 0x0
    msgbox @do 0x5
    compare 0x800D 0x1
    if 0x1 goto @yes
    compare 0x800D 0x0
    if 0x1 goto @no
    end

    #org @yes
    checkmoney 0x1388 0x0 'checks if player has 5000
    compare 0x800D 0x1
    if 0x4 goto @continue
    msgbox @notenough 0x4
    closeonkeypress
    hidemoney 0x0 0x0
    release
    end

    #org @no
    msgbox @sorry 0x4
    hidemoney 0x0 0x0
    closeonkeypress
    release
    end

    #org @continue
    paymoney 0x1388 0x0
    setflag 0x60C
    copybyte 0x202E598 0x300553C
    copyvar 0x5006 0x8000
    msgbox @thk 0x4
    closeonkeypress
    copybyte 0x202E59A 0x300553F
    copybyte 0x202E59C 0x3005540
    copyvar 0x5007 0x8002
    compare 0x8001 0x0
    if 0x1 goto @erro
    compare 0x8001 0x2
    if 0x1 goto @jan
    compare 0x8001 0x3
    if 0x1 goto @feb
    compare 0x8001 0x4
    if 0x1 goto @mar
    compare 0x8001 0x5
    if 0x1 goto @apr
    compare 0x8001 0x6
    if 0x1 goto @may
    compare 0x8001 0x7
    if 0x1 goto @jun
    compare 0x8001 0x8
    if 0x1 goto @jul
    compare 0x8001 0x9
    if 0x1 goto @aug
    compare 0x8001 0xA '10
    if 0x1 goto @stp
    compare 0x8001 0xB '11
    if 0x1 goto @oct
    compare 0x8001 0xC '12
    if 0x1 goto @nov
    compare 0x8001 0xD
    if 0x4 goto @erro
    release
    end

    #org @jan
    addvar 0x5007 0x1F
    return

    #org @feb
    addvar 0x5007 0x3B
    return

    #org @mar
    addvar 0x5007 0x5A
    return

    #org @apr
    addvar 0x5007 0x78
    return

    #org @may
    addvar 0x5007 0x97
    return

    #org @jun
    addvar 0x5007 0xB5
    return

    #org @jul
    addvar 0x5007 0xD4
    return

    #org @aug
    addvar 0x5007 0xF3
    return

    #org @stp
    addvar 0x5007 0x111
    return

    #org @oct
    addvar 0x5007 0x130
    return

    #org @nov
    addvar 0x5007 0x14E
    return

    #org @jan2
    addvar 0x500A 0x1F
    return

    #org @feb2
    addvar 0x500A 0x3B
    return

    #org @mar2
    addvar 0x500A 0x5A
    return

    #org @apr2
    addvar 0x500A 0x78
    return

    #org @may2
    addvar 0x500A 0x97
    return

    #org @jun2
    addvar 0x500A 0xB5
    return

    #org @jul2
    addvar 0x500A 0xD4
    return

    #org @aug2
    addvar 0x500A 0xF3
    return

    #org @stp2
    addvar 0x500A 0x111
    return

    #org @oct2
    addvar 0x500A 0x130
    return

    #org @nov2
    addvar 0x500A 0x14E
    return

    #org @erro
    msgbox @need 0x4
    hidemoney 0x0 0x0
    closeonkeypress
    release
    end

    #org @give
    = \v\h01 received a Togepi Egg!

    #org @egg
    = My manager said to give this to\nthe first person who ever maxes\lthere account out.\pCongratulations!\pPlease accept, this gift as a\ntoken of our appreciation.

    #org @ful
    = Wow, looks like you have reached\nthe maximum amount of money that\lone person can store.\pGiggle, you should take me out on\na date sometimes, since you have\lall that money.\pMy gosh, you have a total of\n6,000,000 Poké Dollars in the\lbank.\pThank you for Banking in\nMesotopia, we are grateful for\lyour transaction with us.

    #org @welboy
    = How may I help you Sir?

    #org @welgirl
    = How may I help you Ma'dam?

    #org @need
    = There is an ERROR.\pFor this script to run properly\nyou need Interdepth's Real Time\lClock, and Jpans FireRed Hack\lEngine Applied.\pPlease contact NarutoActor with\nany problems you have encountered\lwith this script.

    #org @thk
    = Thank you very much.\pYou now have an acount.\pFeel free to deposit money,\nwithdraw money, use our world wide\lATM's and most of all, have fun\lbanking with Mesotopia.

    #org @sorry
    = I am sorry you feel that way.\pIf you change your mind, do not\nhesitate to come back.

    #org @do
    = Welcome to Mesotopia Bank.\pI see you do not have an account\nhere with us.\pDo you want to open an account, it\nis only cost \hB75,000.\pOnce you open an account you can\nstart earning interest, it\lpractically pays for itself.\pSo, What do you say, can you agree\nto that?

    #org @greets
    = Hello, and Welcome back to\nMesotopia Grand Bank.

    #org @notenough
    = I am sorry, but you do not have\nenough money to start an account.\pPlease, come again.


    And if you want a script with an explanation here but it's quite unorganized and has grammar mistakes.
    Spoiler:
    #dynamic 0x750000
    #org @bank
    lock
    checkflag 0x60C 0x1 'if account has been made.
    if 0x0 goto @create 'to creat an account.
    msgbox @greets MSG_KEEPOPEN
    closeonkeypress
    checkgender
    compare 0x800D 0x0
    if 0x1 goto @boy
    compare 0x800D 0x1
    if 0x1 goto @girl
    end


    #org @boy
    msgbox @welboy MSG_KEEPOPEN
    closeonkeypress
    goto @update

    #org @girl
    msgbox @welgirl MSG_KEEPOPEN
    closeonkeypress
    goto @update

    #org @update
    copybyte 0x202E598 0x300553C 'Year DA=10 Also Stores the Year in a temperary Var (0x8000)
    copyvar 0x5008 0x8000 ' Copys the temperary var and stores it in a normal var Using this var as current year and comparing it to last updated year(5006)
    Writebytetooffset 0x08 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x06 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3F 'Subtracts vars Ex 5008=20(2020)-5006(2010)=10 5008=10
    copyvar 0x5006 0x5008 'This makes the current year the last updated year
    compare 0x5008 0x0
    if true goto @mul1 'gose to comparing seting var 0x5009 so the day var can be multipyed by one(witch will keep the day the same because 2010-2010=0 so we will not be adding more days since the year has been the same since last checked
    compare 0x5008 0x1
    if true goto @mul2
    compare 0x5008 0x2
    if true goto @mul3
    compare 0x5008 0x3
    if true goto @mul4
    compare 0x5008 0x4
    if true goto @mul5
    compare 0x5008 0x5
    if true goto @mul6
    compare 0x5008 0x6
    if true goto @mul7
    compare 0x5008 0x7
    if true goto @mul8
    compare 0x5008 0x8
    if true goto @mul9
    compare 0x5008 0x9
    if true goto @mulA
    goto @erro ' the erro can be trigered if the player last updated 10 or more years ago, but seriously would that ever happend.

    #org @mul1
    setvar 0x5009 0x1
    goto @daycheck

    #org @mul2
    setvar 0x5009 0x2 'Later we will take this var and multiply it by the subtracted day var
    goto @daycheck

    #org @mul3
    setvar 0x5009 0x3
    goto @daycheck

    #org @mul4
    setvar 0x5009 0x4
    goto @daycheck

    #org @mul5
    setvar 0x5009 0x5
    goto @daycheck

    #org @mul6
    setvar 0x5009 0x6
    goto @daycheck

    #org @mul7
    setvar 0x5009 0x7
    goto @daycheck

    #org @mul8
    setvar 0x5009 0x8
    goto @daycheck

    #org @mul9
    setvar 0x5009 0x9
    goto @daycheck

    #org @mulA 'you can go up to mulB3 which is means the last update was made 179 years ago. 179x365=65,335 in hex 0xFF37 for space purposes I am stoping at 10 years since last update. Come on really who would play a hack go to the bank stop playing put it on again 11 years lator and start playing.
    setvar 0x5009 0xA
    goto @daycheck

    #org @daycheck
    copybyte 0x202E59A 0x300553F 'copys the month and stores it in a temperary var (0x8001)
    copybyte 0x202E59C 0x3005540 'copys the day and stores it in a tempary var (0x8002)
    copyvar 0x500A 0x8002
    compare 0x8001 0x0
    if 0x1 goto @erro
    compare 0x8001 0x2
    if 0x1 goto @jan2
    compare 0x8001 0x3
    if 0x1 goto @feb2
    compare 0x8001 0x4
    if 0x1 goto @mar2
    compare 0x8001 0x5
    if 0x1 goto @apr2
    compare 0x8001 0x6
    if 0x1 goto @may2
    compare 0x8001 0x7
    if 0x1 goto @jun2
    compare 0x8001 0x8
    if 0x1 goto @jul2
    compare 0x8001 0x9
    if 0x1 goto @aug2
    compare 0x8001 0xA '10
    if 0x1 goto @stp2
    compare 0x8001 0xB '11
    if 0x1 goto @oct2
    compare 0x8001 0xC '12
    if 0x1 goto @nov2
    compare 0x8001 0xD
    if 0x4 goto @erro
    setvar 0x500B 0x16D 'one year, 365 days.
    Writebytetooffset 0x09 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0B 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x40 '5009x500B(year multiply by 365)
    Writebytetooffset 0x09 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0B 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3F '5009-500B amount of days minous 365( so if there is one year 1x365=365 365-360=0 this may seem dumb but this is to prevent multiplying by 0
    Writebytetooffset 0x07 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x09 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3E '5007+5009 last record day pluse amount of days since year
    Writebytetooffset 0x07 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0A 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3F '5007-500A last record day minus just recored
    goto @status

    #org @status
    compare 0x500D 0x0
    if 0x4 goto @nostatus
    compare 0x500D 0x64
    if 0x4 goto @setbasic
    compare 0x500D 0x1F4
    if 0x4 goto @setbrown
    compare 0x500D 0x3E8
    if 0x4 goto @setintermeidate
    compare 0x500D 0x1388
    if 0x4 goto @setsilver
    compare 0x500D 0x2710
    if 0x4 goto @setgold
    compare 0x500D 0xC350
    if 0x4 goto @setplatinum
    compare 0x500D 0xEA60
    if 0x4 goto @max
    goto @finalcheck

    #org @nostatus
    setvar 0x500C 0x2
    return

    #org @setbasic
    setvar 0x500C 0x6
    return

    #org @setbrown
    setvar 0x500C 0x14
    return

    #org @setintermeidate
    setvar 0x500C 0x50
    return

    #org @setsilver
    setvar 0x500C 0xFA '25,000 in intest if you have 500,000 per day :D
    return

    #org @setgold
    setvar 0x500C 0x320
    return

    #org @setplatinum
    setvar 0x500C 0x5DC
    return

    #org @setmax
    setvar 0x500D 0xEA60 'no need for intrest the acount is already at it's max.
    goto @wowmax

    #org @wowmax
    msgbox @ful MSG_KEEPOPEN
    closeonkeypress
    checkflag 0x60D
    if true goto @howmayhelp
    msgbox @egg MSG_KEEPOPEN
    closeonkeypress
    giveegg 0xAF 'togepi
    fanfare 0x13E 'Little cute music that plays when ever you get things.
    waitfanfare
    msgbox @give MSG_KEEPOPEN
    closeonkeypress
    setflag 0x60D
    goto @howmayhelp


    goto @finalcheck
    Writebytetooffset 0x07 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x0C 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x40 '5007x500C amount of intest
    Writebytetooffset 0x0D 0x0203f4d8
    Writebytetooffset 0x50 0x0203f4d9
    Writebytetooffset 0x07 0x0203f4da
    Writebytetooffset 0x50 0x0203f4db
    special 0x3E '500D+5007 adds amount of intest gained to balance
    goto @howmayhelp



    #org @creat
    showmoney 0x0 0x0 0x0
    msgbox @do 0x5
    compare LASTRESULT 0x1
    if 0x1 goto @yes
    compare LASTRESULT 0x0
    if 0x1 goto @no
    end

    #org @yes
    checkmoney 0x1388 0x0 'checks if player has 5000
    compare LASTRESULT 0x1
    if 0x4 goto @continue
    msgbox @notenough MSG_KEEPOPEN
    closeonkeypress
    release
    end

    #org @no
    msgbox @sorry MSG_KEEPOPEN
    closeonkeypress
    release
    end

    #org @continue
    paymoney 0x1388 0x0
    setflag 0x60C 'Acount is now opened
    copybyte 0x202E598 0x300553C 'Year DA=10 Also Stores the Year in a temperary Var (0x8000)
    copyvar 0x5006 0x8000 ' Copys the temperary var and stores it in a normal var
    msgbox @thk MSG_KEEPOPEN
    closeonkeypress
    copybyte 0x202E59A 0x300553F 'copys the month and stores it in a temperary var (0x8001)
    copybyte 0x202E59C 0x3005540 'copys the day and stores it in a tempary var (0x8002)
    copyvar 0x5007 0x8002
    compare 0x8001 0x0
    if 0x1 goto @erro
    compare 0x8001 0x2
    if 0x1 goto @jan
    compare 0x8001 0x3
    if 0x1 goto @feb
    compare 0x8001 0x4
    if 0x1 goto @mar
    compare 0x8001 0x5
    if 0x1 goto @apr
    compare 0x8001 0x6
    if 0x1 goto @may
    compare 0x8001 0x7
    if 0x1 goto @jun
    compare 0x8001 0x8
    if 0x1 goto @jul
    compare 0x8001 0x9
    if 0x1 goto @aug
    compare 0x8001 0xA '10
    if 0x1 goto @stp
    compare 0x8001 0xB '11
    if 0x1 goto @oct
    compare 0x8001 0xC '12
    if 0x1 goto @nov
    compare 0x8001 0xD
    if 0x4 goto @erro
    release
    end

    #org @jan
    addvar 0x5007 0x1F 'adds all days in january to the day var. Giving us the amount of days in the year. Instead of month.
    return

    #org @feb
    addvar 0x5007 0x3B 'adds all of Jan + Feb togehter and adds that to the day var.
    return

    #org @mar
    addvar 0x5007 0x5A
    return

    #org @apr
    addvar 0x5007 0x78
    return

    #org @may
    addvar 0x5007 0x97
    return

    #org @jun
    addvar 0x5007 0xB5
    return

    #org @jul
    addvar 0x5007 0xD4
    return

    #org @aug
    addvar 0x5007 0xF3
    return

    #org @stp
    addvar 0x5007 0x111
    return

    #org @oct
    addvar 0x5007 0x130
    return

    #org @nov
    addvar 0x5007 0x14E
    return

    #org @jan2
    addvar 0x500A 0x1F
    return

    #org @feb2
    addvar 0x500A 0x3B
    return

    #org @mar2
    addvar 0x500A 0x5A
    return

    #org @apr2
    addvar 0x500A 0x78
    return

    #org @may2
    addvar 0x500A 0x97
    return

    #org @jun2
    addvar 0x500A 0xB5
    return

    #org @jul2
    addvar 0x500A 0xD4
    return

    #org @aug2
    addvar 0x500A 0xF3
    return

    #org @stp2
    addvar 0x500A 0x111
    return

    #org @oct2
    addvar 0x500A 0x130
    return

    #org @nov2
    addvar 0x500A 0x14E
    return

    #org @erro
    msgbox @need MSG_KEEPOPEN
    release
    end

    #org @give
    = [PLAYER] Recevied a togipe egg!

    #org @egg
    = My maniger said to give this to\nthe first person who ever maxes\lout there account.\pAnd Congradulations you have one.\pPlease exsept this gift as a token\nof our apreaseation.

    #org @ful
    = Wow, Looks like you have reached\nthe maximum amount of money that\lone person can store.\pHaha, you should take me out on a\ndate sometime, since you have all\lthat money.\pMy gosh you have a total of\n6,000,000 Dollors in the bank.\pThank you for Baning with\nMestopia, we are greatfull for\lyour bissniss.

    #org @welboy
    = How may I help you sir?

    #org @welgirl
    = How may I help you madam?

    #org @need
    = There is an erro.\pFor this script to run properly\nyou need Interdeoth's Real Time\lclock, and Jpans FireRed Hack\lInstaled.\pPlease contact NarutoActor with\nany problems you have receved with\lthis script.

    #org @thk
    = Thank you very much.\pYou now have an acount.\pFeel free to deposite money,\nwithdraw money, use our world wide\lATM's and most of all, have fun\lbanking with Mestopia.

    #org @sorry
    = I am sorry you feel that way.\pIf you change your mind, do not\nhesitate to come back.

    #org @do
    = Welcome to Mestopia Bank.\pI see you do not have an acount\nhere with us.\pDo you want to open an acount, it\nis only cost $5,000.\pOnce you open an acount you can\nstart erning interset, it\lpractialy pays for it's self.\pSo, What do you say, can you agree\nto that?

    #org @greets
    = Hello, and Welcome back to\nMestopia Grand Bank.

    #org @notenough
    = I am sorry, but you do not have\nenough money to start an acount.\pPlease come again.


    Sorry if you can't understand me lol. xD

  7. tajaros
    December 3rd, 2012 02:49 AM
    tajaros
    I'll explain more of what kind of script it really is after I finish doing my school project... :3

  8. redriders180
    December 2nd, 2012 02:44 PM
    redriders180
    Two problems with your theory...the first is that the scripts execute fine for me with those variables. The second is that variable 5000 DOES have a value of 1, since a level script sets it to that value.

  9. tajaros
    December 2nd, 2012 02:02 PM
    tajaros
    I decided I'll use VBASDLH since most people use it.

    Anyways about money that can store money make interest and give your money back... :3

  10. redriders180
    December 2nd, 2012 08:10 AM
    redriders180
    The problem everyone keeps having is that whatever emulator they use is completely ignoring the expanded scripts. I don't know why this is, though...I know for a fact NO$GBA can't handle the expanded file, but some people use VBA and still have the problem.

About Me

  • About sonic1
    Biography
    Hi everyone!! I'm Miguel, an Adoloescent Portuguese boy. I'm a Pokemon big fan, specially in the games part (not that i dont like the anime, that rocks indeed!!xD ). I like to play pokemon a lot (i play since 5 years old :D ), and i'm learning Japonese because of it. I like to hack and make pokemon games (i'm quite experienced in this part), as i do it almost everyday i come to my computer :D
    Interests
    Rom hacking,Game creating,web page designing
    Location
    Portugal
    Gender
    Male ♂
    Occupation
    Pokemon Trainer
    Nature
    Timid
    Favorite Pokémon
    Shaymin-S
    Dragonite
    Rayquaza
  • Signature
    This signature has been disabled.
    over 350px high
    Please review and fix the issues by reading the signature rules.

    You must edit it to meet the limits set by the rules before you may remove the [sig-reason] code from your signature. Removing this tag will re-enable it.

    Do not remove the tag until you fix the issues in your signature. You may be infracted for removing this tag if you do not fix the specified issues. Do not use this tag for decoration purposes.

Statistics

Total Posts
Activity by Forum
Visitor Messages
Blog
General Information
  • Last Activity: April 7th, 2014 08:39 AM
  • Join Date: May 29th, 2008
  • Referrals: 0

Friends

Showing Friends 1 to 13 of 13

Emblems

Emblem Showcase - 1 Total
  Emblem
PC Veteran
These old folks have been around for far too long but we love them anyway.
Awarded: June 15th, 2011 07:34 AM

All times are UTC -8. The time now is 09:32 PM.


Style by Nymphadora, artwork by Sa-Dui.
Like our Facebook Page Follow us on Twitter © 2002 - 2014 The PokéCommunity™, pokecommunity.com.
Pokémon characters and images belong to The Pokémon Company International and Nintendo. This website is in no way affiliated with or endorsed by Nintendo, Creatures, GAMEFREAK, The Pokémon Company or The Pokémon Company International. We just love Pokémon.
All forum styles, their images (unless noted otherwise) and site designs are © 2002 - 2014 The PokéCommunity / PokéCommunity.com.
PokéCommunity™ is a trademark of The PokéCommunity. All rights reserved. Sponsor advertisements do not imply our endorsement of that product or service. User generated content remains the property of its creator.