Мануал Отмытие ПК за адену

[kick]

Отмытие ПК за адену
AI:

class 1 black_judge : citizen{
parameter:
    string    ShopName = "black_judge001.htm";
    string    fnHi = "gm_shop_main.htm";


handler:
    EventHandler TALKED(talker)
    {
        myself::ShowPage( talker, "black_judge001.htm");
    }
    EventHandler MENU_SELECTED(talker,ask,reply)
    {
        if( ask == -1 && reply == 1 )
        {
            if (talker.pk_count >= 1 )
            {
                if(myself::OwnItemCount( talker, 4037 ) > 1 )
                {
                    myself::DeleteItem1( talker,4037, 1);
                    myself::IncrementParam( talker, @PARAM_PKCOUNT, -1 );
                }
            }
        }
    }
}