La idea:

Crear un residente al lado del reloj que grabe en un servidor la IP actual de la instalación para poder conocerla en todo momento, aun que la IP del router cambie.

El proyecto:

Consta de dos frames, el frame 2 estará oculto hasta que se pulse el botón de configuración. Este frame generará un INI para guardar los datos de conexión.

Un Winsock1 para realizar la conexion.

Un timer 1 para realizar una actualización al cabo de un rato

Un Tray Notify icon control que nos permite crear el icono en la barra del reloj.

Como funciona:

Se rellenan los datos de configuración, y al darle a guardar, se conectará a un servidor remoto en donde se encuentra la página en PHP que devolverá la Ip externa de la instalación, Al hacer el contacto, el servidor almacenará el nombre del local, la hora y la nueva ip que se podrá leer abriendo el fichero de registro.

El Key es un añadido que he incluido en el proyecto, no incluiré mucha descripción, que nos permite tener varias instalaciones registradas en un solo fichero.

Cuando se establece la conexión, el muñeco se pone verde, y si no, se pone roj0.

Panel de configuración:

Panel principal:

Residente:

El proyecto final, incluye un botón para que un cliente pueda solicitarme soporte.

Código del programa:

' Se permite la utilización y publicacion de este archivo,
' mientras no se modifique la siguientes lineas:
' Programa desarrollado y publicado en la web www.pesadillo.com.
' Este programa realiza las funciones de un servicio como NO-IP y
' permite conocer la ip de conexion de un equipo y guardarla en un servidor de datos
' Puede encontrar disponible este servicio en la web www.pesadillo.com

Option Explicit
Const APPLICATION As String = "Soporte"
'Importante: Antes de mostrar el BallonTip con el metodo ShowBalloon, _
hay que colocar en el systray, es decir hacerlo visible: Tray.Visible = trueOption Explicit
'constante para el temporizador
Const MINUTOS As Integer = 1
'variable de la ruta ini
Dim Path_Archivo_Ini As String
'definimos variable usuario y correo
Dim user As String
Dim email As String
Dim pass As String
Dim pc As String
Dim ipl As String
Dim npc As String

' definimos variable para almacenar ruta de la pagina
Dim sUrl As String

' Funcion api para llamar a un web
Private Declare Function ShellExecute _
                            Lib "shell32.dll" _
                            Alias "ShellExecuteA" ( _
                            ByVal hwnd As Long, _
                            ByVal lpOperation As String, _
                            ByVal lpFile As String, _
                            ByVal lpParameters As String, _
                            ByVal lpDirectory As String, _
                            ByVal nShowCmd As Long) _
                            As Long

'Función api que recupera un valor-dato de un archivo Ini
Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" ( _
    ByVal lpApplicationName As String, _
    ByVal lpKeyName As String, _
    ByVal lpDefault As String, _
    ByVal lpReturnedString As String, _
    ByVal nSize As Long, _
    ByVal lpFileName As String) As Long

'Función api que Escribe un valor - dato en un archivo Ini
Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" ( _
    ByVal lpApplicationName As String, _
    ByVal lpKeyName As String, _
    ByVal lpString As String, _
    ByVal lpFileName As String) As Long

Private Declare Function InternetOpen Lib "wininet.dll" Alias "InternetOpenA" _
(ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, _
ByVal sProxyBypass As String, ByVal lFlags As Long) As Long

'Funcion para abrir una URL
Private Declare Function InternetOpenUrl Lib "wininet" Alias "InternetOpenUrlA" (ByVal hInternetSession As Long, ByVal lpszUrl As String, ByVal lpszHeaders As String, ByVal dwHeadersLength As Long, ByVal dwFlags As Long, ByVal dwContext As Long) As Long

Private Declare Function InternetReadFile Lib "wininet.dll" _
(ByVal hFile As Long, ByVal sBuffer As String, ByVal lNumBytesToRead As Long, _
lNumberOfBytesRead As Long) As Integer
Private Declare Function InternetCloseHandle Lib "wininet.dll" _
(ByVal hInet As Long) As Integer

