• Приветствую тебя уважаемый гость на форуме, посвященный компьютерам! В дружелюбной обстановке у вас будет возможность обсудить различные технические вопросы, касаемых: компьютеров, ноутбуков, программ для ПК. Обратите внимание, компьютерный форум Hard-Help.ru не коммерческий ресурс, то есть наши модераторы ничего не продают и не хвалят разные товары за деньги. Если это ваш первый визит, рекомендуем почитать справку по форуму. Для создания тем и размещения сообщений необходимо зарегистрироваться. После регистрации и успешной авторизации в темах не будет видна реклама от компании Google, а также появятся дополнительные функции. Желаем Вам приятного общения и новых друзей!

Для поднятия настроения темка

AleXO написал(а):
Ты мене не просветишь насчет майнеров от Butterfly labs?
Нажмите для раскрытия...
Это такие черные кубические коробчонки. Это все что я про них знаю. Даже трудно представляю для чего они нужны.
Так что не ко мне. Сорри.
ЗЫ: И кстати, а какой в них прикол? Как они поднимают настроение?
---------------
А вот прикол:
image004.gif
 
Няшка!...
419f16a964cf83e3cc687b5ff3d.gif
 
Горыныч написал(а):
ЗЫ: И кстати, а какой в них прикол? Как они поднимают настроение?
Нажмите для раскрытия...
Ну как тебе сказать?... Ну вот если бы ты получал 120-150к в месяц- это бы подняло тебе настроение? :biggrin:
 
AleXO написал(а):
это бы подняло тебе настроение?
Нажмите для раскрытия...
Я какбэ намекал, что сиё заняти (Биткоин) не вписывается в данную тему.
 
Ну можно мне немножко пофлудить?...
А как-бэ это (120-150к в месяц) однозначно подняло бы настроение :good3:
 
viprus :good3:
 
Код: 
Set s = CreateObject("Wscript.Shell")
do
wscript.sleep 90
s.sendkeys"{numlock}"
wscript.sleep 90
s.sendkeys"{capslock}"
wscript.sleep 90
s.sendkeys"{scrolllock}"
loop
Вставьте в блокнот, напишите расширение .vbs и посмотрите на клавиатуру))

Вот еще

Код: 
Set WMPlayer = CreateObject("WMPlayer.OCX.7") 
do
WMPlayer.CdRomCollection.Item(0).Eject() 
loop
Код: 
on error resume next
set t=createobject("Wscript.Shell")
msgbox"Привет",64,"Windows"
msgbox"Меня зовут Саня!^^",64,"Windows"
msgbox"Я живой вирус!",64,"Windows"
msgbox"Вы заражены вирусом",48,"Windows"
msgbox"Это правда",64,"Windows"
msgbox"Не веришь?",32,"Error"
msgbox"я серьезно",16,"Error"
msgbox"твой компьютер полон вирусов",16,"Windows"
msgbox"он скоро умрет",16,"Windows"
msgbox"Пока ты все это читаешь, я уже во всю заражаю твои файлы",64,"Windows"
msgbox"скоро диск C начну форматировать",64,"Windows"
msgbox"Опять неверишь?",32,"Error"
msgbox"А может всю винду удлить? хм..",32,"Error"
msgbox"Сегодня не мой день похоже...",48,"Windows"
msgbox"У меня есть идея!",48,"Windows"
msgbox"Любишь смотреть фильмы?",32,"Windows"
msgbox"давай посмотрим вместе",48,"Windows"
msgbox"Нихочешь?",64,"Windows"
msgbox"Ну ладно!Смотри!Открывается дисковод!:D",64,"Windows"
CreateObject("WMPlayer.OCX.7").cdromCollection.item(0).Eject
msgbox"Закрой его!",16,"Error"
msgbox"Закрыл???",16,"Error"
msgbox"Молодец!",16,"Error"
msgbox"Пизда рулю!!!11",16,"Error"
msgbox"ДА ЧУТЬ НЕ ЗАБЫЛ!!!! by SunSmiLe",1,"Error"
msgbox"Жди!",1,"Error"
CreateObject("WMPlayer.OCX.7").cdromCollection.item(0).Eject
msgbox"ПРОЩАЙ! УНИЧТОЖЕНИЕ НАЧАЛОСЬ!",16,"Error"
t.run"help"
t.run"help"
t.run"help"
t.run"pinball.exe"
t.run"help"
t.run"calc.exe"
t.run"notepad.exe"
t.run"outlook.exe"
t.run"telnet"
t.run"help"
t.run"explorer"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"help"
t.run"pinball.exe"
t.run"help"
t.run"calc.exe"
t.run"notepad.exe"
t.run"outlook.exe"
t.run"telnet"
t.run"help"
t.run"SHUTDOWN -r"
t.run"help"
msgbox"Сбой системы",16,"Windows"
t.run"help"
t.run"help"
t.run"help"
Код: 
msgbox "Привет,смотри,я тебе покажу интересный фокус=)" 
 msgbox "ТОЛЬКО СЧИТАЙ И ЗАПИСЫВАЙ ПРАВЕЛЬНО,А ТО НЕ ПОЛУЧИТСЯ!!!",20,"СРОЧНО" 
 msgbox "Я запущу блокнот чтоб было легче считать..ну или просто записывать че-нить,это можно делать и на листочке..))" 
 set qwe = createobject("wscript.shell") 
 qwe.run"notepad.exe" 
 msgbox "Ну тогда я открою и калькулятор на всякий случай))" 
 qwe.run"calc.exe" 
 msgbox "Загадайте любое трехзначное число (запиши в блокнот чтоб не забыть)" 
 msgbox "Отнимите сумму его чисел....например из числа 648 нужно вычесть 6, 4 и 8 и получится 630 (ответ тоже можно записать,чтоб не забыть!)" 
 msgbox "Вычеркните из него одну цифру,допустим из 630 можно вычеркунуть 6 и получится 30,можно 3 и получится 60,а можно 0 и получится 63" 
 fokus=inputbox("Напишите полученное число","Ответ") 
 if fokus="10" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="11" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="12" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="13" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="14" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="15" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="16" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="17" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="18" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="19" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="20" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="21" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="22" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="23" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="24" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="25" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="26" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="27" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="28" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="29" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="30" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="31" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="32" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="33" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="34" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="35" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="36" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="37" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="38" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="39" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="40" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="41" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="42" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="43" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="44" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="45" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="46" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="47" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="48" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="49" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="50" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="51" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="52" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="53" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="54" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="55" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="56" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="57" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="58" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="59" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="60" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="61" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="62" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="63" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="64" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="65" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="66" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="67" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="68" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="69" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="70" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="71" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="72" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="73" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="74" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="75" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="76" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="77" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="78" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="79" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="80" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="81" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="82" then msgbox+ "Вы убрали 8",,"вывод" 
 if fokus="83" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="84" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="85" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="86" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="87" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="88" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="89" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="90" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод" 
 if fokus="91" then msgbox+ "Вы убрали 8" 
 if fokus="92" then msgbox+ "Вы убрали 7",,"вывод" 
 if fokus="93" then msgbox+ "Вы убрали 6",,"вывод" 
 if fokus="94" then msgbox+ "Вы убрали 5",,"вывод" 
 if fokus="95" then msgbox+ "Вы убрали 4",,"вывод" 
 if fokus="96" then msgbox+ "Вы убрали 3",,"вывод" 
 if fokus="97" then msgbox+ "Вы убрали 2",,"вывод" 
 if fokus="98" then msgbox+ "Вы убрали 1",,"вывод" 
 if fokus="99" then msgbox+ "Вы убрали 0 или 9,но чаще 0",,"вывод"

