Постановка на учёт беспилотников

Ser_Che
PolSerg:

разумеется речь идет о средне статистических показателях, и возможно Вас это не коснется

Вы поосторожнее там, зануды тоже долго не живут. )

EVIL
PolSerg:

К нашей медицине эта статистика никак не относится,

К вашей это к какой? 😆

После некоторой череды событий, я медицину как науку не уважаю.

PolSerg:

статистика непреклонна и говорит не только о том что пьянство повышает риск преждевременной смерти,

Если на то пошло, то сама по себе жизнь это болезнь со смертельным исходом.😈

Ser_Che
PolSerg:

К нашей медицине эта статистика никак не относится

Вы точно из РФ ?

EVIL:

К вашей это к какой? После некоторой череды событий, я медицину как науку не уважаю.

ППКС

EVIL:

жизнь это болезнь со смертельным исходом.

Золотые слова!
Официальная статистика утверждает: продолжительность жизни врачей в среднем на пятнадцать лет короче, чем у пациентов.

rg.ru/2011/06/17/mediki.html
Уж они то должны быть долгожителями-профессионалами. )

Ser_Che
V_Alex:

Хулиган, но мотивы вполне понятны. Видимо остальные способы уже не сработали.

Прекрасный повод запретить полеты из-за мудаков, которые любят шуметь по ночам.

PolSerg
Ser_Che:

Официальная статистика утверждает: продолжительность жизни врачей в среднем на пятнадцать лет короче, чем у пациентов.
Уж они то должны быть долгожителями-профессионалами. )

Вы статью-то прочитали? Процитирую:

  • Мы ожидали, что здорового образа жизни придерживаются не менее 80 процентов врачей. Реальность оказалась гораздо печальнее, - считает Терентьев. - Следят за собой лишь 41 процент медиков. Физкультурой занимаются 6 процентов сельских врачей, 20 процентов - городских и четверть - университетских клиницистов. Нормальный режим сна и отдыха соблюдают 20 процентов сельских медиков. У горожан этот показатель не дотягивает до 29 процентов, 39 процентов сотрудников медуниверситета заявили, что с отдыхом у них все в порядке. Согласитесь, показатели не радужные.

Крайне неблагоприятно обстоят дела в медицинской среде и с питанием. Лишний вес наблюдается у 74 процентов сельских эскулапов. Причем это не просто склонность к полноте, а практически ожирение. Этим грешат 48 процентов городских медиков и 46 процентов - университетских сотрудников. Нарушение веса сопровождается артериальной гипертонией. Однако люди, у которых аппарат для измерения давления под рукой круглосуточно, не удосуживаются фиксировать свои показатели, хотя прекрасно знают последствия.

Сегодня медики с тревогой говорят об эпидемии хронических неинфекционных заболеваний - ожирении, сахарном диабете, гипертонии, ишемической болезни сердца и мозга. Тем не менее, каждый четвертый врач не знает свой уровень холестерина и глюкозы в крови. Настораживает и другое: половина городских врачей признались, что снимают стресс при помощи рюмки. И почти треть не прочь выкурить сигарету. Среди сельских медиков эти показатели несколько ниже - 36 и 34 процента соответственно.

Это классическое “сапожник без сапог”.

Ser_Che
PolSerg:

“сапожник без сапог”.

И эти люди запрещают мне ковырять в носу…
Читал конечно.
Это только подтверждает, мягко говоря, ошибочность современной медицины.

Игорь_Петрович

ээ доказано что ковыряние в носу стимулирует деятельность головного мозга ,хм… теми же докторами

Ser_Che
Игорь_Петрович:

ковыряние в носу стимулирует деятельность головного мозга ,хм… теми же докторами

Убедили ))

PolSerg
Ser_Che:

И эти люди запрещают мне ковырять в носу…

Ни один врач, по крайней мере в нашей стране, ничего никогда никому не запрещал, наши врачи только и исключительно занимаются лечением болезней, а не профилактикой их возникновения, более того сами не имеют понятия о причинах, и выше приведенная статистика только подтверждает это. Причины возникновение болезней пытаются установить ученые в различных странах мира и в нашей в том числе, но конечной стадией работы ученых являются научные статьи в научных же изданиях, а далее некоторые статьи вызывают интерес различных организаций из разряда ВОЗ, различных потреб надзоров и т.д., некоторый интерес перерастает в рекомендации, а особо интересные в законотворческую деятельность, но по большому счету, на ваше здоровье наплевать всем, и печально что вам тоже на него наплевать.