Private Sub setTray(Valor As Boolean)

   tray.Visible = Valor
   tray.Enabled = Valor
   'habilitar el temporizador
   'Timer1.Enabled = Valor
End Sub
Private Function Leer_Ini(Path_INI As String, Key As String, Default As Variant) As String
'Funcion para leer valores en el INI
Dim bufer As String * 255
Dim Len_Value As Long
        Len_Value = GetPrivateProfileString(APPLICATION, Key, Default, bufer, Len(bufer), Path_INI)
        Leer_Ini = Left$(bufer, Len_Value)
End Function
Private Function Grabar_Ini(Path_INI As String, Key As String, Valor As Variant) As String
'Funcion para escribir valores en el INI
    WritePrivateProfileString APPLICATION, _
                                         Key, _
                                         Valor, _
                                         Path_INI
End Function
Private Sub Command1_Click()
    'Escribe en el archivo Ini los valores
    Call Grabar_Ini(Path_Archivo_Ini, "user", Text2.Text)
    Call Grabar_Ini(Path_Archivo_Ini, "email", Text3.Text)
    Call Grabar_Ini(Path_Archivo_Ini, "pass", Text4.Text)
    Call Grabar_Ini(Path_Archivo_Ini, "pc", Text5.Text)

    ' Lee las Key y  Les envia el valor por defecto por si no existe
    user = Leer_Ini(Path_Archivo_Ini, "user", "")
    email = Leer_Ini(Path_Archivo_Ini, "email", "")
    pc = Leer_Ini(Path_Archivo_Ini, "pc", "")
    pass = Leer_Ini(Path_Archivo_Ini, "pass", "")

    'Si las casillas no estan vacias, mostrar IP
    If Not Text2.Text = "" Or Text3.Text = "" Or Text5.Text = "" Then
    'Enviar los datos de registro
    Text1.Text = RegistraIP
    'Leer ip desde servidor
    Text1.Text = LeeIP
    'Reiniciar el formulario
    Frame2.Visible = False
    End If

End Sub

Private Sub Command2_Click()
'Abrir una pagina web de soporte
End Sub

Private Sub Command3_Click()
'Mostrar panel configuracion
Frame2.Visible = True
End Sub

Private Sub Command4_Click()
End
End Sub

Private Sub Command5_Click()
    'Escribe en el archivo Ini los valores antes de ir a la pagina
    Call Grabar_Ini(Path_Archivo_Ini, "user", Text2.Text)
    Call Grabar_Ini(Path_Archivo_Ini, "email", Text3.Text)
    Call Grabar_Ini(Path_Archivo_Ini, "pass", Text4.Text)
    Call Grabar_Ini(Path_Archivo_Ini, "pc", Text5.Text)

'Despues de grabar el ini, conectarse a la pagina para que devuelva la IP
ShellExecute hwnd, "open", "http://www.XXXXXXX.com/", vbNullString, vbNullString, "1"

End Sub

Private Sub Command6_Click()
'ocultar configuracion
Frame2.Visible = False
End Sub

Private Sub Command7_Click()
'Borrar fichero INI de configuracion
Kill Path_Archivo_Ini
'Ponemos a cero los campos.
    Text2.Text = ""
    Text3.Text = ""
    Text5.Text = ""
    Text4.Text = ""
    Text1.Text = ""
End Sub

Private Sub Image2_Click()
'copiar al portapapeles
Clipboard.Clear
Clipboard.SetText Text1.Text, vbCFText
If Clipboard.GetFormat(vbCFText) Then
   Text1.Text = Clipboard.GetText(vbCFText)
End If
End Sub
'Abrir una pagina web con la funcion shellexecute.
Private Sub lblLink_Click()
   Dim r As Long
   r = ShellExecute(0, "open", "http://www.pesadillo.com", 0, 0, 1)
