# onobjsel !the dynamics can all be found in obj_din and Cheatmenu_din killvar 'menu_character' $menu_character[0] = 'Description:$menu_descrip' $menu_character[1] = 'Characteristics of:$menu_skills' $menu_character[2] = 'Statistics:$menu_statistika' $menu_character[3] = 'Reputation:$menu_reputation' $menu_character[4] = 'Pain:$menu_pain' if magik > 0:$menu_character[5] = 'Magic:$menu_magic' $menu_lookon[0] = 'Face:$menu_face' $menu_lookon[1] = 'Body:$menu_body' $menu_lookon[2] = 'Clothing:$menu_clothes' $menu_lookon[3] = 'Tattoos:$menu_tattoos' $menu_lookon[4] = 'Piercing:$menu_pirs' $menu_view[0] = 'The old menu:$menu_addoldmenu' $menu_view[1] = 'Cheat menu:$menu_cheat' $menu_view[2] = 'Refresh:$menu_obnovit' killvar 'menu_other' $menu_other[0] = 'Notebook:$menu_bloknot' $menu_other[1] = 'Emergency exit:$menu_avariya' if disable_autosave = 1: $menu_other[2] = 'Enable autosave:$menu_autosave' else $menu_other[2] = 'Disable autosave:$menu_autosave' end if mobila > 0:$menu_other[3] = 'Phone:$menu_mobila' !The old menu: beginning if $selobj = 'Character':dynamic $objdescrip if $selobj = 'Skills':dynamic $objskills if $selobj = 'Statistics':dynamic $objstatistika if magik > 0:if $selobj = 'Magic':dynamic $objmagic if $selobj = 'Face':view FUNC('$face_image') if $selobj = 'Body':dynamic $objbody if $selobj = 'Clothing':dynamic $objclothes if $selobj = 'Tattoos':dynamic $objtattoos if $selobj = 'Piercing':dynamic $objpirsing if $selobj = 'Notebook':dynamic $objbloknot if $selobj = 'Emergency exit':dynamic $objavariya if $selobj = 'Refresh':gs'stat' if $selobj = 'The new menu':dynamic $objnewmenu if $selobj = 'Cheat menu':dynamic $objcheat_menu if disable_autosave = 1: if $selobj = 'Enable autosave':dynamic $objautosave else if $selobj = 'Disable autosave':dynamic $objautosave end !The old menu: end !The new menu: beginning if $selobj = '':menu '$menu_character' if $selobj = '':menu '$menu_lookon' if $selobj = '':menu '$menu_other' if $selobj = '':gs 'din_bad' & dynamic $Phone_menu if $selobj = '':dynamic $d_bag if $selobj = '':menu '$menu_view' !The new menu: end if $selobj = 'Player': clr pl'Your name is Mikhail Kuznetsov. You <> years. <<$vneshPRE>>' pl'You have short black hair with flashes of gray starting, little brown eyes and willed jaw covered by blue bristle shave.' pl'Growth <> see, weight 100 kg.' end !' gs'Menu.Create','mainMenu' gs'Menu.Add','mainMenu','Status Bar','','MenuMainLoc','0' gs'Menu.Add','mainMenu','Text Symbols','','MenuMainLoc','1' gs'Menu.Call','mainMenu' ' end unselect --- onobjsel ---------------------------------