@ ---------------------------------------------- @ 0x81A14FD @ Standard script: Berries 1.1 @ ---------------------------------------------- special (0x2B); copyvar (0x8000, 0x8004); compare (0x8000, 0xFF); ifgoto (1, 0x81A1553); compare (0x8000, 0x0); ifgoto (1, 0x81A155D); compare (0x8000, 0x1); ifgoto (1, 0x81A15B5); compare (0x8000, 0x2); ifgoto (1, 0x81A15C2); compare (0x8000, 0x3); ifgoto (1, 0x81A15CF); compare (0x8000, 0x4); ifgoto (1, 0x81A15DC); compare (0x8000, 0x5); ifgoto (1, 0x81A1619); end (); @ ---------------------------------------------- @ 0x81A1619 @ Referenced by 0x81A14FD @ ---------------------------------------------- getnumber (1, 0x8006); lock (); faceplayer (); loadpointer (0, "There are {var:3} {var:2} BERRIES!\rDo you want to pick the\n{var:2} BERRIES?"); callstd (5); compare (0x800D, 0x1); ifgoto (1, 0x81A163D); compare (0x800D, 0x0); ifgoto (1, 0x81A166B); @ ---------------------------------------------- @ 0x81A1662 @ Referenced by 0x81A1619 @ ---------------------------------------------- msgbox2 ("The BAG's BERRIES POCKET is full.\rThe {var:2} BERRIES couldn't be taken."); waitmsgbox (); waitkeypress (); release (); end (); @ ---------------------------------------------- @ 0x81A166B @ Referenced by 0x81A1619 @ ---------------------------------------------- msgbox2 ("{RED} left the {var:2} BERRIES\nunpicked."); waitmsgbox (); waitkeypress (); release (); end (); @ ---------------------------------------------- @ 0x81A163D @ Referenced by 0x81A1619 @ ---------------------------------------------- special (0x2E); compare (0x8004, 0x0); ifgoto (1, 0x81A1662); special (0x2F); msgbox2 ("{RED} picked the {var:3} {var:2} BERRIES."); jingle (0x183); waitmsgbox (); waitforjingle (); waitkeypress (); msgbox2 ("{RED} put away the {var:2} BERRIES\nin the BAG's BERRIES POCKET.\rThe soil returned to its soft and\nloamy state."); waitmsgbox (); waitkeypress (); release (); end (); @ ---------------------------------------------- @ 0x81A15DC @ Referenced by 0x81A14FD @ ---------------------------------------------- call (0x81A15EE); lockall (); msgbox2 ("These {var:2} flowers are blooming\n{var:3}."); waitmsgbox (); waitkeypress (); jump (0x81A167F); @ ---------------------------------------------- @ 0x81A167F @ Referenced by 0x81A15DC @ ---------------------------------------------- checkitem (0x10C, 0x1); compare (0x800D, 0x0); ifgoto (1, 0x81A16AD); loadpointer (0, "Want to water the {var:2} with the\nWAILMER PAIL?"); callstd (5); compare (0x800D, 0x1); ifgoto (1, 0x81A16B3); compare (0x800D, 0x0); ifgoto (1, 0x81A16AD); releaseall (); end (); @ ---------------------------------------------- @ 0x81A16B3 @ Referenced by 0x81A167F @ ---------------------------------------------- msgbox2 ("{RED} watered the {var:2}."); waitmsgbox (); special (0x30); special (0x5E); waitstate (); msgbox2 ("The plant seems to be delighted."); waitmsgbox (); waitkeypress (); releaseall (); end (); @ ---------------------------------------------- @ 0x81A16AD @ Referenced by 0x81A167F @ ---------------------------------------------- releaseall (); end (); @ ---------------------------------------------- @ 0x81A15EE @ Referenced by 0x81A15DC @ ---------------------------------------------- compare (0x8005, 0x0); ifgoto (1, 0x81A1612); compare (0x8005, 0x4); ifgoto (1, 0x81A160B); getstring (1, "prettily"); return (); @ ---------------------------------------------- @ 0x81A160B @ Referenced by 0x81A15EE @ ---------------------------------------------- getstring (1, "very beautifully"); return (); @ ---------------------------------------------- @ 0x81A1612 @ Referenced by 0x81A15EE @ ---------------------------------------------- getstring (1, "cutely"); return (); @ ---------------------------------------------- @ 0x81A15CF @ Referenced by 0x81A14FD @ ---------------------------------------------- lockall (); msgbox2 ("This {var:2} plant is growing taller."); waitmsgbox (); waitkeypress (); jump (0x81A167F); @ ---------------------------------------------- @ 0x81A15C2 @ Referenced by 0x81A14FD @ ---------------------------------------------- lockall (); msgbox2 ("{var:2} has sprouted."); waitmsgbox (); waitkeypress (); jump (0x81A167F); @ ---------------------------------------------- @ 0x81A15B5 @ Referenced by 0x81A14FD @ ---------------------------------------------- lockall (); msgbox2 ("One {var:2} BERRY was planted here."); waitmsgbox (); waitkeypress (); jump (0x81A167F); @ ---------------------------------------------- @ 0x81A155D @ Referenced by 0x81A14FD @ ---------------------------------------------- lock (); faceplayer (); special2 (0x800D, 0x31); compare (0x800D, 0x1); ifgoto (1, 0x81A1578); msgbox2 ("It's soft, loamy soil."); waitmsgbox (); waitkeypress (); release (); end (); @ ---------------------------------------------- @ 0x81A1578 @ Referenced by 0x81A155D @ ---------------------------------------------- loadpointer (0, "It's soft, loamy soil.\nWant to plant a BERRY?"); callstd (5); compare (0x800D, 0x1); ifgoto (1, 0x81A1597); compare (0x800D, 0x0); ifgoto (1, 0x81A15B3); end (); @ ---------------------------------------------- @ 0x81A15B3 @ Referenced by 0x81A1578 @ ---------------------------------------------- release (); end (); @ ---------------------------------------------- @ 0x81A1597 @ Referenced by 0x81A1578 @ ---------------------------------------------- fade (1); closeonkeypress (); special (0x2C); waitstate (); compare (0x800E, 0x0); ifgoto (1, 0x81A15B3); takeitem (0x800E, 0x1); call (0x81A16C9); release (); end (); @ ---------------------------------------------- @ 0x81A16C9 @ Referenced by 0x81A1597 @ ---------------------------------------------- special (0x2D); 0xC3 (3); msgbox2 ("{RED} planted one {var:2} BERRY in\nthe soft, loamy soil."); waitmsgbox (); waitkeypress (); return (); @ ---------------------------------------------- @ 0x81A1553 @ Referenced by 0x81A14FD @ ---------------------------------------------- lockall (); msgbox2 ("!"); waitmsgbox (); waitkeypress (); releaseall (); end ();