End Sub
Private Sub Form_Load()
'Intervalo en segundos para el temporizador
Timer1.Interval = 1000

    'Path del fichero Ini
    Path_Archivo_Ini = App.Path & "\config.ini"

    ' Lee las Key y  Les envia el valor por defecto por si no existe
    user = Leer_Ini(Path_Archivo_Ini, "user", "")
    email = Leer_Ini(Path_Archivo_Ini, "email", "")
    pc = Leer_Ini(Path_Archivo_Ini, "pc", "")
    pass = Leer_Ini(Path_Archivo_Ini, "pass", "")

    'Conectar para recibir ip de conexion
    Text2.Text = user
    Text3.Text = email
    Text5.Text = pc
    Text4.Text = pass

    'Escribir IP local
    Text6.Text = Winsock1.LocalIP
    Text7.Text = Winsock1.LocalHostName

    'variable IPlocal para enviar
    ipl = Text6.Text
    'variable nombre pc para enciar
    npc = Text7.Text

    'Asigna el icono por defecto en el tray
    'Si los campos estan vacios
    If user = "" Or email = "" Or pc = "" Then Set tray.Icon = Image1(1).Picture Else Set tray.Icon = Image1(0).Picture
    If user = "" Or email = "" Or pc = "" Then MsgBox "Por favor," & vbCrLf & " complete los datos" & vbCrLf & " de conexion.", vbExclamation, "Atencion"

    tray.Enabled = True

    'Iniciar minimizado el programa
    Me.Hide
    Form1.Visible = False
    Form1.Caption = "iP"
    Form1.WindowState = 1

    'Conectar para recibir ip de conexion
    Text1.Text = LeeIP

End Sub

Function RegistraIP() As String
    'Al ejecutar el form, hacer la llamada a la pagina.
    Dim hOpen As Long, hFile As Long, sIP As String, Ret As Long
    Dim Longitud As Integer, Ax As Integer, valido As Boolean, Scaracter As String
    'Creamos la ruta de la pagina
    sUrl = "http://www.xxxx.com/xxx.php?user=" & user & "&pc=" & pc & "&key=" & pass & "&ipl=" & ipl
    'Create a buffer for the file we're going to download
    sIP = Space(1000)
    'Create an internet connection
    hOpen = InternetOpen("", 1, vbNullString, vbNullString, 0)
    'Open the url
    hFile = InternetOpenUrl(hOpen, sUrl, vbNullString, ByVal 0&, &H80000000, ByVal 0&)
    'Read the first 1000 bytes of the file
    InternetReadFile hFile, sIP, 1000, Ret
    'clean up
    InternetCloseHandle hFile
    InternetCloseHandle hOpen
    RegistraIP = Trim(Mid(Trim(sIP), 1, 15))
End Function
Function LeeIP() As String
    'Al ejecutar el form, hacer la llamada a la pagina.
    Dim hOpen As Long, hFile As Long, sIP As String, Ret As Long
    Dim Longitud As Integer, Ax As Integer, valido As Boolean, Scaracter As String

      'Creamos la ruta de la pagina
    sUrl = "http://www.xxxxx.com/xxx.php?user=" & user & "&pc=" & pc & "&key=" & pass & "&ipl=" & ipl

    'Create a buffer for the file we're going to download
    sIP = Space(1000)
    'Create an internet connection
    hOpen = InternetOpen("", 1, vbNullString, vbNullString, 0)
    'Open the url
    hFile = InternetOpenUrl(hOpen, sUrl, vbNullString, ByVal 0&, &H80000000, ByVal 0&)
    'Read the first 1000 bytes of the file
    InternetReadFile hFile, sIP, 1000, Ret
    'clean up
    InternetCloseHandle hFile
    InternetCloseHandle hOpen
    LeeIP = Trim(Mid(Trim(sIP), 1, 15))

End Function

Private Sub Form_Resize()

    If Me.WindowState = 1 Then
        ' pone en el systray
        Call setTray(True)

        tray.BalloonTitle = "Titulo del Baloon Tip"
        tray.BalloonText = " Texto del Baloon Tip "

        ' muestra el globo
        tray.ShowBalloon
        ' oculta el form
        Me.Hide
    End If
End Sub

Private Sub Form_Unload(Cancel As Integer)
    Me.WindowState = 1
    Cancel = True
End Sub

