Помогите сделать МЕНЮ

[Andrey _Simonich]

Помогите сделать меню в которой ты будешь водить Ник и организацию,ник и эти даные будут вносится в AHK

 

[Revalto]

 

[Smer4]

Мб я тебя не понял, но вот на диалогах в samp
; ORG - имя организации которую ввел юзер
; Name - никнейм который ввъел юзер

#Include samp.ahk
#NoEnv
;showDialog(style, caption, text, button1, button2, id) - Создание локального диалога
Hotkey, numpad1, start, V
return
start:
{
DialogName = "BH HELP"
showdialog(1, DialogName, "Пожалуйста введите ваш NickName", "Close", button2, 1337)
sleep, 100
if isdialogopen()
{
    gt := getDialogCaption()
IfInString, gt, %DialogName%
{
    gt = -1
    Input, name, V, {Enter}
}
}
showdialog(1, DialogName, "Пожалуйста введите вашу организацию", "Close", button2, 1338)
sleep, 100
if isdialogopen()
{
    gt := getDialogCaption()
IfInString, gt, %DialogName%
{
    gt = -1
    Input, org, V, {Enter}
}
}
}
addchatMessage("Организация "ORG "Имя "Name)
return
; ORG - имя организации которую ввел юзер
; Name - никнейм который ввъел юзер

 

[Revalto]

Мб я тебя не понял, но вот на диалогах в samp
; ORG - имя организации которую ввел юзер
; Name - никнейм который ввъел юзер

#Include samp.ahk
#NoEnv
;showDialog(style, caption, text, button1, button2, id) - Создание локального диалога
Hotkey, numpad1, start, V
return
start:
{
DialogName = "BH HELP"
showdialog(1, DialogName, "Пожалуйста введите ваш NickName", "Close", button2, 1337)
sleep, 100
if isdialogopen()
{
    gt := getDialogCaption()
IfInString, gt, %DialogName%
{
    gt = -1
    Input, name, V, {Enter}
}
}
showdialog(1, DialogName, "Пожалуйста введите вашу организацию", "Close", button2, 1338)
sleep, 100
if isdialogopen()
{
    gt := getDialogCaption()
IfInString, gt, %DialogName%
{
    gt = -1
    Input, org, V, {Enter}
}
}
}
addchatMessage("Организация "ORG "Имя "Name)
return
; ORG - имя организации которую ввел юзер
; Name - никнейм который ввъел юзер

ну это уже бред

ShowDialog(1, "Проверка", "Введите данные:", "Закрыть")
while (isDialogOpen()) {
}
addChatMessageEx(0xBDBDBD, "{BDBDBD}Вы ввели: {FFFFFF}" readString(hGTA, dwSAMP + 0x12D8F8, 256))

Хочешь в переменную?

tipaperm := readString(hGTA, dwSAMP + 0x12D8F8, 256)

 

[Andrey _Simonich]

Сейчас всё проверю

не чего не работает!

 

[Smer4]

ну это уже бред

ShowDialog(1, "Проверка", "Введите данные:", "Закрыть")
while (isDialogOpen()) {
}
addChatMessageEx(0xBDBDBD, "{BDBDBD}Вы ввели: {FFFFFF}" readString(hGTA, dwSAMP + 0x12D8F8, 256))

Хочешь в переменную?

tipaperm := readString(hGTA, dwSAMP + 0x12D8F8, 256)

Нуу даааа.... с помощью while логичнее будет, но быдлокод моё все))

Сейчас всё проверю

не чего не работает!

Какая ошибка?

 

[Revalto]

Сейчас всё проверю

не чего не работает!

AHK -> ANSI32
UDF -> SAMP Version

 

[Andrey _Simonich]

Всё всем спасибо за помощь.

Вот код который я сам делал
Gui, Font, S15 CDefault, Verdana
Gui, Add, Text, x196 y0 w90 h30 , AHK MO
Gui, Font, S9 CDefault, Verdana
Gui, Add, Text, x2 y30 w300 h30 , Снизу ведите Имя Фамилию`, Звание и Войска
Gui, Add, Edit, x2 y50 w380 h20 vDa1 %Da1% ,
Gui, Add, Text, x2 y70 w220 h20 , Cнизу ведите Звание и Фамилию
Gui, Add, Edit, x2 y90 w380 h20 vDa2 ,
Gui, Font, S12 CRed, Verdana
Gui, Add, Text, x562 y0 w160 h30 +Left, Внимание
Gui, Add, Text, x482 y30 w320 h30 , Что вы вели в AHK НЕ сохроняется
Gui, Add, Text, x482 y50 w320 h20 , Вам придётся это водить каждый раз
Gui, Font, S12 CBlue, Verdana
Gui, Add, Text, x2 y170 w-406 h-252 , Cоздатель AHK MO-Andrey_Simonich
Gui, Add, Text, x2 y170 w310 h20 , Cоздатель Скрипта-Andrey_Simonich
Gui, Font, S12 CRed, Verdana
Gui, Add, Text, x2 y110 w310 h60 , Cовет от Andrey Simonich:При вход в игру напишите команду /mohelp
Gui, Add, Button, x552 y130 w150 h40 , Понятно
Gui, Add, Text, x182 y0 w110 h30 , AHK MO
Gui, Show, x487 y105 h198 w801, AHK MO от Andrey Simonich
GuiControl,, %Da1%
Return
GuiClose:
ExitApp