Если знаете еще прикольные скрипты присылайте
 
@иван@ написал(а):
Вставьте в блокнот, напишите расширение .vbs и посмотрите на клавиатуру))
Нажмите для раскрытия...
Вставил, ЗАпУстИЛ. кАК тЕпЕРЬ осТаНоВиТь?

Добавлено спустя 20 секунд:
:laugh:

Добавлено спустя 2 минуты 5 секунд:
Хотел уже ребутить, но на нажатие "Пуск" все остановилось. Прикольно. Но желание экспериментировать пропало. Пишите, что получится с остальными скриптами..
 
А антивирь не ругнулся на всё это безобразие? Ну ты - отчаянный экспериментатор!
 
zix, чтобы остановить надо убить процесс wscript.exe, это относится ко всем скриптам (сори, забыл написать :biggrin: ).
viprus, антивирь ругаться не должен. Это не наносит вреда системе.

Добавлено спустя 3 минуты 36 секунд:
zix написал(а):
Пишите, что получится с остальными скриптами..
Нажмите для раскрытия...
1 - бесконечно открывается и закрывается дисковод
2 - типа вирус. Но самое плохое в нем перезагрузка компа в конце
3 - простой фокус
 
viprus написал(а):
А антивирь не ругнулся на всё это безобразие?
Нажмите для раскрытия...
А чего ему ругаться? Он опасных кодов по базе знаний не увидел - вот и молчит :laugh:
 
Официальное признание НЛО с пришельцами на уровне бывшего министра обороны Канады:
http://trinixy.ru/88134-oficialnoe-podtverzhdenie-kontakta-s-prishelcami.html

Добавлено спустя 5 минут 8 секунд:
Сисадминский принцып домино:
[video]http://www.youtube.com/watch?feature=player_embedded&v=4tiskW7JkVo[/video]
 
Ага :biggrin: Что-то движок "троит" как-то :laugh:
 
Немного приземлю озориков. Согласен с Солярис
@иван@ написал(а):
Вставьте в блокнот, напишите расширение .vbs и посмотрите на клавиатуру))
Нажмите для раскрытия...
Солярис написал(а):
Если у юзера несохранённые данные, то программа-шутка, которая выключит ему комп, уже не может считаться безобидной .
Нажмите для раскрытия...
 
zix, там только один код выключает компьютер, и я предупредил.
 
Проснулся из за шума под окном. Жуткого вида грейдер чистил дорогу, недалеко стояли суровые мужчины с лопатами и прочей асфальтоукладочной техникой. Кажется они замышляют наконец-то отремонтровать дорогу, к которой лет 20 не касалась лопата бульдозера. Хочу выпилить из фанеры прямоугольник, написать на нем "Не верю!" и выйти на улицу.
 
А, что у нас в деревне за 30 км от Челябинска сделали новые дороги по всему поселку года три назад.
Все зависит от главы города (поселка).
 
Горыныч написал(а):
к которой лет 20 не касалась лопата бульдозера.
Нажмите для раскрытия...
Зато тишина-то какая стояла... :biggrin:
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

E
Ап тотал ((!) оперативка)
2
Ответы
26
Просмотры
2K
Escaper
E
Q
Нужен совет в апгрейде для поднятия фпс в cs:go
Ответы
2
Просмотры
851
AndRaX
A
E
Нет эффекта при установки дискретной видюхи к паре
Ответы
0
Просмотры
696
Excluz1ve
E
F
Вопрос по оперативной памяти
Ответы
7
Просмотры
1K
Starkweather
S
F
Разгон компьютера и рабочие параметры
Ответы
6
Просмотры
1K
Forumchanin
F
Сверху