Private Sub mnuRestaurar_Click()
    Me.WindowState = 0
    Me.Show
    Call setTray(False)
End Sub

Private Sub mnuSalir_Click()
    If MsgBox(" Salir ?? ", vbQuestion + vbYesNo) = vbYes Then
        End
    End If
End Sub

Private Sub Text1_Change()
    tray.ToolTip = Text1
End Sub

Private Sub Timer1_Timer()

            ' variable estática para acumular la cantidad de segundos
            Static Temp_Seg As Long
            Static Temp_Min As Long
            ' incrementa cuenta segun temprizador
            Temp_Seg = Temp_Seg + 1
            If Temp_Seg >= 60 Then
            Temp_Min = Temp_Min + 1
            Temp_Seg = 0
            End If

            ' comprueba que los segundos no sea igual a la cantidad de minutos que queremos , en este caso 120 minutos
            If Temp_Min >= MINUTOS Then

            ' reestablece
            Temp_Seg = 0
            Temp_Min = 0

            'temporizador para actualizar la IP
            Static i As Integer
            'If i = Image1.Count - 1 Then
            ' i = 0
            'Else
            ' i = i + 1
            'End If

            'averiguar si se ha asignado una IP desde el servidor
            Dim cantidad As Integer
            Dim caracter As String
            For i = 1 To Len(Text1.Text)
            caracter = Mid(Text1.Text, i, 1)
            'contamos el numero de puntos para saber si se ha asignado una ip
            If LCase(caracter) = "." Then
            cantidad = cantidad + 1
            End If
            Next

            If Text2.Text = "" Or Text3.Text = "" Or Text5.Text = "" Then
            'Ocultar IP si no hay datos de usuario
            Text1.Text = ""
            Set tray.Icon = Image1(1).Picture
            Else
            'Conectar para recibir ip de conexion
            Text1.Text = LeeIP
            Set tray.Icon = Image1(0).Picture
            End If

            'asignamos verde si hay Una IP y rojo si no.
            If cantidad = 3 Then
            Set tray.Icon = Image1(0).Picture
            Else
            Set tray.Icon = Image1(1).Picture
            End If
        End If
End Sub

Private Sub Tray_ContextMenu()
    PopupMenu mnuTray
End Sub

Private Sub Tray_DblClick(Button As Integer)
    If Button = 1 Then
       mnuRestaurar_Click
    End If
End Sub

La segunda parte es el fichero que registra el proceso y reporta la IP externa. Basta con incluir este pequeño php en un servidor y ya tenemos el proyecto terminado.

<!--?php  //Gets the IP address  $ip = getenv("REMOTE_ADDR") ;  //Mensaje es la ip  $msg=$ip; if(isset($_GET['user'])){    $user=$_GET['user'];    $pc=$_GET['pc'];    $user = htmlspecialchars($user);    $pc = htmlspecialchars($pc);  $cadena_final = "\r\n".$ip.",".$user.",".$pc; //escribimos la IP en un fichero CSV  $fh = fopen("xxxxxx.csv","a");  fputs($fh,$cadena_final);  fclose($fh);   if ($pc== null) {     $msg="Estacion?";     } else {$msg=$ip;}   if ($email== null) {       $msg="Email?";  } //escribimos el mensaje que leera el programa  Echo $msg;  } Else { Echo "Usuario?"; } ?-->

El php envía mensajes al programa mediante el comando echo.

Pequeño (9 mb): Prusa Mendel Build Manual de Instrucciones (4041) . 
Optimizado (44 mb): Prusa Mendel Build Manual de Instrucciones (4990) . 
tamaño estándar (68 mb) :: RepRap Mendel Prusa Build Manual de Instrucciones (358.886) . 

Utilizado para cargar firmware a la Junta 1,4 RAMPAS. 
Nuestra probada Versión de la aplicación: Arduino-0022 (52211) . 
enlace Desarrollador: Ardunio .
 

Contiene el controlador necesario para comunicarse con el Ardunio y Tablero RAMPAS. 
Nuestra probada Versión de la aplicación: Arduino-1.0-ventanas (2483) . 
enlace Desarrollador: Ardunio .
 

