
Les drones

Copier coller le texte dans un bloc note pour recuperer votre clé windows.
Set WshShell = CreateObject("WScript.Shell")
MsgBox ConvertToKey(WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId"))
Function ConvertToKey(Key)
Const KeyOffset = 52
i = 28
Chars = "BCDFGHJKMPQRTVWXY2346789"
Do
Cur = 0
x = 14
Do
Cur = Cur * 256
Cur = Key(x + KeyOffset) + Cur
Key(x + KeyOffset) = (Cur \ 24) And 255
Cur = Cur Mod 24
x = x -1
Loop While x >= 0
i = i -1
KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
If (((29 - i) Mod 6) = 0) And (i <> -1) Then
i = i -1
KeyOutput = "-" & KeyOutput
End If
Loop While i >= 0
ConvertToKey = KeyOutput
End Function
Un drone est un aéronef (ou objet volant) sans humain à bord. Sa taille varie entre celle d’un insecte à celle d’un Predator américain faisant près de 15m d’envergure.
L’usage du mot « drone » pour décrire un véhicule ou robot terrestre, de surface ou sous-marin, doté d’autonomie, est une particularité française.
La classification américaine des mobiles autonomes sans humain à bord en UAV/UAS (aériens), USV/USS (de surface), UUV/UUS (sous-marins), UGV/UGS (robots terrestres) est la plus couramment utilisée dans le monde.
Le principe des drones peut être rapproché, à celui de l'aéromodélisme, selon lequel des petites maquettes sont pilotées par télécommandes. On distingue toutefois deux catégories de drones : ceux qui requièrent effectivement l'assistance d'un pilote au sol, par exemple pour les phases de décollage et d'atterrissage, et ceux qui sont entièrement autonomes. Cette autonomie de pilotage peut s'étendre à la prise de décision opérationnelle pour réagir face à tout événement aléatoire en cours de mission ; elle constitue la deuxième caractéristique essentielle des drones.