gambafeliz 18-09-2020, 17:35
Hola
He visto que en Debian 10 se puede hibernar desde la consola de esta forma:
Instalo hibernate
$ sudo apt-get install hibernate
Después desde la consola hago esto: (Esto siempre funciona muy bien desde la consola, cuando uno lo necesite)
$ su -
Contraseña:
$ sudo hibernate
hibernate:Warning: Tuxonice binary signature file not found.
Ahora yo me voy a crear un atajo de teclado y todo bien pero cuando pongo en este atajo de teclado el comando y escribo sudo hibernate y hago la acción de teclado elegida no funciona, cambio el comando por ejemplo por nautilus y funciona.
Se me ocurrió hacer un Shell (sh) pero no funciona o no se como hacerlo funcionar desde el atajo de teclado.
Por favor, ¿Alguien me dice como puedo hacer el sudo hibernate desde el comando del atajo de teclado?
Gracias.
He visto que en Debian 10 se puede hibernar desde la consola de esta forma:
Instalo hibernate
$ sudo apt-get install hibernate
Después desde la consola hago esto: (Esto siempre funciona muy bien desde la consola, cuando uno lo necesite)
$ su -
Contraseña:
$ sudo hibernate
hibernate:Warning: Tuxonice binary signature file not found.
Ahora yo me voy a crear un atajo de teclado y todo bien pero cuando pongo en este atajo de teclado el comando y escribo sudo hibernate y hago la acción de teclado elegida no funciona, cambio el comando por ejemplo por nautilus y funciona.
Se me ocurrió hacer un Shell (sh) pero no funciona o no se como hacerlo funcionar desde el atajo de teclado.
Por favor, ¿Alguien me dice como puedo hacer el sudo hibernate desde el comando del atajo de teclado?
Gracias.
vuott 16-09-2020, 03:01
Os dejo un Metronomo para console muy muy sencillo: 
Código:
Private Const METRONOMO As String = "|------||------|"
Public Sub Main()
Dim t, d, bpm As Short
Dim mtr As String
bpm = 90
t = 1
Print
Do
d += Sgn(Sin(2 * Pi(1) * (t / 32)))
mtr = METRONOMO
Mid(mtr, d, 1) = "\e[31m\e[1mO\e[0m"
Write #File.Out, "\r" & mtr & " = " & CStr(bpm) & " bpm "
Flush #File.Out
If t == 31 Then t = 1
Wait (60 / bpm) / 16
Inc t
Loop
End
vuott 15-09-2020, 18:11
Os dejo este simple codigo para dibujar la Espiral de Arquímedes:
Código:
Private DrAr As DrawingArea
Private Const A As Float = 4.0
Private Const B As Float = 4.0
Private Const KYKLOS As Float = 26.0
Private Const PASOS As Integer = 200
Private incr As Float = 1.0 / PASOS
Public Sub Form_Open()
With Me
.W = Screen.AvailableWidth
.H = Screen.AvailableHeight
.Center
End With
With DrAr = New DrawingArea(Me) As "DrAr"
.X = 0
.Y = 0
.W = Me.W
.H = Me.H
.Background = Color.White
End With
End
Public Sub DrAr_Draw()
Dim x, y As Integer
Dim i As Float
x = DrAr.W / 2
y = DrAr.H / 2
With Paint
While i <= KYKLOS * Pi
.FillRect(x + (A + B * i) * Cos(i), y + (A + B * i) * Sin(i), 2, 2, Color.Red)
i += incr
Wend
.End
End With
End
Bienvenido, Invitado
Últimos temas
Gambas 3.21.1
Foro: Mundo LinuxÚltimo mensaje por: jguardon, 20-05-2026, 22:29
Respuestas: 1 - Vistas: 98
Problema con instalación ...
Foro: WebApp/WebFormsÚltimo mensaje por: guizans, 19-05-2026, 18:54
Respuestas: 1 - Vistas: 121
Problema con el repósito ...
Foro: InstalaciónÚltimo mensaje por: guizans, 14-04-2026, 21:38
Respuestas: 2 - Vistas: 393
UEFI y BIOS
Foro: Hardware & IoTÚltimo mensaje por: guizans, 13-04-2026, 21:22
Respuestas: 3 - Vistas: 2,559
Visual Studio Code con Ga...
Foro: GeneralÚltimo mensaje por: guizans, 07-03-2026, 14:24
Respuestas: 2 - Vistas: 794