El entorno python necesaria para el software de control de la impresora (Print Run / Pronterface) 
Nuestro probado Versión de la aplicación: Python 2.7.2-(2036) . 
enlace Desarrollador: Python .
 

Dependencias de Python para la comunicación en serie. 
Nuestra probada versión de la aplicación: pySerial-2.5.win32 (749) . 
enlace Desarrollador: Python Dependencias .
 

Nuestro probado Versión de la aplicación: WxPython2.8-win32-unicode-2.8.12.0-py27 (1043) . 
enlace Desarrollador: Python 2.8 en Sourceforge .
 

Python Dependencias para la comunicación serial. 
Nuestra probada Versión de la aplicación: Pyreadline-1.7.win32 (801) . 
enlace Desarrollador: PYReadline en Launchpad .
 

Nuestra probada Versión de la aplicación: Pyglet-1.1.4 (723) . 
enlace Desarrollador: Pyglet en Google Code .

La aplicación principal para el control de la impresora 3D que controla Skienforge (abajo) 
Nuestro probado Versión de la aplicación: Kliment-tirada-d9a3363 (1721) . 
enlace Desarrollador: Pronterface / tiraje .

 Este es el componente que se ejecuta en Proterface / Run impresión (arriba) que genera el código G, en el modelo 3D para indicar a la impresora cómo imprimir.

Nuestra probada Versión de la aplicación: Romscraj-Skeinforge41-097bc3e (1620) . 
enlace Desarrollador: Skienforge .

  Esta es la construcción del Firmware SPRINTER que utilizamos con nuestros Prusa Mendel Kits impresora 3D

Nuestro build de SPRINTER: Sprinter (722) . 
enlace Desarrollador: SPRINER de Clemente .
 

Se trata de un firmware alternativo que añade varias funcionalidades, como “mirar hacia adelante”, el posicionamiento cama dinámico y más funciones relacionadas con el control de la temperatura, es todavía una versión Beta, así que ten cuidado. Nuestra estructura de MARLIN: Marlin (667) . enlace desarrollador : MARLIN Erik Zalm . 

Utiliza para crear y modificar modelos digitales 3D. 
Nuestra probada Versión de la aplicación: GoogleSketchUpWEN (2025) . 
enlace Desarrollador: Google Sketchup .
 

Se utiliza para la conversión de archivos de Google Sketch Up en archivos STL, reparación y ampliación de los modelos / diseños 3D. 
Nuestra probada Versión de la aplicación: Desconectado NetfabbInstaller (859) . 
enlace Desarrollador: Netfabb . 

Estos son los archivos de diseño de STL para todos los componentes impresos en el. Kit de impresora Prusa Mendel 3D . 
Descargar todos STL como archivo ZIP: Día siguiente Reprap Prusa Mendel STLS (869) . 
 

Aquí están los archivos STL de prueba para calibrar el. Kit de impresora Prusa Mendel 3D , incluyendo la caja de 20 mm, ancho de más de perímetro y caja hueca. 
Descarga todas STL como archivo ZIP: Archivos de prueba STL (552) .  

 Estos son los archivos de diseño para nuestra Cut Laser Aluminio Ejecución Bed 

Descargue el AI Fles:. plan por cama Alu (523) .
 

Estos son los archivos de diseño para nuestra Cut Laser Plywood Build Bed Top
Descargar el AI Fles:. plan por cama de madera (308) . Todos los programas y archivos suministrados son software libre: usted puede redistribuirlo y / o modificarlo bajo los términos de la GNU General Public License publicada por la Fundación para el Software Libre, ya sea la versión 3 de la Licencia, o (a su elección) cualquier versión posterior. Estos programas se distribuyen en la esperanza de que sea útil, pero SIN NINGUNA GARANTÍA, incluso sin la garantía implícita de COMERCIALIZACIÓN o IDONEIDAD PARA UN PROPÓSITO PARTICULAR. Vea la Licencia Pública General de GNU para más detalles. Debería haber recibido una copia de la Licencia Pública General de GNU junto con el software.

