Que son las lineas de codigo???

[a4avant]

Fitille, es más entendido en programación, pero creo que es algo así:

 

Un script es un "mini-programa" (como un bat en windows) que se utiliza para ¿facilitar el trabajo? :clap1:

 

Y el código fuente en sí son las líneas de codigo que se escriben para crear el programa.

 

Creo que es eso.

[a4avant]

Fitille, yo es que de programación, muy cortito, eso si, los scripts de iptables, al dedillo :clap1:

[RomuloTDI]

Bueno, pero porque el SO no me reconoce el archivo que baje de la pagina que vimos antes???

[CopyrighTT]

dios que pereza :clap1:

[fitille]

Fitille, yo es que de programación, muy cortito, eso si, los scripts de iptables, al dedillo :clap1:

 

Si, si, de hecho un buen sistema operativo sin un puen procesador de comandos (SHell) no es nada, de nada, esta es una de las grandes ventajas del Unix, Linux, et.. que los tiene muy potentes...

En Windows son efectivamente los ficheros BAT.

Pero eso en realidad no son programas, el programa es el procesador de commandos en si mismo...

[a4avant]

Bueno, pero porque el SO no me reconoce el archivo que baje de la pagina que vimos antes???

 

 

Tienes que descomprimirlo, con el winrar.

 

Lo puedes bajar de www.rarlab.com

[Galliani]

dios que pereza

yo me piro a que toy derrotado..... :clap1:

[CopyrighTT]

dios que pereza

yo me piro a que toy derrotado.....

 

Los romulopost , no sé porqué, pero me producen dolor de cabeza :clap1:

[fitille]

Bueno, pero porque el SO no me reconoce el archivo que baje de la pagina que vimos antes???

 

Está escrito para el procesador de comnados bash, que no está por defecto en windows, deberías buscar una implementación para este S.O...

 

