#SingleInstance, force
#include SAMP-UDF.ahk
#IfWinActive GTA:SA:MP
while(true)
{
nickname := RegExReplace(getUsername(), "_", " ")
}
End::
addChatMessage("{FFFFFF}• {FFC800}[Подсказка] {ffffff}Произошла перезагрузка скрипта")
Reload
Return
!1::
{
SendChat("Здравствуйте, я ваш лечащий врач " nickname ". Что Вас беспокоит?")
sleep 1000
showDialog(1, "{FFC800}Лечение пациента", "Введите ID игрока:","Записать","Закрыть")
Input, SDI, v, {Enter}
if(isDialogOpen())
{
if (getPlayerNameById(SDI)=="")
{
addChatMessage("{ffffff}• {FF0000}[Ошибка] {ffffff}Неккоректно введены данные, повторите попытку")
}else {
Nick := SDI
Name := RegExReplace(getPlayerNameById(SDI), "_", " ")
addChatMessage("{FFFFFF}• {FFC800}[Подсказка] {ffffff}Вы ввели ник - нейм: " Name)
}}
Return
}
$~Enter::
{
if(isInChat() && !isDialogOpen())
{
Sleep, 150
dwAddress := dwSAMP + 0x12D8F8
chatInput := readString(hGTA, dwAddress, 256)
if(RegExMatch(chatInput, "^/[(H)(h)][(P)(p)]"))
{
color := getPlayerColor(SDI)
SendChat("/me открыв мед.сумку, достал историю болезни")
Sleep 2000
SendChat("/me вписал в пункт имя - " name)
Sleep 2000
SendChat("/me в пунк 'Лечение' вписал припарат")
Sleep 2000
SendChat("/me правой рукой достал нужный припарат из сумки")
Sleep 2000
SendChat("/me передал припарат человеку напротив и закрыл сумку")
Sleep 250
SendChat("/anim 2 5")
Sleep 2000
SendChat("Куллер с водой и стаканами стоит у выхода с больницы. Удачного дня!")
Sleep, 2000
if(color == 4294967057)
SendChat("/heal " SDI " 90")
else if(color == 3875209642)
SendChat("/heal " SDI " 50")
else if(color == 274771114)
SendChat("/heal " SDI " 20")
else if(color == 851712)
SendChat("/heal " SDI " 1")
else if(color == 1883378858)
SendChat("/heal " SDI " 50")
else if(color == 4283606186)
SendChat("/heal " SDI " 1")
else if(color == 4283367594)
SendChat("/heal " SDI " 50")
else if(color == 4293376682)
SendChat("/heal " SDI " 1")
else SendChat("/heal " SDI " 90")
Sleep, 2000
SendChat("/time")
}
if(chatInput == "/help")
{
ShowDialog(0,"{FFFFFF}[ Помощь по скрипту ]","{666699}- {FFFFFF}[ {666699}1{FFFFFF} ]{FF0099} - Alt + 1{FFFFFF} - меню лечения.`n{666699}- {FFFFFF}[ {666699}2{FFFFFF} ]{FF0099} - /medproverka{FFFFFF} - провоести мед.проверку гос.орг.`n{666699}- {FFFFFF}[ {666699}3{FFFFFF} ]{FF0099} - /hp{FFFFFF} - провести лечение больного.`n{666699}- {FFFFFF}[ {666699}4{FFFFFF} ]{FF0099} - /vacsina{FFFFFF} - вакцинация гражданина.`n{666699}- {FFFFFF}[ {666699}5{FFFFFF} ]{FF0099} - /minject{FFFFFF} - сделать укол человеку.`n{666699}- {FFFFFF}[ {666699}6{FFFFFF} ]{FF0099} - /medvac{FFFFFF} - вакцинация гос.орг.`n{666699}- {FFFFFF}[ {666699}7{FFFFFF} ]{FF0099} - /operacia{FFFFFF} - провести операцию человеку.`n{666699}- {FFFFFF}[ {666699}8{FFFFFF} ]{FF0099} - /medcarta{FFFFFF} - выдать человеку мед.карту.`n{666699}- {FFFFFF}[ {666699}9{FFFFFF} ]{FF0099} - /vizov{FFFFFF} - принятие вызова.`n{666699}- {FFFFFF}[ {666699}10{FFFFFF} ]{FF0099} - /kg{FFFFFF} - клятва гиппократа.`n{666699}- {FFFFFF}[ {666699}11{FFFFFF} ]{FF0099} - End{FFFFFF} - перезапуск скрипта.`n{666699}- {FFFFFF}[ {666699}12{FFFFFF} ]{FF0099} - /doklad{FFFFFF} - автоматический доклад в рацию.`n {006666}ver. 0.6 by Dembob Chavez", "Закрыть")
}
if(chatInput == "/medvac")
{
sleep 100
SendChat("Вытяните руку перед собой, пожалуйста.")
Sleep 2000
SendChat("/n /anim 17")
Sleep 2000
SendChat("/do В мед. сумке лежит шприц, вакцина.")
Sleep 2000
SendChat("/me достал(а) шприц и ампулу с вакциной")
Sleep 2000
SendChat("/do Ампула и шприц в руках.")
Sleep 2000
SendChat("/me достал(а) свернутую вату, содержащую спирт")
Sleep 2000
SendChat("/do Вата в руках.")
Sleep 2000
SendChat("/me протер руку человека спиртом")
Sleep 2000
SendChat("/me вводит вакцину ")
Sleep 2000
SendChat("/do Вакцина введена.")
Sleep 2000
SendChat("/me выкинул(а) ватку и использованный шприц ")
Sleep 2000
SendChat("Свободны. Следующий, подходите")
}
if(chatInput == "/minject")
{
Sleep 100
SendChat("/do В кармане пачка с новым шприцом.")
Sleep 2000
SendChat("/me сунув руку в крман достал пачку со шприцом")
Sleep 2000
SendChat("/me рапечатал шприц и надел иглу на него")
Sleep 2000
SendChat("/do На столе стоит бутылёк с лекарством.")
Sleep 2000
SendChat("/me вытащил из пакета ваты маленький кусочек")
Sleep 2000
SendChat("/me смочил вату в спирте")
Sleep 2000
SendChat("/me обработал будущее место укола спиртом")
Sleep 2000
SendChat("/me ввёл иглу под кожу и нажал на поршень")
Sleep 2000
SendChat("/do Лекарство пошло во внутрь.")
Sleep 2000
SendChat("/me вывел иглу из-под кожы")
Sleep 2000
SendChat("/me приложил вату со спиртом к месту укола")
Sleep 250
SendInput, {F6}/inject{space}
Sleep 2000
SendChat("Держите вату 5 минут. Не делайте активных дествий!")
}
if(chatInput == "/vacsina")
{
Sleep 100
SendChat("/me сунув руку в карман достал перчатки и надел их")
Sleep 2000
SendChat("/me нацепил маску с наркозом на пациента")
Sleep 2000
SendChat("/me аккуратно взял корбочку с шприцом с вакциной")
Sleep 2000
SendChat("/me аккуратно открыв коробочку вытащил шприц")
Sleep 2000
SendChat("Выпрямите правую руку.")
Sleep 2000
SendChat("/me ввёл иглу под кожу пациента и надавил на поршень")
Sleep 2000
SendChat("/do Вакцина пошла по телу.")
Sleep 2000
SendChat("/me прижал вату к месту укола и вывел иглу")
Sleep 250
SendInput, {F6}/vac{space}
}
if(chatInput == "/medproverka")
{
Sleep 100
SendChat("Прошу стоять смирно, сейчас я проведу мед.осмотр")
Sleep 2000
SendChat("/do На шее висит стетоскоп.")
Sleep 2000
SendChat("/me легким движением рук снял стетоскоп с шеи")
Sleep 5000
SendChat("/me прислонил стетоскоп к животу и проводит проверку стетоскопом")
Sleep 2000
SendChat("/do На плече висит мед. сумка.")
Sleep 2000
SendChat("/me сунул руку и достал тонометр из мед. сумки")
Sleep 2000
SendChat("/me резким движением руки надел на руку пациента тонометр")
Sleep 2000
SendChat("/me нажал на кнопку на тонометре ‹ Пуск › и измерил давление")
Sleep 2000
SendChat("/do Давление в норме.")
Sleep 2000
SendChat("Отлично, передайте свою мед. карту.")
Sleep 2000
SendChat("/me протянул руку вперед и взял мед. карту из рук человека")
Sleep 6000
SendChat("/me сунул руку в мед.сумку и достал печатку, поставил печать ‹ Здоров ›")
Sleep 2000
SendChat("/me протянул руку человеку и вернул мед. карту")
}
if(chatInput == "/operacia")
{
Sleep 100
SendChat("/me сунув руку в карман достал перчатки и надел их")
Sleep 2000
SendChat("/me нацепил маску с наркозом на пациента")
Sleep 2000
SendChat("/me пустил наркоз по трубке")
Sleep 2000
SendChat("/me выключил аппарат наркоза")
Sleep 2000
SendChat("/me аккуратно взял корбочку с шприцом с вакциной")
Sleep 2000
SendChat("/me аккуратно открыв коробочку вытащил шприц")
Sleep 2000
SendChat("/me ввёл иглу под кожу пациента и надавил на поршень")
Sleep 2000
SendChat("/do Вакцина пошла по телу.")
Sleep 2000
SendChat("/me прижал вату к месту укола и вывел иглу")
Sleep 2000
SendChat("/me снял маску с наркозом с пациента")
}
if(chatInput == "/medcarta")
{
SendChat("Сколько вам лет? И предъявите Ваш паспорт, пожалуйста.")
Sleep 4000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка] {ffffff} Если человек проживает 1 год в штате - ему мед.карта бесплатна.")
Sleep 5000
SendChat("Сейчас я Вам оформлю медицинскую карту.")
Sleep 2000
SendChat("/me достал бланк и ручку")
Sleep 2000
SendChat("/me заполняет бланк на имя: " Name)
Sleep 2000
SendChat("/me достал пустую медицинскую карту")
Sleep 2000
SendChat("/me вложил бланк в медицинскую карту")
Sleep 2000
SendChat("/me поставил печать 'Сity Hospital'")
Sleep 2000
SendChat("Что бы получить медицинскую карту требуется заплатить 500$")
Sleep 2000
SendChat("/n Для этого вам нужно прописать команду - /pay " getId() " 500$")
Sleep 4000
Sendinput {F6}/medcard %SDI%{enter}
}
if(chatInput == "/vizov")
{
showDialog(1, "{FFC800}Принятие вызова", "Введите ТЭГ вашего подразделение`n Пример: SF, LV, LS:","Записать","Закрыть")
Input, vizov, v, {Enter}
if(vizov == "SF" or vizov == "LV" or vizov == "LS")
{
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Ваша больница под ТЭГ-ом: " vizov)
Sleep 1000
SendChat("/me достал с пояса в рацию, и что то сказал в неё...")
Sleep 2000
SendChat("/mc")
Sleep 2000
SendChat("/f " vizov " | Принял вызов, выдвигаюсь на место проишествия.")
}else {
addChatMessage("{ffffff}• {FF0000}[Ошибка] {ffffff}Неккоректно введены данные, повторите попытку")
}}
if(chatInput == "/kg")
{
SendChat("Клянусь Аполлоном, врачом Асклепием, Гигеей и Панакеей, всеми богами и богинями.")
Sleep 2000
SendChat("Cчитать научившего меня врачебному искусству наравне с моими родителями.")
Sleep 2000
SendChat("Делиться с ним своими достатками и в случае надобности помогать ему в его нуждах.")
Sleep 2000
SendChat("Я не дам никому просимого у меня смертельного средства и не покажу пути для.. ")
Sleep 2000
SendChat(".. подобного замысла.Чисто и непорочно буду я проводить свою жизнь и свое искусство.")
Sleep 2000
SendChat("Мне, нерушимо выполняющему клятву.")
Sleep 2000
SendChat("Да будет дано счастье в жизни и в искусстве и славе у всех людей на вечные времена.")
Sleep 2000
SendChat("Преступающему же и дающему ложную клятву да будет обратное этому")
}}
if(chatInput == "/doklad")
{
showDialog(1, "{FFC800}Доклад", "Введите время вашего поста`n Пример: 30,45,60:","Записать","Закрыть")
Input, doklad, v, {Enter}
if(doklad == "30" or doklad == "45" or doklad == "60")
{
if(doklad == "30")
{
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Скрипт запущен, каждые 15 минут, будет происходить доклад в рацию на протяжении: " doklad " мин.")
SendChat("/me достал рацию с пояса и сказал что-то в неё..")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 898000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Сейчас произойдет доклад в рацию, не открывайте чат.")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 2000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Вы отстояли свой пост, удачи!")
}
if(doklad == "45")
{
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Скрипт запущен, каждые 15 минут, будет происходить доклад в рацию на протяжении: " doklad " мин.")
SendChat("/me достал рацию с пояса и сказал что-то в неё..")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 898000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Сейчас произойдет доклад в рацию, не открывайте чат.")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 898000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Сейчас произойдет доклад в рацию, не открывайте чат.")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 2000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Вы отстояли свой пост, удачи!")
}
if(doklad == "60")
{
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Скрипт запущен, каждые 15 минут, будет происходить доклад в рацию на протяжении: " doklad " мин.")
SendChat("/me достал рацию с пояса и сказал что-то в неё..")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 898000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Сейчас произойдет доклад в рацию, не открывайте чат.")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 898000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Сейчас произойдет доклад в рацию, не открывайте чат.")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 898000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Сейчас произойдет доклад в рацию, не открывайте чат.")
Sleep 2000
SendChat("/r Докладывает: " nickname " | Пост: Регистратура | Состояния: Стабильное")
Sleep 100
SendChat("/time")
Sleep 2000
addChatMessage("{FFFFFF}• {FFC800}[Подсказка]{ffffff} Вы отстояли свой пост, удачи!")
}}else {
addChatMessage("{ffffff}• {FF0000}[Ошибка] {ffffff}Неккоректно введены данные, повторите попытку")
}}}