Cod: Selectaţi tot

 say_title ( "Piatra Spiritului" )
    if pc . get_skill_group ( ) == 0 then
    say ( "Nu ai nici o competenta" .. pc . get_skill_group ( ) )
    return
    end
    if get_time ( ) < pc . getqf ( "next_time" ) then
    if pc . is_skill_book_no_delay ( ) then
    say ( "Acest lucru va permite" )
    say ( "perfectionarea competentelor." )
    say ( "" )
    wait ( )
    say_title ( "Piatra Spiritului" )
    else
    say ( "Trebuie sa asteptati." )
    return
    end
    end
    local result = training_grandmaster_skill . BuildGrandMasterSkillList ( pc . get_job ( ) , pc . get_skill_group ( ) )
    local vnum_list = result [ 1 ]
    local name_list = result [ 2 ]
    if table . getn ( vnum_list ) == 0 then
    say ( "Competentele tale sunt deja perfecte!" )
    return
    end
    say ( "Alegeti o competenta din urmatoarele:" )
    say ( "" )
    local menu_list = { }
    table . foreach ( name_list , function ( i , name ) table . insert ( menu_list , name ) end )
    table . insert ( menu_list , "Inchide" )
    local s = select_table ( menu_list )
    if table . getn ( menu_list ) == s then
    return
    end
    local skill_name = name_list [ s ]
    local skill_vnum = vnum_list [ s ]
    local skill_level = pc . get_skill_level ( skill_vnum )
    local -cenzurat-_alignment = pc . get_real_alignment ( )
    local need_alignment = 1000 + 500 * ( skill_level - 30 )
    test_chat ( "Puncte rang:" .. -cenzurat-_alignment )
    test_chat ( "Puncte de rang necesare:" .. need_alignment )
    local title = string . format ( "%s a reusit " , skill_name , skill_level - 30 + 1 )
    say_title ( title )
    say ( "Atunci cand folosestii piatra spiritului" )
    say ( "pierzi punctaj din grad!" )
    say ( "" )
    if -cenzurat-_alignment < - 19000 + need_alignment then
    say_reward ( "Puncte insuficiente." )
    return
    end
    if -cenzurat-_alignment < 0 then
    say_reward ( string . format ( "Puncte necesare: %d -> %d" , need_alignment , need_alignment * 2 ) )
    say_reward ( "pentru a mari competenta." )
    need_alignment = need_alignment * 2
    elseif -cenzurat-_alignment < need_alignment then
    say_reward ( string . format ( "Puncte necesare:: %d" , need_alignment ) )
    say_reward ( "Rang negativ prea mare" )
    else
    say_reward ( string . format ( "Puncte necesare: %d" , need_alignment ) )
    end
    say ( "" )
    local s = select ( "Mai mult" , "Intrerupe" )
    if s == 2 then
    return
    end
    if -cenzurat-_alignment >= 0 and -cenzurat-_alignment < need_alignment then
    say_title ( string . format ( "Piatra Spiritului" , title ) )
    say ( "A venit timpul!" )
    say ( "Pentru antrenament," )
    say ( "Va rugam sa scrieti : Antrenament" )
    say ( "" )
    say ( "" )
    say_reward ( "Antrenament" )
    say ( "" ) 
    local s = input ( )
    if s ~= "Antrenament" then
    return
    end
    end
    if get_time ( ) < pc . getqf ( "next_time" ) then
    if pc . is_skill_book_no_delay ( ) then
    pc . remove_skill_book_no_delay ( )
    else
    say ( "Sa vedeam ce-ai reusit" )
    return
    end
    end
    pc . setqf ( "next_time" , get_time ( ) + time_hour_to_sec ( number ( 8 , 12 ) ) )
    if need_alignment > 0 then
    if pc . learn_grand_master_skill ( skill_vnum ) then
    pc . change_alignment ( - need_alignment )
    say_title ( string . format ( "%s " , title ) )
    if 40 == pc . get_skill_level ( skill_vnum ) then
    say ( string . format ( "%s este deja Perfect" , skill_name ) )
    else
    say ( string . format ( "Succes" , skill_name , skill_level - 30 + 1 + 1 ) )
    end
    say ( "" )
    say_reward ( "Succes!" )
    say_reward ( string . format ( "Puncte luate %d " , need_alignment ) )
    say ( "" )
    else
    say_title ( string . format ( "%s " , title ) )
    say ( "Acest lucru nu este elaborat ,din pacate." )
    say ( "" )
    say_reward ( "Ai esuat," )
    say ( "mai incerca!" )
    pc . change_alignment ( - number ( need_alignment / 3 , need_alignment / 2 ) )
    end
    end
    item . remove ( )