ShenProfessional ofrece una solución completa para la administración de la práctica con pacientes, facturación y planificación. Con la ayuda de esta solución de oficina inteligente y asequible, usted podrá gestionar fácilmente su consulta.

La facturación está habilitada para varios facultativos que tengan consulta y genera facturas atractivas con sólo unos clics.
ShenProfessional está especializado en acupuntura y medicina tradicional china.

Utilice la enorme base de datos y benefíciese del atlas electrónico de acupuntura, la función completa de búsqueda, la teoría de MTC así como los diagnósticos de MTC en ShenProfessional.

Visita la web: http://www.spain.shenprofessional.com/

Puedes bajarte este interesante programa en la web: http://bumptop.com/

 Descarga: http://bumptop.com/download.php

Presentación del antimalware de Windows:

La herramienta de eliminación de software malintencionado de Microsoft busca infecciones por software malintencionado específico y predominante, como Blaster, Sasser y Mydoom, y ayuda a eliminarlas. Cuando el proceso de detección y eliminación ha concluido, la herramienta muestra un informe en el que se describe el resultado e incluye, si lo hubiera, el software malintencionado que se ha detectado y eliminado.

La Herramienta de eliminación de software malintencionado de Windows funciona en equipos que funcionan con:
-Windows 2000
-Windows XP
-Windows 2003

Si utilizas XP con el SP2 instalado y las actualizaciones activadas, entonces el programa ya está presente en tu sistema. Si no, puedes descargar el programa desde esta página:

http://www.microsoft.com/…

La herramienta de la que vamos a hablar aquí es MRT.exe. Esta se encuentra en: C:\WINDOWS\system32\MRT.exe

Para ejecutarla, haz clic en Inicio, luego Ejecutar y escribe el comando siguiente:
%systemroot%/system32/MRT.exe (o simplemente mrt)

El programa se ejecuta directamente. La primera ventana que aparece da la posibilidad de consultar la lista de programas malintencionados que el programa ha podido detectar y que puede eliminar, así como información sobre esta herramienta. Haz clic en Siguiente para continuar.

En la ventana que aparece, se ejecuta el scan y se inicia la búsqueda de programas malintencionados.

En el caso que un malware sea encontrado será eliminado.

También puedes personalizar el modo de funcionamiento del programa

Haz clic en Inicio, luego en Ejecutar.
Luego escribe mrt, seguido de uno de estos 4 “Modificadores de la línea de comandos”:

/? ==> Muestra una ventana de dialogo que lista los modificadores de línea de comandos. [mrt/?]

/Q o /quiet ==> Especifica el modo silencioso o suprime los indicadores. [mrt/Q]

/N ==> Ejecuta sólo en modo de detección. En este modo, los programas malintencionados serán señalados al usuario pero no serán eliminados. [mrt/N]

/F ==> Para hacer un análisis profundo del PC. [mrt/F]

/F:Y ==> Para hacer un análisis profundo del PC y limpiar automáticamente posibles infecciones. [mrt/F:Y]

Fuente: http://es.kioskea.net/faq/sujet-600-la-herramienta-de-eliminacion-de-software-malintencionado

Blender es un programa para diseño y animacion en 3D; soporta curvas, mallas poligonales, texto, NURBS y metaballs (objetos 3d con las características físicas del mercurio).

Las animaciones pueden ser creadas usando frames clave, morphing, movimientos curvos, y con cinemática inversa. Otras posibilidades de Blender son: visor 3D con rotoscoping, selección de modos de luz, deformado de entramados, sistema de partículas, esqueletos, renderizado del campo de actividad, y enmarcado de vértices por morphing.

La cantidad de posibilidades y opciones que nos ofrece este programa son innumerables, no quedándose atrás de sus competidores de pago, y por si fuera poco incorpora además posibilidad de realizar videojuegos con él, con detección de colisiones, Inteligencia Artificial…

Pagina: http://www.blender.org/

Descarga: http://ftp.nluug.nl/pub/graphics/blender/release/Blender2.48a/blender-2.48a-windows.exe