Ser_Che

Немного по теме, погоды стоят хорошие,далеко видно летающие в округе вертолеты, летают они явно ниже 100м даже над городом.
Потому и не дают нам этот стакан 100м.

PolSerg:

Ни один врач, по крайней мере в нашей стране, ничего никогда никому не запрещал,

Ser_Che:

Вы поосторожнее там, зануды тоже долго не живут. )

PolSerg:

но по большому счету, на ваше здоровье наплевать всем, и печально что вам тоже на него наплевать.

PolSerg:

но конечной стадией работы ученых являются научные статьи в научных же изданиях,

Зачем нам на это бумаготоворчество тратить бюджет?
Может стоит заняться прямым делом, просвещением людей,поиском эффективных способов поддержания здоровья, работу по очищению торговли от суррогатов,отравы и наркотиков…Но молчат светила медицины…(

PolSerg
Ser_Che:

работу по очищению торговли от суррогатов,отравы и наркотиков.

Торговлю чистить побаиваются, потому как торговля это деньги и у многих денег веревочки тянутся на верх. А просветительскую деятельность ведут, например Россия 1 вещает передачу “О самом главном” - но тайны там никакой нет: не пить, не курить, умеренно заниматься спортом, поменьше жрать быстрых углеводов и твердых жиров, и следить за состоянием своего здоровья.

Ser_Che
PolSerg:

Торговлю чистить побаиваются, потому как торговля это деньги и у многих денег веревочки тянутся на верх.

Без этого , остальное пустой треп.Нужна политическая воля, а не только полеты со стерхами.

PolSerg:

но тайны там никакой нет: не пить, не курить,

Пока будут рулить воры и паразиты, у человека очень слабая мотивация жить долго и беречь здоровье.

PolSerg
Ser_Che:

у человека очень слабая мотивация жить долго и беречь здоровье

Ну, как сказать, в 90е реально спились все кто только мог, а сейчас в спортзале не протолкнуться…

rcd4slash
PolSerg:

а сейчас в спортзале не протолкнуться.

Чтобы лучше толкаться в сп.зале нужно покупать спортивное питание в спец магазинах. Но это к слежению за своим здоровьем не имеет никакого отношения. А скорее всего безопаснее для здоровья пить спиртные напитки чем употреблять это “спортивное питание”.

Как в тех же 90-х говорил Дольф Люнгрен Жану Клоду Вану Даму в фильме “Универсальный солдат” - “Ты стал слаб солдат, надо было принимать лекарства …” .

Ser_Che
rcd4slash:

Но это к слежению за своим здоровьем не имеет никакого отношения

Голая коммерция, индустрия здоровья типа, а на деле очередной красивый сбор средств у населения.
Спортсмены долгожители большая редкость.

PolSerg:

а сейчас в спортзале не протолкнуться…

По теме вопрос , вы лично Сергей , как выходите из ситуации с получением разрешения на полеты?

На чем летаете? Где? Если не секрет, ответьте пожалуйста.

PolSerg
Ser_Che:

По теме вопрос , вы лично Сергей , как выходите из ситуации с получением разрешения на полеты?
На чем летаете? Где? Если не секрет, ответьте пожалуйста.

А я уже в этой теме отвечал, что разрешение на полеты это капитальное зло и пока для себя единственное решение которое я нашел это прикупил тинивуп Eachine Trashcan, летаю по своему строящемуся дому, а иногда его можно увидеть проносящимся по моему огороду, но управляю им конечно не я, я же человек законопослушный, а лицо сильно похожее на меня, но он настолько мелкий, что его никто и не заметит, но достаточно шустрый чтобы потренироваться в различных акробатических трюках и получить дозу адреналина.

Ser_Che:

Спортсмены долгожители большая редкость.

Так то профессиональный спорт, в спортзале городской житель всего лишь получает адекватную физическую нагрузку, это скорее физическая культура нежели чем спорт.

rcd4slash:

А скорее всего безопаснее для здоровья пить спиртные напитки чем употреблять это “спортивное питание”.

Это даже комментировать смешно, сравнивать высушенную молочную сыворотку со спиртными напитками…

Ser_Che
PolSerg:

сравнивать высушенную молочную сыворотку

Нуу, я совсем не сведущ, но то, что удавалось узнать от знакомых, посещающих залы, то состав спорткорма не настолько безобидный.

AsMan

Вот так и летаем:

'Copyright © Microsoft Corporation. All rights reserved.
'////////////////////////////////////////////////////////////////////////////////////////
'////////////////////////////////////////////////////////////////////////////////////////
CONST wshOK =0
CONST VALUE_ICON_WARNING =16
CONST wshYesNoDialog =4
CONST VALUE_ICON_QUESTIONMARK =32
CONST VALUE_ICON_INFORMATION =64
CONST HKEY_LOCAL_MACHINE =&H80000002
CONST KEY_SET_VALUE =&H0002
CONST KEY_QUERY_VALUE =&H0001
CONST REG_SZ =1
CONST OfficeAppId = “0ff1ce15”
CONST STR_SYS32PATH = “:\Windows\System32\”
CONST STR_OSPPREARMPATH = “\Microsoft Office\Office16\OSPPREARM.EXE”
CONST STR_OSPPREARMPATH_DEBUG = “\Microsoft Office Debug\Office16\OSPPREARM.EXE”
CONST REG_OSPP = “SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform”
CONST STR_HEARTBEATPATH = “\Microsoft\Office\Heartbeat\HeartbeatCache.xml”
CONST REG_SPP = “SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform”
CONST REG_SCAEXP_BASE = “HKCU\SOFTWARE\Microsoft\Office\16.0\Common\ExperimentEcs\”
CONST REG_SCAEXP_END = “\Flights\ofc5jurcw0”
CONST REG_SCAEXP_OVERRIDE = “HKLM\SOFTWARE\Microsoft\Office\Common\Experiment\ofc545rcw0”
CONST REG_SCAO15 = “HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration\SharedComputerLicensing”
CONST REG_SCAO16 = “HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration\SharedComputerLicensing”
CONST VALUE_SCAEXP_FLAVOR = “exp”
CONST VALUE_SCAEXP_OVERRIDE_FLAVOR = “expoverride”
CONST VALUE_SCAO15_FLAVOR = “o15”
CONST VALUE_SCA016_FLAVOR = “o16”
CONST VALUE_SCAREGKEY_SINGLE_TYPE = “single”
CONST VALUE_SCAREGKEY_PER_APP_TYPE = “perapp”
CONST VER_INFO = “Version Info: 2016 1.0”
'////////////////////////////////////////////////////////////////////////////////////////
CONST MSG_NOREGRIGHTS = “Insufficient rights to perform operation.”
CONST MSG_ISCMD_ELEVATED = “Ensure cmd.exe is elevated (right click > run as administrator).”
CONST MSG_CREDENTIALFAILURE = “Connection failed with passed credentials.”
CONST MSG_FILENOTFOUND = "File not found: "
CONST MSG_SEPERATESMALL = “---------------”
CONST MSG_SEPERATE = “---------------------------------------”
CONST MSG_PROCESSING = “—Processing--------------------------”
CONST MSG_EXIT = “—Exiting-----------------------------”
CONST MSG_UNSUPPORTED = “Unsupported command passed.”
CONST MSG_UNSUPPORTEDOPEROS7 = "The following command is supported on Windows 7 only: "
CONST MSG_UNSUPPORTEDOPEROS8 = "The following command is supported on Windows 8 and above only: "
CONST MSG_UNSUPPORTEDLOCAL = "The following command is supported on local machine only: "
CONST MSG_CREDENTIALERR = “Passing credentials is not supported for this command.”
CONST MSG_SUCCESS = “Successfully applied setting.”
CONST MSG_NOKMSLICS = “No Office KMS licenses were found on the system.”
CONST MSG_ACTATTEMPT = “Installed product key detected - attempting to activate the following product:”
CONST MSG_TOKACTATTEMPT = “Installed product key detected - attempting to token activate the following product:”
CONST MSG_NOKEYSINSTALLED = “<No installed product keys detected>”
CONST MSG_UNINSTALLKEYSUCCESS = “<Product key uninstall successful>”
CONST MSG_ACTSUCCESS = “<Product activation successful>”
CONST MSG_OFFLINEACTSUCCESS = “<Offline product activation successful>”
CONST MSG_KEYINSTALLSUCCESS = “<Product key installation successful>”
CONST MSG_PARTIALKEY = "Last 5 characters of installed product key: "
CONST MSG_UNINSTALLKEY = "Uninstalling product key for: "
CONST MSG_UNRECOGFILE = “Unrecognized file. Office licenses have an .xrm-ms file extension.”
CONST MSG_INSTALLLICENSE = "Installing Office license: "
CONST MSG_INSTALLLICSUCCESS = “Office license installed successfully.”
CONST MSG_SEARCHEVENTSKMS = "Searching for KMS activation events on machine: "
CONST MSG_SEARCHEVENTSRET = "Searching for Internet activation failure events on machine: "
CONST MSG_NOEVENTSSKMS = "No KMS activation events found on machine: "
CONST MSG_NOEVENTSRET = "No failure events found on machine: "
CONST MSG_OSPPSVC_NOINSTALL = “Error: The Software Protection Platform service is not installed.”
CONST MSG_OSPPSVC_NORUN = “Error: The Software Protection Platform service is not running.”
CONST MSG_ERRPARTIALKEY = “The last 5 characters of an installed product key are required to run this option. Run the /dstatus option to display the partial product key.”
CONST MSG_KEYNOTFOUND = “<Product key not found>”
CONST MSG_CMID = "Client Machine ID (CMID): "
CONST MSG_CMID_NOTFOUND = “Not found.”
CONST MSG_NOLICENSEFOUND = “<No licenses found>”
CONST MSG_AUTHERR = “Authorization Error: 0x”
CONST MSG_REMILID = "Removed Token-based Activation License with License ID (ILID): "
CONST MSG_NOTFOUNDILID = "License not found with License ID (ILID): "
CONST MSG_KMSLOOKUP = “KMS Lookup Domain: "
CONST MSG_INFO_ONLY = " (for information purposes only as the status is licensed)”
CONST MSG_ACT_ERROR_FOUND_KB = "NOTICE: A KB article has been detected for activation failure: "
CONST MSG_ACT_ERROR_KB_LINK = “FOR MORE INFORMATION PLEASE VISIT: support.microsoft.com/kb/2870357#Error0x
CONST MSG_SCAEXP = "SCA Mode Experiment key "
CONST MSG_SCAEXP_OVERRIDE = "SCA Mode Experiment Override key "
CONST MSG_SCAO15 = "SCA Mode for O15 key "
CONST MSG_SCAO16 = "SCA Mode for O16 key "
CONST MSG_SCAREGKEY_ACTIVE = “found ENABLED.”
CONST MSG_SCAREGKEY_INACTIVE = “found DISABLED.”
'////////////////////////////////////////////////////////////////////////////////////////
CONST MSG_VLActivationType = "Activation Type Configuration: "
'////////////////////////////////////////////////////////////////////////////////////////
CONST MSG_Act_Recent = "Most recent successful activation client information: "
CONST MSG_KMS_DNS = "KMS machine name from DNS: "
CONST MSG_KMS_DNS_ERR = “DNS auto-discovery: KMS name not available”
CONST MSG_ADInfoAOName = "Activation Object name: "
CONST MSG_ADInfoAODN = "AO DN: "
CONST MSG_ADInfoExtendedPid = "AO extended PID: "
CONST MSG_ADInfoActID = "AO activation ID: "
CONST MSG_ACTIVATION_INTERVAL = "Activation Interval: "
CONST MSG_RENEWAL_INTERVAL = "Renewal Interval: "
CONST MSG_HOST_CACHING = "KMS host caching: "
CONST MSG_HOST_REG_OVERRIDE = "KMS machine registry override defined: "
CONST MSG_DEFAULT_PORT = “1688”
'////////////////////////////////////////////////////////////////////////////////////////
CONST MSG_PID = "PRODUCT ID: "
CONST MSG_SKUID = "SKU ID: "
CONST MSG_LICENSENAME = "LICENSE NAME: "
CONST MSG_DESCRIPTION = "LICENSE DESCRIPTION: "
CONST MSG_LICSTATUS = "LICENSE STATUS: "
CONST MSG_LICENSED = " —LICENSED— "
CONST MSG_UNLICENSED = " —UNLICENSED— "
CONST MSG_OOBGRACE = " —OOB_GRACE— "
CONST MSG_OOTGRACE = " —OOT_GRACE— "
CONST MSG_NONGENGRACE = " —NON_GENUINE_GRACE— "
CONST MSG_NOTIFICATION = " —NOTIFICATIONS— "
CONST MSG_EXTENDEDGRACE = " —EXTENDED GRACE— "
CONST MSG_LICUNKNOWN = " —UNKNOWN— "
CONST MSG_REMAINGRACE = "REMAINING GRACE: "
CONST MSG_LICEXPIRY = "BETA EXPIRATION: "
CONST MSG_ERRCODE = "ERROR CODE: "
CONST MSG_ERRDESC = "ERROR DESCRIPTION: "
CONST MSG_ERRUNKNOWN = “An unknown error occurred.”
CONST MSG_ERRCODEVALUE = “An error code must start with ‘0x’. Example: 0xC004F009”
'////////////////////////////////////////////////////////////////////////////////////////
CONST MSG_NOEVENTS = “No events found.”
CONST MSG_HEARTBEAT_LOCALONLY = “HEARTBEATCACHE.XML SUPPORTED FOR LOCAL MACHINE ONLY.”
CONST MSG_SEARCHFOR = "SEARCHING FOR INSTANCES OF "
CONST MSG_SEARCH_FORKEY = "SEARCHING FOR OFFICE PRODUCT KEYS ON MACHINE: "
CONST MSG_EVENT_1013 = "ACTIVATION SUCCESS EVENT: "
CONST MSG_EVENT_8200 = "ACTIVATION FAILURE EVENT: "
CONST MSG_EVENT_1016 = "INSTALL PRODUCT KEY SUCCESS EVENT: "
CONST MSG_EVENT_1017 = "INSTALL PRODUCT KEY FAILURE EVENT: "
CONST MSG_EVENT_2011 = "OLC-OLS EVENT: "
CONST MSG_NOKEYSINSTALLED_SUB = “<<<<< NO INSTALLED -SUBSCRIPTION- PRODUCT KEYS DETECTED >>>>>”
CONST MSG_NOKEYSINSTALLED_PERP = “<<<<< NO INSTALLED -PERPETUAL- PRODUCT KEYS DETECTED >>>>”
CONST MSG_KEYSINSTALLED_SUB = “<<<<< -SUBSCRIPTION- PRODUCT KEY DETECTED. REPORTING ON ADDITIONAL PROPERTIES >>>>>”
CONST MSG_KEYSINSTALLED_PERP = “<<<<< -PERPETUAL- PRODUCT KEY DETECTED. REPORTING ON ADDITIONAL PROPERTIES >>>>>”
CONST MSG_SCAREGKEYS = “SCA REGISTRY KEYS”
'////////////////////////////////////////////////////////////////////////////////////////
'////////////////////////////////////////////////////////////////////////////////////////
On Error Resume Next

Set WshShell = WSCript.CreateObject(“WSCript.Shell”)
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
Set objNetwork = WSCript.CreateObject(“WSCript.Network”)

Dim globalResource, globalErr, foundSlUi, strSluiPath, strLocal, objWMI, objWMI1, wmiErr, productinstances, strValue, Win7, productClass, tokenClass, intIsKms, kmsCounter, isAdActivated, dlicense, foundSubKey, foundPerpKey, Win8, strSkuId, errorKBs, getHeartBeat
globalResource = “”
globalErr = “”
foundSlUi = False
Win7 = False
Win8 = False
kmsCounter = 0
isAdActivated = False
dlicense = False
strSkuId = Null

currentDir = Left(WScript.ScriptFullName, InStrRev(WScript.ScriptFullName, “\”))

’ Activation error codes for which a KB is available
errorKBs = “80070422|80070426|C004F074|80070001|80070005|8007000D|8007232B|8007251D|C004F014|C004F038|C004F039|C004F041|C004F042|C004C003|4004F040”

Dim result, keyValue
keyValue = WshShell.RegRead(key)

If Err.Number = 0 Then
If keyValue = 1 Then
WScript.Echo message & MSG_SCAREGKEY_ACTIVE
result = True
Else
WScript.Echo message & MSG_SCAREGKEY_INACTIVE
result = False
End If

WScript.Echo key
WScript.Echo MSG_SEPERATESMALL
Else
result = False
End If
Err.Clear

readAndReportScaKey = result
End Function
'////////////////////////////////////////////////////////////////////////////////////////
'////////////////////////////////////////////////////////////////////////////////////////
‘’ SIG ‘’ Begin signature block

‘’ SIG ‘’ End signature block

SAN

Вот так и летаем:
'Copyright © Microsoft Corporation. All rights reserved.
'////////////////////////////////////////////////////////////////////////////////////////
'////////////////////////////////////////////////////////////////////////////////////////
CONST wshOK =0