(Se puede comprobar en la primera línea...

#!/bin/bash

...

[RomuloTDI]

dios que pereza

yo me piro a que toy derrotado..... :clap1:

Pues que ustedes lo duerman bin. S2.

[fitille]

dios que pereza

yo me piro a que toy derrotado.....

 

Los romulopost , no sé porqué, pero me producen dolor de cabeza :clap1:

 

Mira, yo me paso todo el dia con estos cacharros y la verdad es que saturan mucho, pero si me preguntan, pues respondo...

[a4avant]

Creo que esto es código código:

#########################################

# Chat Window code abstraction #

# By Alberto Díaz #

#########################################

 

package require framec

package require scalable-bg

 

namespace eval ::ChatWindow {

 

#///////////////////////////////////////////////////////////////////////////////

# Namespace variables, relative to chat windows' data. In the code are accessible

# through '::namespace::variable' syntax (to avoid local instances of the variable

# and have the scope more clear).

 

# As ::ChatWindow::winid is the index used in the

# window widgets for chat windows, we only initialize

# it at the first time, to avoid problems with proc

# reload_files wich will cause some bugs related to

# winid being 0 after some windows have been created.

if { $initialize_amsn == 1 } {

variable chat_ids

variable first_message

variable msg_windows

variable new_message_on

variable recent_message

variable titles

variable windows

variable winid 0

variable containers

variable containerwindows

variable tab2win

variable win2tab

variable containercurrent

variable containerid 0

variable scrolling

 

}

#///////////////////////////////////////////////////////////////////////////////

 

 

#///////////////////////////////////////////////////////////////////////////////

# ::ChatWindow::rotext -- Read Only text widget via snit

# Changes must be made by "ins" and "del", not "insert" and "delete".

# Leave the window state as "normal" so cut and paste work on all platforms.

# From example on http://wiki.tcl.tk/3963

::snit::widgetadaptor rotext {

constructor {args} {

# Turn off the insert cursor

#installhull using text $self -insertwidth 0

# DDG the $self gaves an error at least with 0.97 onwards

installhull using text -insertwidth 0

 

# Apply an options passed at creation time.

$self configurelist $args

}

 

# Disable the insert and delete methods, to make this readonly.

method insert {args} {}

method delete {args} {}

 

# Enable roinsert and rodelete as synonyms, so the program can insert and

# delete.

delegate method roinsert to hull as insert

delegate method rodelete to hull as delete

 

# Pass all other methods and options to the real text widget, so

# that the remaining behavior is as expected.

delegate method * to hull

delegate option * to hull

}

#///////////////////////////////////////////////////////////////////////////////

 

 

 

#///////////////////////////////////////////////////////////////////////////////

# ::ChatWindow::Change (chatid, newchatid)

# This proc is called from the protocol layer when a private chat changes into a

# conference, right after a JOI command comes from the SB. It means that the window

# assigned to $chatid should now be related to $newchatid. ::ChatWindow::Change

# will return the new chatid if the change is OK (no other window for that name

# exists), or the old chatid if the change is not right

# Arguments:

# - chatid => Is the name of the chat that was a single private before.

# - newchatid => Is the new id of the chat for the conference

proc Change { chatid newchatid } {

set win_name [::ChatWindow::For $chatid]

 

if { $win_name == 0 } {

# Old window window does not exists, so just accept the change, no worries

status_log "::ChatWindow::Change: Window doesn't exist (probably invited to a conference)\n"

return $newchatid

}

 

if { [::ChatWindow::For $newchatid] != 0} {

#Old window existed, probably a conference, but new one exists too, so we can't

#just allow that messages shown in old window now are shown in a different window,

#that wouldn't be nice, so don't allow change

status_log "conference wants to become private, but there's already a window\n"

return $chatid

}

 

#So, we had an old window for chatid, but no window for newchatid, so the window will

#change it's assigned chat

::ChatWindow::UnsetFor $chatid $win_name

::ChatWindow::SetFor $newchatid $win_name

 

status_log "::ChatWindow::Change: changing $chatid into $newchatid\n"

 

return $newchatid

}

#///////////////////////////////////////////////////////////////////////////////

 

 

#///////////////////////////////////////////////////////////////////////////////

# ::ChatWindow::GetTopFrame (window)

# Returns the path to the top frame (containing "To: ...") for a given window

# Arguments:

# - window => Is the chat window widget (.msg_n - Where n is an integer)

proc GetTopFrame { window } {

return $window.top

}

#///////////////////////////////////////////////////////////////////////////////

 

 

#///////////////////////////////////////////////////////////////////////////////

# ::ChatWindow::GetOutText (window)

# Returns the path to the output text widget in a given window

# Arguments:

# - window => Is the chat window widget (.msg_n - Where n is an integer)

proc GetOutText { window } {

return $window.f.out.scroll.text

}

#///////////////////////////////////////////////////////////////////////////////

 

 

#///////////////////////////////////////////////////////////////////////////////

# ::ChatWindow::GetInputText (window)

# Returns the path to the input text widget in a given window

# Arguments:

# - window => Is the chat window widget (.msg_n - Where n is an integer)

proc GetInputText { window } {

return [$window.f.bottom.left.in getinnerframe].text

}

#///////////////////////////////////////////////////////////////////////////////

 

 

#///////////////////////////////////////////////////////////////////////////////

# ::ChatWindow::GetStatusText (window)

# Returns the path to the statusbar text widget in a given window

# Arguments:

# - window => Is the chat window widget (.msg_n - Where n is an integer)

proc GetStatusText { window } {

return [$window.statusbar getinnerframe].status

 

Si no lo es corrijanme. Obtenido de uno de los archivos del tarball del amsn (Alvaro's messenger)

[RomuloTDI]

Podrian ser las lineas de codigo algo como este fragmento que copio y pego de uno d elos archivos de tu programa???

 

þíúÎ ? ", • 8__PAGEZERO Ð__TEXT € € __text __TEXT y ` i € __picsymbol_stub__TEXT h oh € $__symbol_stub __TEXT h oh € __picsymbolstub1__TEXT h ` oh € __cstring __TEXT €È H pÈ __symbol_stub1 __TEXT ƒ @ s €

Œ__DATA € __data __DATA € __la_symbol_ptr __DATA 8 € __nl_symbol_ptr __DATA X €X __dyld __DATA l €l __common __DATA 8 ¼__OBJC __cat_cls_meth __OBJC __cat_inst_meth __OBJC __string_object __OBJC __cstring_object__OBJC __message_refs __OBJC , __sel_fixup __OBJC , , __cls_refs __OBJC , , __class __OBJC D 0 D __meta_class __OBJC t 0 t __cls_meth __OBJC ¤ ¤ __inst_meth __OBJC ¤ ¤ __protocol __OBJC Ä Ä __category __OBJC Ä Ä __class_vars __OBJC Ä Ä __instance_vars __OBJC Ä Ä __module_info __OBJC à à __symbols __OBJC ð ð 8__LINKEDIT ° ( (

[a4avant]

Podrian ser las lineas de codigo algo como este fragmento que copio y pego de uno d elos archivos de tu programa???

 

þíúÎ ? ", • 8__PAGEZERO Ð__TEXT € € __text __TEXT y ` i € __picsymbol_stub__TEXT h oh € $__symbol_stub __TEXT h oh € __picsymbolstub1__TEXT h ` oh € __cstring __TEXT €È H pÈ __symbol_stub1 __TEXT ƒ @ s €

Œ__DATA € __data __DATA € __la_symbol_ptr __DATA 8 € __nl_symbol_ptr __DATA X €X __dyld __DATA l €l __common __DATA 8 ¼__OBJC __cat_cls_meth __OBJC __cat_inst_meth __OBJC __string_object __OBJC __cstring_object__OBJC __message_refs __OBJC , __sel_fixup __OBJC , , __cls_refs __OBJC , , __class __OBJC D 0 D __meta_class __OBJC t 0 t __cls_meth __OBJC ¤ ¤ __inst_meth __OBJC ¤ ¤ __protocol __OBJC Ä Ä __category __OBJC Ä Ä __class_vars __OBJC Ä Ä __instance_vars __OBJC Ä Ä __module_info __OBJC à à __symbols __OBJC ð ð 8__LINKEDIT ° ( (

 

Creo que no. :clap1:

[PabloR6]

Post como este contribuyen a aumentar la estadística de suicidios :clap1: