Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

Stealing with strange menu

Only working scripts
Post Reply
cameli0n
Posts: 6
Joined: 02.03.2014 22:20

Stealing with strange menu

Post by cameli0n »

Всем привет, нужна помощь как задействовать такое меню в скрипте на стилинг
Attachments
test.JPG
test.JPG (101.28 KiB) Viewed 30647 times
User avatar
Vizit0r
Developer
Developer
Posts: 3958
Joined: 24.03.2005 17:05
Contact:

Re: Stealing with strange menu

Post by Vizit0r »

обычный гамп, с полупрозрачным фоном. ничего такого хитрого.
"Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете". (с) Макконнелл, "Совершенный код".
cameli0n
Posts: 6
Joined: 02.03.2014 22:20

Re: Stealing with strange menu

Post by cameli0n »

Vizit0r wrote:обычный гамп, с полупрозрачным фоном. ничего такого хитрого.
а с помощью какой функции указать чтобы он брал нужный предмет? через тайп не получается, через waitmenu так же
drabadan
Expert
Expert
Posts: 730
Joined: 13.12.2012 17:35
Contact:

Re: Stealing with strange menu

Post by drabadan »

cameli0n wrote:
Vizit0r wrote:обычный гамп, с полупрозрачным фоном. ничего такого хитрого.
а с помощью какой функции указать чтобы он брал нужный предмет? через тайп не получается, через waitmenu так же
http://stealth.od.ua/Doc:RU/Manual/Reference/Gump
cameli0n
Posts: 6
Joined: 02.03.2014 22:20

Re: Stealing with strange menu

Post by cameli0n »

drabadan wrote:
cameli0n wrote:
Vizit0r wrote:обычный гамп, с полупрозрачным фоном. ничего такого хитрого.
а с помощью какой функции указать чтобы он брал нужный предмет? через тайп не получается, через waitmenu так же
http://stealth.od.ua/Doc:RU/Manual/Reference/Gump
в титориале нету линков к тексту, это ошибка или нету еще учебников?
cameli0n
Posts: 6
Joined: 02.03.2014 22:20

Re: Stealing with strange menu

Post by cameli0n »

Если я ничего не путаю, получается мне достаточно просто того чтобы был произведен клик по кнопке нужной, только вот как указать ее? через waitgump это возможно?
drabadan
Expert
Expert
Posts: 730
Joined: 13.12.2012 17:35
Contact:

Re: Stealing with strange menu

Post by drabadan »

cameli0n wrote:Если я ничего не путаю, получается мне достаточно просто того чтобы был произведен клик по кнопке нужной, только вот как указать ее? через waitgump это возможно?
нет, читай матчасть! ъ!

ъ!
Пример использования

Code: Select all

procedure PushTehButton;
var
AGInfo : TGumpInfo;
begin
if IsGump then
GetGumpInfo(GetGumpsCount-1, AGInfo);
AddToSystemJournal('Gump has ' + IntToStr(Length(AGInfo.GumpButtons)) + ' buttons');
end;
как нажать на любую из кнопок додумывайся сам или пойми, что тут написано.
cameli0n
Posts: 6
Joined: 02.03.2014 22:20

Re: Stealing with strange menu

Post by cameli0n »

drabadan wrote:
cameli0n wrote:Если я ничего не путаю, получается мне достаточно просто того чтобы был произведен клик по кнопке нужной, только вот как указать ее? через waitgump это возможно?
нет, читай матчасть! ъ!

ъ!
Пример использования

Code: Select all

procedure PushTehButton;
var
AGInfo : TGumpInfo;
begin
if IsGump then
GetGumpInfo(GetGumpsCount-1, AGInfo);
AddToSystemJournal('Gump has ' + IntToStr(Length(AGInfo.GumpButtons)) + ' buttons');
end;
как нажать на любую из кнопок додумывайся сам или пойми, что тут написано.
Этой процедурой я получаю количество этих кнопок, осталось только нажать:).Был бы благодарен если бы сказано было как, но попробую сам разобраться, спасибо.
drabadan
Expert
Expert
Posts: 730
Joined: 13.12.2012 17:35
Contact:

Re: Stealing with strange menu

Post by drabadan »

Code: Select all

procedure PushTehButton;
var
AGInfo : TGumpInfo;
i : Integer;
begin
if IsGump then
GetGumpInfo(GetGumpsCount-1, AGInfo);
AddToSystemJournal('Gump has ' + IntToStr(Length(AGInfo.GumpButtons)) + ' buttons');
i := 0; //индекс кнопки в массиве кнопок.
NumGumpButton(GetGumpsCount-1, AGInfo.GumpButtons[i].return_value);
end;
cameli0n
Posts: 6
Joined: 02.03.2014 22:20

Re: Stealing with strange menu

Post by cameli0n »

drabadan wrote:

Code: Select all

procedure PushTehButton;
var
AGInfo : TGumpInfo;
i : Integer;
begin
if IsGump then
GetGumpInfo(GetGumpsCount-1, AGInfo);
AddToSystemJournal('Gump has ' + IntToStr(Length(AGInfo.GumpButtons)) + ' buttons');
i := 0; //индекс кнопки в массиве кнопок.
NumGumpButton(GetGumpsCount-1, AGInfo.GumpButtons[i].return_value);
end;
получаю ошибку Out Of Range на строке NumGumpButton(GetGumpsCount-1, AGInfo.GumpButtons.return_value);
drabadan
Expert
Expert
Posts: 730
Joined: 13.12.2012 17:35
Contact:

Re: Stealing with strange menu

Post by drabadan »

cameli0n wrote:
drabadan wrote:

Code: Select all

procedure PushTehButton;
var
AGInfo : TGumpInfo;
i : Integer;
begin
if IsGump then
GetGumpInfo(GetGumpsCount-1, AGInfo);
AddToSystemJournal('Gump has ' + IntToStr(Length(AGInfo.GumpButtons)) + ' buttons');
i := 0; //индекс кнопки в массиве кнопок.
NumGumpButton(GetGumpsCount-1, AGInfo.GumpButtons[i].return_value);
end;
получаю ошибку Out Of Range на строке NumGumpButton(GetGumpsCount-1, AGInfo.GumpButtons.return_value);

мы могли бы продолжить когда бы ты сказал, что означает эта ошибка и почему ты ее получаешь!
дам подсказки - ",gumpinfo", google vsem pomoget!
Oasis
Novice
Novice
Posts: 52
Joined: 02.01.2014 14:15

Re: Stealing with strange menu

Post by Oasis »

И все же как узнать номер гампа на кнопку, из всего выше описанного я понял -0

Вот нельзя было просто подсказать как в этой теме? :)
http://stealth.od.ua/forum/viewtopic.ph ... %BF#p21995

вписал вайтгамп и все работает=)
Post Reply