Autor
Mensaje
v3ctor
Analista Programador
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación:
Uruguay
"Ayudame" ( Programa De Consola O Terminal)
buenas...
mi nuevo y único proyecto de consola se llama "Ayudame"
el proyecto esta en la granja para descargar estoy en las primeras pruebas del proyecto.
http://novatocodegambas.blogspot.co...de-consola.html
Objetivos de esta aplicación de consola.
1- ver que comandos tenemos disponibles para tareas X
2-ejemplos sencillos de uso de esos comandos.
===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog:
http://novatocodegambas.blogspot.com.uy/
última edición por v3ctor el Jueves, 12 May 2016, 17:43; editado 1 vez
#1 Miercoles, 11 May 2016, 21:34
jousseph
jousseph germaine celis zambrano
Analista Programador
Registrado: Julio 2010
Mensajes: 434
Edad: 38
Ubicación:
Tachira
Re: "Ayudame" ( Programa De Consola O Terminal)
Hola V3ctor aqui te muestro una terminal mejorada la que llevo en fase casi terminada llamada gestor-((jou)) que es un gestor de operaciones:
Video fase viejito
https://foro.gambas-es.org/viewtopi...ighlight=gestor
Link
Aqui casi perfecta:
https://foro.gambas-es.org/viewtopi...hlight=terminal
Te invito a que la pruebes.
Saludos
última edición por jousseph el Jueves, 12 May 2016, 07:54; editado 2 veces
#2 Jueves, 12 May 2016, 07:50
v3ctor
Analista Programador
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación:
Uruguay
Re: "Ayudame" ( Programa De Consola O Terminal)
el código fuente?
===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog:
http://novatocodegambas.blogspot.com.uy/
#3 Jueves, 12 May 2016, 17:41
v3ctor
Analista Programador
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación:
Uruguay
Re: "Ayudame" ( Programa De Consola O Terminal)
alguien sabe como limpiar la pantalla en la terminal misma donde esta funcionando el programa?
ejemplo hay un menú en pantalla y quiera limpiar la pantalla para mostrar otro menú.
===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog:
http://novatocodegambas.blogspot.com.uy/
#4 Jueves, 12 May 2016, 18:23
shordi
Analista Programador
Registrado: Septiembre 2009
Mensajes: 4982
Edad: 64
Ubicación:
Albacete
Re: "Ayudame" ( Programa De Consola O Terminal)
Prueba con el comando "clear" del sistema operativo. Ejecutado con exec no con shell.
===================No podemos regresar
#5 Jueves, 12 May 2016, 18:40
v3ctor
Analista Programador
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación:
Uruguay
Re: "Ayudame" ( Programa De Consola O Terminal)
Prueba con el comando "clear" del sistema operativo. Ejecutado con exec no con shell.
no funciona me tira esto: TERM environment variable not set.
===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog:
http://novatocodegambas.blogspot.com.uy/
#6 Jueves, 12 May 2016, 20:20
jousseph
jousseph germaine celis zambrano
Analista Programador
Registrado: Julio 2010
Mensajes: 434
Edad: 38
Ubicación:
Tachira
Re: "Ayudame" ( Programa De Consola O Terminal)
Prueba con el comando "clear" del sistema operativo. Ejecutado con exec no con shell.
no funciona me tira esto: TERM environment variable not set.
V3ctor deberias de experimentar con los ejemplos que trae
gambas de consola, yo me esforze en hacerle todas las respectivas funciones y los codigos estan en todos lados.
Con respecto a lo tuyo yo utilizo es un textarea para mostrar la lectura del bash asi solo hago un clear o "" para borrar la misma, a mi me salio muchisimo mejor desarrollandolo de esta manera y me ayuda a gestionar las operaciones eficientemente del SO.
última edición por jousseph el Jueves, 12 May 2016, 21:59; editado 1 vez
#7 Jueves, 12 May 2016, 21:46
v3ctor
Analista Programador
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación:
Uruguay
Re: "Ayudame" ( Programa De Consola O Terminal)
experimentar con los ejemplos de consola en gambas.
no tengo claro cuales son...
podrías enumerarlos acá?
===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog:
http://novatocodegambas.blogspot.com.uy/
#8 Jueves, 12 May 2016, 21:57
jousseph
jousseph germaine celis zambrano
Analista Programador
Registrado: Julio 2010
Mensajes: 434
Edad: 38
Ubicación:
Tachira
Re: "Ayudame" ( Programa De Consola O Terminal)
experimentar con los ejemplos de consola en gambas.
no tengo claro cuales son..
podrías enumerarlos acá?
V3ctor mi consola la desarrolle desde el
gambas 3.1 y ahorita noto que el
gambas moderno trae las cosas diferentes busca en la famosa granja si esta la consola de comandos si no te perdiste algo valioso.
#9 Jueves, 12 May 2016, 22:06
v3ctor
Analista Programador
Registrado: May 2013
Mensajes: 1786
Edad: 44
Ubicación:
Uruguay
Re: "Ayudame" ( Programa De Consola O Terminal)
experimentar con los ejemplos de consola en gambas.
no tengo claro cuales son..
podrías enumerarlos acá?
V3ctor mi consola la desarrolle desde el
gambas 3.1 y ahorita noto que el
gambas moderno trae las cosas diferentes busca en la famosa granja si esta la consola de comandos si no te perdiste algo valioso.
lo he recuperado primero descargar los ejemplos viejos ver imagen
segundo ir a ver imagen
' gambas class file
Private $hProcess As Process
Private $sText As String
Static Public Sub Main( )
Dim hForm As Form
hForm = New FConsole
hForm.Show
End
Public Sub _new( )
$hProcess = Exec [ "bash" , "--noediting" ] For Input Output As "Process"
End
Public Sub Form_Close( )
$hProcess.Kill
End
Public Sub Process_Read( )
Dim sStr As String
'Debug Eof(Last);; Lof(Last);;
'While Not sStr
Read #$hProcess, sStr, - 256
'Wend
'Error sStr
$sText = $sText & sStr
'Debug Quote(sStr)
UpdateConsole
End
Public Sub Process_Error( sStr As String )
$sText = $sText & sStr
UpdateConsole
End
Private Sub UpdateConsole( )
Dim iPos As Integer
Dim sStr As String
While Len ( $sText)
iPos = InStr ( $sText, "\n " )
If iPos = 0 Then iPos = Len ( $sText)
sStr = Normalize( Left$ ( $sText, iPos) )
'Debug sStr
$sText = Mid$ ( $sText, iPos + 1)
txtConsole.Pos = txtConsole.Length
txtConsole.Insert ( sStr)
Wend
End
Public Sub Process_Kill( )
'hProcess = NULL
Try Me .Close
End
Public Sub txtCommand_Activate( )
Dim sLig As String
sLig = txtCommand.Text & gb.NewLine
'txtConsole.Pos = txtConsole.Length
'txtConsole.Insert("# " & sLig)
txtCommand.Clear
sLig = Conv$ ( sLig, Desktop .Charset , System .Charset )
Print #$hProcess, sLig;
End
Static Private Function Normalize( sStr As String ) As String
Dim sNorm As String
Dim iInd As Integer
Dim iCar As Integer
Dim bEsc As Boolean
' For iInd = 1 To Len(sStr)
'
' iCar = Asc(sStr, iInd)
'
' If iCar = 27 Then
' bEsc = True
' Continue
' Endif
'
' If bEsc Then
' If iCar < 32 Then bEsc = False
' Continue
' Endif
'
' If iCar < 32 And iCar <> 10 Then iCar = 32
'
' sNorm = sNorm & Chr$(iCar)
'
' Next
sNorm = sStr
If System .Charset = Desktop .Charset Then
Return sNorm
Else
Return Conv$ ( sNorm, System .Charset , Desktop .Charset )
Endif
End
Public Sub Form_Open( )
txtCommand.SetFocus
End
Public Sub btnCtrlC_Click( )
Print #$hProcess, Chr$ ( 3) ;
End
Public Sub btnCtrlD_Click( )
Print #$hProcess, Chr$ ( 4) ;
End
Public Sub btnCtrlZ_Click( )
Print #$hProcess, Chr$ ( 26) ;
End
===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog:
http://novatocodegambas.blogspot.com.uy/
última edición por v3ctor el Jueves, 12 May 2016, 22:41; editado 1 vez
#10 Jueves, 12 May 2016, 22:30