Películas gratuitas realizadas con blender: http://www.blender.org/features-gallery/movies/ ]]> http://www.pesadillo.com/pesadillo/?feed=rss2&p=1496 1 http://www.pesadillo.com/pesadillo/?p=1711 http://www.pesadillo.com/pesadillo/?p=1711#comments Thu, 07 May 2009 23:49:50 +0000 pesadillo http://www.pesadillo.com/pesadillo/?p=1711 A Carlos Caneda…

*** Si alguno tiene algún otro manual de referencia agradecería lo incluyese en los comentarios a esta noticia.

Manuales:

Aprenda LINUX como si estuviera en primero – Escuela Superior de Ingenieros Industriales de San Sebastián.

MANUAL DE LINUX – Álvaro Alea Fdz.

Administración avanzada de GNU/Linux – Formación de Posgrado

Manual de usuario del Linux Suse - De  http://beta.redes-linux.com/

Linux en red - De  http://www.linux-magazine.es

Cientos de manuales segun tema: http://www.linuxpdf.es/ 

Paginas de referencia:

http://www.linux-galicia.org/ en concreto: La U.S.C

http://www.linuxespanol.com/ (Foros y ayudas)

Para utilizarlo sólo deberemos definir la frecuencia, o utilizar alguna de las muchas predefinidas, y el programa emitirá el sonido en cuestión, alcanzando un rango de unos 15 metros aproximadamente.

Entre las configuraciones de seres que ahuyenta nos encontramos con el más típico antimosquitos, frecuencias para ahuyentar a gatos y perros, y otras más originales como la preparada para ahuyentar elefantes (nunca se sabe cuándo puede aparecer uno) u otra desternillante (con perdón) para ahuyentar a adolescentes. Esta última, seguro que se convertirá en la favorita de todos aquellos con un hermano pequeño.

Descarga: http://sourceforge.net/project/downloading.php?groupname=dcrteam&filename=Ultrafobos.exe&use_mirror=heanet

Pero si no quieres complicarte mucho, hoy os propongo un Karaoke On-line. Ya puedes grabar tu versión de tu canción favorita en: http://www.redkaraoke.es
Que tal si hoy me cantas la rianxeira? http://www.redkaraoke.es/canciones/A-Rianxeira/1114

Nueva Version Ultrastar aqui: http://ultrastarng.softonic.com/descargar

Por ultimo, si os gusta el tema Karaokes, comentaros que en http://vanbasco-karaoke-player.softonic.com podeis disfrutar de uno de los karaokes mas completos y gratuitos de la red.
Este Karaoke, parte de dicheros MIDI que llevan integrado el texto de la letra de la cancion. Estos ficheros de extension .Kar son muy faciles de conseguir y crear.
Descargas de .kar:
http://www.karuniverse.com/s_es_new.html
http://www.karuniverse.com/s_es_new.html

Otros juegos karaoke: http://www.cdlibre.org/consultar/catalogo/Juegos_Karaoke.html

CuteShield Internet Eraser protege tu intimidad eliminando todos los posibles rastros que puedan quedar almacenados en el ordenador tras una sesión de trabajo con él o un rato de conexión a Internet.

Incorpora una interfaz de diseño y uso muy sencillos, dividida en varias pestañas desde las cuales tienes acceso a las distintas funciones del programa.

El programa puede limpiar, entre otros, la lista de documentos recientes, la Papelera de reciclaje, el archivo temporal de Windows o la lista de auto-completado de formulario.

Respecto a rastros de navegación, el programa elimina desde el historial de páginas Web visitadas, hasta el fichero index.dat usado por Internet Explorer, pasando por cookies, memoria caché y ficheros temporales de Internet.

Incluye además una utilidad que bloquea las ventanas de publicidad pop-up, y tiene la posibilidad de automatizar las limpiezas (cuando cierras el navegador o apagas Windows, por ejemplo) y de añadir plug-ins especializados en aplicaciones concretas.

Fuente: http://cuteshield-internet-eraser-lite.softonic.com/

Descarga: http://download.internet-track-eraser.com/download/eraserlite.exe