Вечер в хату. Чайнику нужна помощь, надеюсь, поможете. Итак, суть: захотел я сделать скрипт, который бы отыгрывал одну из 18 рандомных отыгровок. Вот что получлось:
!2:: random, var0, 1, 18 if var0=1 Sleep 1000 SendInput, {F6}У других врачей больные умирают точно так же, как у меня.{enter} Sleep 1500 SendInput, {f6}Только мои умирают в хорошем настроении. Надеюсь, Вам это не грозит.{enter} Sleep 1500 SendInput, {F6}Я выпишу нужное для Вас лекарство. Оно должно помочь Вам.{enter} Sleep 1500 SendInput, {F6}/do На плече врача висит сумка с множеством различных лекарств.{enter} Sleep 1500 SendInput, {F6}/me вытащил из сумки пластинку нужных таблеток{enter} Sleep 1500 SendInput, {F6}/do К пластинке таблеток прикреплена инструкция по применению.{enter} Sleep 1500 SendInput, {F6}/me передал лекарство пациенту{enter} Sleep 1500 SendInput, {F6}Вы всегда можете прыгнуть с крыши, но я Вам не советую это делать.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=2 Sleep 1000 SendInput, {F6}Сейчас я Вам выпишу лекарство, затем Вы сможете продолжить лечение дома.{enter} Sleep 1500 SendInput, {F6}/me достал бланк для записи и нужные препараты{enter} Sleep 1500 SendInput, {F6}/do Бланк и ручка в руках мед. работника.{enter} Sleep 1500 SendInput, {F6}/me написал в бланке рекомендации по применению препаратов{enter} Sleep 1500 SendInput, {F6}/me передал бланк и нужные препараты пациенту{enter} Sleep 1500 SendInput, {F6}Холоднее земной непогоды бывает непогода в голове.{enter} Sleep 1500 SendInput, {F6}Вам станет лучше уже к приезду домой. Следите за своим здоровьем.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=3 Sleep 1000 SendInput, {F6}Ничего серьезного, сейчас всё будет, отставить панику.{enter} Sleep 1500 SendInput, {F6}В судьбе все происходит к лучшему, правда иногда – худшим из возможных способов.{enter} Sleep 1500 SendInput, {F6}Поэтому Вам придется немного потерпеть, пока подействует лекарство.{enter} Sleep 1500 SendInput, {F6}/me передал человеку напротив нужные медикаменты.{enter} Sleep 1500 SendInput, {F6}/me написал инструкцию к применеию и передал её пациенту{enter} Sleep 1500 SendInput, {F6}Лечение можете продолжить дома. Вот пакет, сюда может запаковать все.{enter} Sleep 1500 SendInput, {F6}/me передал пустой пакетик для медикаментов{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=4 Sleep 1000 SendInput, {F6}Её не так легко понять, потому что часто не знаешь, с насмешкой она болит или всерьёз.{enter} Sleep 1500 SendInput, {F6}По записям в Вашей мед. карте ничего серьезного быть не должно.{enter} Sleep 1500 SendInput, {F6}Потому что в серьезных случаях головная боль - симптом, а не заболевание.{enter} Sleep 1500 SendInput, {F6}/me заполнил бланк рекомендациями по применению препарата{enter} Sleep 1500 SendInput, {F6}/do В руках врача пакет и необходимые лекарства.{enter} Sleep 1500 SendInput, {F6}/me упаковал бланк и нужные препараты в пакет{enter} Sleep 1500 SendInput, {F6}Вот, используйте половину красной таблетки, если Вам не полегчает.{enter} Sleep 1500 SendInput, {F6}/me передал пакет с лекарствами пациенту{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=5 Sleep 1000 SendInput, {F6}Под кожу рук Вам вшит Ваш диагноз. Болезнь редкая, но излечимая.{enter} Sleep 1500 SendInput, {F6}Причин паниковать нет, но неудобств избежать не получится.{enter} Sleep 1500 SendInput, {F6}/me достал из мед. сумки нужное лекарство{enter} Sleep 1500 SendInput, {F6}Вам нужно побольше успокоительного и систематические приемы вот этого.{enter} Sleep 1500 SendInput, {F6}/do В руках коробка с лекарством, которое врач достал ранее.{enter} Sleep 1500 SendInput, {F6}Процесс лечения короткий и не требует наблюдения.{enter} Sleep 1500 SendInput, {F6}Не будете лечится - сделаете хуже самому себе. Я заверну это в пакет для Вас.{enter} Sleep 1500 SendInput, {F6}/me положил лекарства в пакет и передал пациенту{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=6 Sleep 1000 SendInput, {F6}Я бы, конечно, вылечил бы Вас, если бы симптомы были правдой.{enter} Sleep 1500 SendInput, {F6}Держите витаминку, внушите себе, что она поможет.{enter} Sleep 1500 SendInput, {F6}/do В кармане врача лежит несколько пластинок витаминок.{enter} Sleep 1500 SendInput, {F6}/me достал нужную пластинку витаминок из кармана{enter} Sleep 1500 SendInput, {F6}/do Витаминки имеют довольно забавную форму.{enter} Sleep 1500 SendInput, {F6}/me передал витаминки пациенту{enter} Sleep 1500 SendInput, {F6}Всего Вам доброго, не "болейте" больше.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=7 Sleep 1000 SendInput, {F6}На самом деле, я искренне уверен, что Вы поправитесь очень скоро без медикаментов.{enter} Sleep 1500 SendInput, {F6}Но, если бы Вы думали так же, Вы бы сюда не пришли.{enter} Sleep 1500 SendInput, {F6}Я Вам посоветую занятся любимым делом.{enter} Sleep 1500 SendInput, {F6}В идеале - чай, книга, а в чай подсыпать вот это.{enter} Sleep 1500 SendInput, {F6}/me вытащил из кармана маленькую коробочку{enter} Sleep 1500 SendInput, {F6}/do В руках коробочка с успокаивающими травами (безумно вкусными и ароматными).{enter} Sleep 1500 SendInput, {F6}/me передал коробку пациенту{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=8 Sleep 1000 SendInput, {F6}Уважаемый пациент, вы здоровы.{enter} Sleep 1500 SendInput, {F6}Что Вам нужно для того, чтоб осознать это полностью?{enter} Sleep 1500 SendInput, {F6}/me достал коробку с витаминками из кармана{enter} Sleep 1500 SendInput, {F6}/do Витаминки имеют форму желе и причудливую форму.{enter} Sleep 1500 SendInput, {F6}/me передал витамины пациенту{enter} Sleep 1500 SendInput, {F6}Оставьте мутные мысли в покое, и они станут чистыми и прозрачными.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=9 Sleep 1000 SendInput, {F6}Глубокое заблуждение полагать, будто сон не влияет на здоровье.{enter} Sleep 1500 SendInput, {F6}Вам нужно соблюдать режим сна и избегать стреcсовых ситуаций.{enter} Sleep 1500 SendInput, {F6}/do В руке антидепресент (лекарство от безсонницы).{enter} Sleep 1500 SendInput, {F6}/me передал лекарство пациенту{enter} Sleep 1500 SendInput, {F6}Только не злоуботребляйте. Вот пакет, можете запокавать в него.{enter} Sleep 1500 SendInput, {F6}/me передал пациенту бумажный пакетик{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=10 Sleep 1000 SendInput, {F6}Есть нечто худшее, чем жизнь с болящей головой, — это жизнь без неё.{enter} Sleep 1500 SendInput, {F6}Вам нужен сон, если после сна не пройдёт - используйте вот это.{enter} Sleep 1500 SendInput, {F6}/do В руках нужное лекарство, которое врач вытащил из кармана.{enter} Sleep 1500 SendInput, {F6}Это эффективное средство поможет в вашей проблеме.{enter} Sleep 1500 SendInput, {F6}Лечение можно продолжить на дому.{enter} Sleep 1500 SendInput, {F6}/me упаковал лекарство в пакет и передал пациенту{enter} Sleep 1500 SendInput, {F6}Сладких Вам снов *смех*.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=11 Sleep 1000 SendInput, {F6}Пока человек не сдается, он сильнее своей судьбы.{enter} Sleep 1500 SendInput, {F6}Пока водичка за лекарством польется - Вы останетесь без головы.{enter} Sleep 1500 SendInput, {F6}/me достал из кармана пару таблеток аскорбиновой кислоты{enter} Sleep 1500 SendInput, {F6}/do Пара таблеток аскорбинки в руках.{enter} Sleep 1500 SendInput, {F6}/mе передал таблетки пациенту{enter} Sleep 1500 SendInput, {F6}Вы здоровы. Если Вы серьезно думаете, что Вы больны - считайте, что это лекарство.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=12 Sleep 1000 SendInput, {F6}Выпросить таблетку — это одно, понять, что это нужная таблетка — другое...{enter} Sleep 1500 SendInput, {F6}...принять — третье, а дождатся ее эффекта — четвёртое. И в этом случае...{enter} Sleep 1500 SendInput, {F6}...даже я не смогу предсказать последствия, если это не симптомы и Вы врёте мне.{enter} Sleep 1500 SendInput, {F6}Я не знаю, что выписать Вам - просто возьмите эту коробку с индийским чаем.{enter} Sleep 1500 SendInput, {F6}/me вытащил из кармана маленькую коробчку, украшенную узорами{enter} Sleep 1500 SendInput, {F6}/do На коробочке стоит надпись: "Отборный чай. 20 пакетиков."{enter} Sleep 1500 SendInput, {F6}/me передал коробочку пациенту{enter} Sleep 1500 SendInput, {F6}Вот, заварите себе дома чай, откиньтесь в кресле и почитайте что-нибудь. Удачи.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=13 Sleep 1000 SendInput, {F6}Для веселья больница наша мало оборудована, сперва надо выпросить лекарство...{enter} Sleep 1500 SendInput, {F6}Так что, считайте, что вы выпросили его... А нужно ли оно вам?{enter} Sleep 1500 SendInput, {F6}/me достал нужную пачку таблеток из кармана{enter} Sleep 1500 SendInput, {F6}/do На пачке стоит надпись: "Передозировка смертельна".{enter} Sleep 1500 SendInput, {F6}Учтите, что от ошибки врача не трудно помереть - будьте осторожны.{enter} Sleep 1500 SendInput, {F6}/me передал лекарство пациенту{enter} Sleep 1500 SendInput, {F6}Удачи вам, надеюсь, лекарство нужно вам не для самоубийства.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=14 Sleep 1000 SendInput, {F6}Надо различать два вида мучений - физическое страдание от симулянства...{enter} Sleep 1500 SendInput, {F6}...и моральное. Физическое - это ухудшение состояния от неверного диагноза.{enter} Sleep 1500 SendInput, {F6}А вот моральное - это Ваш выбор. Я дам Вам таблетку, но нужна ли она Вам?{enter} Sleep 1500 SendInput, {F6}/me достал пару таблеток от головной боли{enter} Sleep 1500 SendInput, {F6}/do Таблетки запакованый в бумажную упаковку с надписью: "Цитрамон".{enter} Sleep 1500 SendInput, {F6}/me протянул пачку таблеток пациенту{enter} Sleep 1500 SendInput, {F6}Держите, но учтите, что если диагноз неверен - Вы можете спортить свое здоровье.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=15 Sleep 1000 SendInput, {F6}Главное - прыгнуть с обрыва, по пути у Вас обязательно вырастут крылья.{enter} Sleep 1500 SendInput, {F6}Чтож, если Вы считаете, что вам нужно лекарство - держите.{enter} Sleep 1500 SendInput, {F6}/do Витаминки имеют различные цвета и формы.{enter} Sleep 1500 SendInput, {F6}/me положил витаминки в салофановый пакетик, после чего завязал его{enter} Sleep 1500 SendInput, {F6}/me протянул пакетик пациенту{enter} Sleep 1500 SendInput, {F6}Вот, держите, считайте, что это поможет.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=16 Sleep 1000 SendInput, {F6}Чаще всего она болит серьёзно, а звучит как насмешка.{enter} Sleep 1500 SendInput, {F6}Вот Вам лекарство, держите.{enter} Sleep 1500 SendInput, {F6}/do В руках врача лежит маленькая коробочка с травами.{enter} Sleep 1500 SendInput, {F6}/me приоткрыл крышку коробки{enter} Sleep 1500 SendInput, {F6}/do Из открытой коробки ударил безумно ароматный запах.{enter} Sleep 1500 SendInput, {F6}Вот, подсыпьте себе этого в чай, откиньтесь в кресле и займитесь любимым делом.{enter} Sleep 1500 SendInput, {F6}/me закрыл крышку и передал коробку пациенту.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=17 Sleep 1000 SendInput, {F6}Я вижу, как Вы хмуритесь чтобы прочесть мне длинную лекцию о том...{enter} Sleep 1500 SendInput, {F6}...что я должен делать в таких случаях, но позвольте мне сделать мою работу.{enter} Sleep 1500 SendInput, {F6}Я - врач, я не телевизор, учился в медицинском университете, а не во дворе...{enter} Sleep 1500 SendInput, {F6}...изучал слухи. И я говорю Вам, что Вы здоровы. Что Вам нужно для осознания этого?{enter} Sleep 1500 SendInput, {F6}/me потянулся рукой в карман и достал маленькую упаковку конфет{enter} Sleep 1500 SendInput, {F6}/do На упаковке написано: "Gummy Bears".{enter} Sleep 1500 SendInput, {F6}/me протянул упаковку конфет пациенту{enter} Sleep 1500 SendInput, {F6}Внушите себе, что это лекарство. Так же, как Вы внушили себе, что у Вас болит голова.{enter} Sleep 500 SendInput, {F6}/medhelp{space} if var0=18 Sleep 1000 SendInput, {F6}Идите и гладьте — гладьте сухих и черных кошек,{enter} Sleep 1500 SendInput, {F6}Громадные брюха возьмете хвастливо,{enter} Sleep 1500 SendInput, {F6}Лоснящихся щек надуете пышки.{enter} Sleep 1500 SendInput, {F6}Лишь в кошках, где шерсти вороньей отливы,{enter} Sleep 1500 SendInput, {F6}Наловите глаз электрических вспышки.{enter} Sleep 1500 SendInput, {F6}Ваша голова болит из-за стресса. Кошка - лучший антидепрессант.{enter} Sleep 1500 SendInput, {F6}В любом случае, так считал Маяковский. Больше мне Вам нечем помочь.{enter} Sleep 500 SendInput, {F6}/medhelp{space} Return
Проблема следующая - скрипт не выбирает рандомную отыгровку, а попросту начинает гнать все подряд. Как это можно исправить?
Сообщение отредактировал [CM]Ghost101 - Пятница, 04.11.2016, 18:14
https://ru.wikipedia.org/wiki/Блок_(программирование) Подобно Си
Код
if var0 == 1 { Sleep 1000 SendInput, {F6}У других врачей больные умирают точно так же, как у меня.{enter} Sleep 1500 SendInput, {f6}Только мои умирают в хорошем настроении. Надеюсь, Вам это не грозит.{enter} Sleep 1500 SendInput, {F6}Я выпишу нужное для Вас лекарство. Оно должно помочь Вам.{enter} Sleep 1500 SendInput, {F6}/do На плече врача висит сумка с множеством различных лекарств.{enter} Sleep 1500 SendInput, {F6}/me вытащил из сумки пластинку нужных таблеток{enter} Sleep 1500 SendInput, {F6}/do К пластинке таблеток прикреплена инструкция по применению.{enter} Sleep 1500 SendInput, {F6}/me передал лекарство пациенту{enter} Sleep 1500 SendInput, {F6}Вы всегда можете прыгнуть с крыши, но я Вам не советую это делать.{enter} Sleep 500 SendInput, {F6}/medhelp{space} }
Сообщение отредактировал aknqkzxlcs - Пятница, 04.11.2016, 18:27