Bienvenido a Hardcore Modding

 Vivir el modding / Iniciarse en el modding 27 de abril de 2024 03:22   Modding  ·  Artículos  ·  Guías  ·  Guías de los usuarios  ·  Reviews  ·  Enviar Noticia ·  Top 10 ·  Temas

Minichat

El_Nene :Feliz año dos meses tarde!!! Aqui el tiempo pasa mas lento
xenon :Feliz año 2024. Me embargó la nostalgia al ver que aun existe el foro :)
Cyg :Feliz Navidad 2023
DjSalva :02/10/2023 Saludos chicos cuanto tiempo, El_ Nene cuanta razon :)
Jesmasco :2023
Steam :Saludos! Iniciar sesión despues de 13 años, que recuerdos!
El_Nene :y aún así algo te llama para volver a entrar :)
djmax :saludos años t años que no entraba a esta pagina
El_Nene :Acabo de empezar un nuevo proyecto, a ver si los demás os animais.
El_Nene :cuanto tiempo!!!
aulex51 :Buen año a todos!
unkdememoria :Hola Locos
Cyg :Saludos-28-oct-2022
Cyg :Saludos-28-oct-2022
Chinoka :Aloha. 14/Sept/2022
TELOR5 :No veo como enviar mensaje
TELOR5 :No veo como enviar mensaje
alvaro :Hola 2022!!
el_friky :Buenas Mundo!!! 31/12/21
Tpm :Buenas tardes.... 25/11/21 Saludos!!!
CR6302428 :un buen dia para el que lea esto :)
CR6302428 :un buen dia para el que lea esto :)
:)8):eek::(:@;):P9):O

 FAQFAQ   BuscarBuscar   Grupos de UsuariosGrupos de Usuarios   PerfilPerfil   Entre para ver sus mensajes privadosEntre para ver sus mensajes privados   ConectarConectar 

LCDHype: Hilo de preguntas, comentarios y colaboraciones.
Ir a página     
 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Software
Ver tema anterior :: Ver tema siguiente  
Autor Mensaje
DAVIZINHO
modder
modder



País:
Sexo:
Registrado: 17 septiembre 2002
Mensajes: 169
Ubicación: Madrid

MensajePublicado: Jue, 02 Jun 2005 6:09 pm    Asunto: Responder citando

NAX:
ANARK, en la config del lcdhype tienes la opcion de arrancar con un script de entrada y arrancar minimizado.
Luego creas una acceso directo al programa y lo pones en la carpeta inicio del windows y ya ta. se te arranca el solito al arrancar el windows y minimizado para que no moleste. automaticamente se lanza el script que tubieras puesto por ultima vez.
Ademas en esas opciones que te digo le puedes asignar un retardo para que le de tiempo a cargarse el MDM o en mi caso el programa que me saca la temperatura de la grafica

un saludo
-DAVIZINHO-
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mamel
Moderador
Moderador



País:
Sexo:
Registrado: 13 abril 2004
Mensajes: 814
Ubicación: Cáceres

MensajePublicado: Jue, 02 Jun 2005 10:41 pm    Asunto: Responder citando

Tower:
Veamos, aquí hemos tratado de dar unas nociones sobre el uso del programa.
Las preguntas que planteas son de un nivel distinto a lo que manejamos en este hilo.
Te recomendaría que te pasases por el foro propio de LCDHype www.lcdhype.de.vu, aunque es alemán tiene una sección en inglés.
Incluso si tu conocimiento del inglés es bajo, siempre puedes recurrir al traductor de Google.
Yo no hablo inglés y me he podido comunicar (con alguna pequeña dificultad) con el creador del Hype cuando lo he necesitado.
Y hay bastante gente que emplea este sistema, por lo que son bastante tolerantes con las frases que salen de los traductores.

No obstante puedo contestar a alguna cosa.
No se pueden controlar dos LCD, a la vez, desde Hype.
Lo que si puedes probar es a abrir dos veces el programa y configurar cada uno ellos para que controle un LCD.
En principio no debería dar problemas, pero como no lo puedo probar no te lo aseguro.

Si miras el fichero .TXT que se crea en la instalación del Hype, verás que entre los LCD soportados, aparece el T6963.
Igualmente en la ventana de configuración del LCD, puedes seleccionar el driver para este tipo de LCD. Incluso viene un esquema del cableado.
.
Volver arriba
Ver perfil de usuario Enviar mensaje privado Visitar sitio web del autor
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Vie, 03 Jun 2005 7:09 pm    Asunto: Responder citando

Tengo un problema, al abrir el programa i intentar configurar mi lcd en el apartado de controladores solo me aparecen 3 mientras que en la carpeta para los controladores tengo como 10 carpetas diferentes todas llenas con distintos controladores e incluso el sed1335 q deve ser la carpeta sed133x pero solo me lista 3 el preview el sed1335 para usb i el miniterminal, sabeis a que se deve q solo me lea esos 3¿? tengo q poner algo en la carpeta del ventanucas¿?

Bueno espero que me ayudeis,
atentamente vuestra... Bromista

Cita:
Ya he visto ande taba el fallo tenia q leer mas atentamente en la primera página de este post :p
Volver arriba
Ver perfil de usuario Enviar mensaje privado
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Mie, 15 Jun 2005 8:23 pm    Asunto: Responder citando

Winamp con Spectro i VU
Para pantallita de 320x240
Con LCDHype 0.40
Winamp 5.0.9

Código:

#Header
%Common.SetPriority(15)
%Graph.SetTextArea(0,0,320,240)
%DefVar(LCDWidth,Local=320)
%DefVar(LCDHight,Local=240)
%DefVar(AmpVU,Local=4)
%DefVar(Half,Local=%Div(%LCDWidth(),2))
%DefVar(VULeft,Local=0)
%DefVar(VURight,Local=0)
#EndHeader

#GfxMode
%LCD.Gfx_SetOverlayMode()
%Param.RenderMode(Simple)
%CleanUp.InvertArea(All)
/1ª Línea: Títol de la pantalla/
%Graph.Font('FlamencoD',30,1,Bold,Underline)
%Format.Offset(Vertical,0)
%Format.Offset(Horizontal,30)
"Winamp 5.0.9"
%Common.CreateNewLine()
/2ª Línea: Titol i Artista
amb scrolling/
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Vertical,0)
%Format.Offset(Horizontal,30)
"Reproduint-se:"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1)
%Format.Offset(Vertical,0)
%Format.Offset(Horizontal,40)
%Param.EnableScrolling(Horizontal,Ticker,1.7,128)
"**"%WinAmp.Artist()" - "%WinAmp.Title()". "
%Common.CreateNewLine()

/3ª Línea: Pista  <Posición>  Duración/
%Format.Offset(Vertical,0)
%Format.Offset(Horizontal,30)
%Graph.Font('Verdana',8,1,Bold)
"Canço núm: "
%Graph.Font('Verdana',8,1)
%Inc(%WinAmp.TrackNo(),1)
%Graph.Font('Verdana',8,1,Bold)
"  Temps: "
%Graph.Font('Verdana',8,1)
%Format.Time(%Mul(%WinAmp.TrackPos(),1000),'m:ss')
%Graph.Font('Verdana',8,1,Bold)
"  Durada: "
%Graph.Font('Verdana',8,1)
%Format.Time(%Mul(%WinAmp.TrackLength(),1000),'m:ss')
/Barra de progreso/
%Format.Bar(Horizontal,300,10,0,%WinAmp.TrackLength(),%WinAmp.TrackPos(),1,1,10,95)
/4ª Linea Bitrate i canals i Freqüencia de mostreig /
%Common.CreateNewLine()
%Format.Offset(Vertical,20)
%Format.Offset(Horizontal,24)
%Graph.Font('Verdana',8,1,Bold)
"Bitrate: "
%Graph.Font('Verdana',8,1)
%WinAmp.BitRate() " kBs"
%Graph.Font('Verdana',8,1,Bold)
"  Freq: "
%Graph.Font('Verdana',8,1)
%Div(%WinAmp.SampleFrequency(),1000) " kHz"
%Graph.Font('Verdana',8,1,Bold)
"  Mode: "
%Graph.Font('Verdana',8,1)
%If((%WinAmp.Channels() < 2))Then
    { "Mono" }
Else
    { "Estereo" }
/VU/
%Assign(VULeft,%Div(%Mul(%WinAmp.VU(%AmpVU(),Left),%Half()),255))
%Assign(VURight,%Div(%Mul(%WinAmp.VU(%AmpVU(),Right),%Half()),255))
%Graph.SetInvertArea(6,161,%VULeft(),%Dec(%LCDHight(),10))
%Graph.SetInvertArea(%Inc(%Half(),%Dec(%Half(),%VURight())),161,%Dec(%LCDWidth(),6),%Dec(%LCDHight(),10))

/Spectro/

%Common.CreateNewLine()
%Format.Offset(Vertical,20)
%Graph.Font('Verdana',8,1,Bold)
%Format.AlignCenter()
"Analitzador Espectre : "
%Graph.Rect(5,160,315,232,1,0)

%WinAmp.SpecAnalyzer(FFT,PeakedBarsFilled,100,50,40,10,0.5,2,1,10,180)
#EndGfxMode
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mamel
Moderador
Moderador



País:
Sexo:
Registrado: 13 abril 2004
Mensajes: 814
Ubicación: Cáceres

MensajePublicado: Mie, 15 Jun 2005 11:35 pm    Asunto: Responder citando

Lo primero es felicitarte por el LCD que manejas. Es grande, muy grande !!! Sorprendido Asustado .
Podrías decirnos qué modelo es y cuál es su controlador??
Y ya puestos, ¿cuánto cuesta?

En cuanto al script, está bastante bien.
Me gusta el efecto del Vumeter sobrepuesto al Espectro.

Sólo una apreciación:
Lo he estado probando y en mi PC (P-4, 3.06) consume entre un 45% y un 50% de CPU.
Si piensas ponerlo como tarea única, entonces adelante.
Pero si lo quieres mantener en 2º plano, mientras haces otras tareas con el PC, tendrás que modificarlo para que el consumo de CPU sea inferior al 30%.
Puedes subir la prioridad hasta 200 ó 250.
También sería bueno reducir el número de barras del espectro, aumentando su anchura.
Ah, y si le quitas los picos a las barras del espectro, también mejorará el rendimiento.
.
Volver arriba
Ver perfil de usuario Enviar mensaje privado Visitar sitio web del autor
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Jue, 16 Jun 2005 10:25 am    Asunto: Responder citando

Mamel ya he augmentado a 600 lo que pasa es que no me gusta que refresca toda la pantalla, me gustaria que solo refrescara las zonas que realmente canvian,no se si es que soy yo el que no sabe o es que el LDCHype no lo permite, sobre el tema de las barras, puse tantas por que en una pantallita asi.... Bromista Bromista Riendo Riendo Riendo .
Me costó 99€+transportes (7,5€)
La LCD es de Sharp, Controlador:S1D13305F (SED1335)
mira aquí unas pantallitas....

http://www.skippari.net/lcd/sekalaista/sharp_parts_assembled.jpg
http://www.xs4all.nl/~rccheng/soldes/sharp.jpg
http://www.xs4all.nl/~rccheng/soldes/CJ.jpg
http://www.xs4all.nl/~rccheng/soldes/clock.jpg
http://img159.exs.cx/img159/6340/lcd_0001.jpg
http://img159.exs.cx/img159/4010/lcd_0003.jpg

PS: Estas capturas no son mias las pilleé del tipo que ma vendió las pantallitas, si estais interesados podemos pedirle a ver quanto nos costarian pedir una cantidad x de ellas
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mamel
Moderador
Moderador



País:
Sexo:
Registrado: 13 abril 2004
Mensajes: 814
Ubicación: Cáceres

MensajePublicado: Jue, 16 Jun 2005 8:39 pm    Asunto: Responder citando

Pues si que es guapo tu LCD.

Pero me parece un poco caro, por un poquito más te puedes coger una mini pantalla TFT de 6 ó 7 pulgadas y enchufarla a la salida de TV de tu gráfica.

En cuanto al script, no subas tanto la prioridad, déjala en 200/300.
Que yo sepa no hay opciones para refrescar una parte de la pantalla. Se refresca toda, a la vez.

Y en cuanto a las barras, ponlas un poco más anchas y pon menos cantidad de barras.
Creo que tienes 100 barras de 2 pixel cada una. Prueba a poner 50 barras de 4 pixel de ancho y te ocuparan toda la pantalla, reduciendo los cálculos a la mitad.

PD: Me encanta el LCD, cuando lo tengas instalado y funcionando, pon alguna foto. Pero hazlas más pequeñas, que si no te van a reñir.
Te he editado el post para poner los enlaces en vez de las propias imágenes.
El tamaño máximo para insertar imágenes en el foro es de 500 pixel.
.
Volver arriba
Ver perfil de usuario Enviar mensaje privado Visitar sitio web del autor
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Vie, 17 Jun 2005 12:32 am    Asunto: Prevision del tiempo para hoy Responder citando

Mamel asias por modificar el Post aterior
Una pregunta en este post enseñastes a hacer una pantallita con unos ventiladores rodando, a mi no me funciona haciendo copy&paste en versiones anteriores a la 0.40 tampoco
Prevision del tiempo para hoy con el plug que teneis en la web del programa.

Código:

#Header
%LCD.Gfx_ClearVRAM()
%Common.SetPriority(2500)
/Insertar La ID y el Nombre de la Ciudad/
%DefVar(ID=152163)
/%DefVar(ID=10262)/
%DefVar(Ciudad=Girona)
%UsePlugin(LCDWeather\lcdweather.dll,AddLocation,%ID())
%UsePlugin(LCDWeather\lcdweather.dll,SyncInterval,60)
%LCD.Gfx_SetInvertMode(0)
%LCD.Gfx_SetTextArea(0,0,320,240)
#EndHeader

#GfxMode

%LCD.Gfx_LoadBitmap(El_Temps.bmp,0,-5,4,0,320,65,0,NONE)
%Common.CreateNewLine()
%Format.Offset(Horizontal,19)
%Format.Offset(Vertical,20)
/Temperatura/
%Format.AlignCenter()
%Graph.Font('FlamencoD',12,1)
%Ciudad()
%Common.CreateNewLine()%Common.CreateNewLine()%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Underline)
%Format.AlignLeft()
%Format.Offset(Horizontal,48)
%Format.Offset(Vertical,0)
"Previsió per a Avui"
%Common.CreateNewLine()
/Dibujo de Prediccion/
%Graph.LoadBitmap(Temps%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,Weather).bmp,10,68,0,0,145,145,0,NONE)
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,48)
%Format.Offset(Vertical,0)
" Temperatura:         "
%Graph.Font('Verdana',9,1)
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,Temp)
" ºC"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"Humitat Relativa:   "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,AirMoistness)
" '%'"
%Common.CreateNewLine()

%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"Vel. Vent:                "
%Graph.Font('Verdana',9,1)
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,WindSpeed)
" Km'/'h   "
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,WindDir)
%Graph.LoadBitmap(%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,WindDir).bmp,255,90,0,0,50,50,0,NONE)
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"Pressió:               "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,AirPressure)
" hPa"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"Visibilitat:              "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,VisualRange)
" km"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"El Sol ha sortit a les:  "
%Graph.Font('Verdana',9,1)
%Format.Time(%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,SunRise),'hh:mm')
" h"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"El Sol es pondrà a les:  "
%Graph.Font('Verdana',9,1)
%Format.Time(%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,SunFall),'hh:mm')
" h"
%Common.CreateNewLine()
/Cambio de Pantalla
%Common.ChangeScreen(5000,'Next')/
#EndGfxMode


Ultima edición por outoforder el Vie, 17 Jun 2005 9:49 am, editado 1 vez
Volver arriba
Ver perfil de usuario Enviar mensaje privado
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Vie, 17 Jun 2005 12:39 am    Asunto: El tiempo para Mañana Responder citando

Pues este es para el Tiempo para el dia siguiente.
Podeis poner hasta 11 solo cambiando donde pone ,Forecast,1, canviais el 1 por el 2 o el 3 ..... y daria el dia de pasao mañana y el dia después de pasao mañana y así hasta 11


Código:


#Header
%LCD.Gfx_ClearVRAM()
%Common.SetPriority(2500)
/Insertar La ID y el Nombre de la Ciudad/
%DefVar(ID=152163)
/%DefVar(ID=10262)/
%DefVar(Ciudad=Girona)
%UsePlugin(LCDWeather\lcdweather.dll,AddLocation,%ID())
%UsePlugin(LCDWeather\lcdweather.dll,SyncInterval,60)
%LCD.Gfx_SetInvertMode(0)
%LCD.Gfx_SetTextArea(0,0,320,240)
#EndHeader

#GfxMode
%LCD.Gfx_LoadBitmap(El_Temps.bmp,0,-5,4,0,320,65,0,NONE)
%Common.CreateNewLine()
%Format.Offset(Horizontal,19)
%Format.Offset(Vertical,20)
%Format.AlignCenter()
%Graph.Font('FlamencoD',12,1)
%Ciudad()
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Underline)
%Format.AlignLeft()
%Format.Offset(Horizontal,48)
%Format.Offset(Vertical,0)
"Previsió per a Demà"
%Common.CreateNewLine()
/Dibujo de Prediccion/
%Graph.Font('Verdana',9,1,Bold)
%Format.AlignLeft()
%Format.Offset(Horizontal,130)
%Format.Offset(Vertical,5)
"Matí               "
%Graph.LoadBitmap(Temps%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,Weather).bmp,170,70,0,0,145,145,0,NONE)
"Tarde"
%Graph.LoadBitmap(Temps%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,A,Weather).bmp,280,70,0,0,145,145,0,NONE)
%Common.CreateNewLine()

%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,0)
%Format.Offset(Vertical,5)
"Temperatura:           "
%Graph.Font('Verdana',9,1)
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,Temp)
" ºC             "
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,A,Temp)
" ºC"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,0)
%Format.Offset(Vertical,0)
"Humitat Relativa:     "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,M,AirMoistness)
" '%'              "
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,A,AirMoistness)
" '%'"
%Common.CreateNewLine()

%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,0)
%Format.Offset(Vertical,0)
"Vel. Vent:           "
%Graph.Font('Verdana',9,1)
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,WindSpeed)
" Km'/'h "
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,WindDir)
"            "
%Graph.LoadBitmap(%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,WindDir).bmp,170,112,0,0,50,50,0,NONE)
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,WindSpeed)
" Km'/'h "
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,A,WindDir)
%Graph.LoadBitmap(%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Forecast,1,A,WindDir).bmp,280,112,0,0,50,50,0,NONE)
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,0)
%Format.Offset(Vertical,2)
"Pressió:             "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,M,AirPressure)
" hPa          "
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,A,AirPressure)
" hPa "
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,0)
%Format.Offset(Vertical,0)
"Posibilitat de pluja:  "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,M,Rainfall)
" '%'                "
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,A,Rainfall)
" '%'"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,0)
%Format.Offset(Vertical,0)
"T.Màx:             "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,TempMax)
" ºC          "
%Graph.Font('Verdana',9,1,Bold)
"T.Mín:               "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,TempMin)
" ºC"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,0)
%Format.Offset(Vertical,0)
"T.Sens. Màx:   "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,TempMaxSensed)
" ºC          "
%Graph.Font('Verdana',9,1,Bold)
"T.Senes. Mín:   "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,TempMinSensed)
" ºC"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"El Sol sortirà a les:       "
%Graph.Font('Verdana',9,1)
%Format.Time(%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,SunRise),'hh:mm')
" h"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"El Sol es pondrà a les:  "
%Graph.Font('Verdana',9,1)
%Format.Time(%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,SunFall),'hh:mm')
" h"
%Common.CreateNewLine()
%Graph.Font('Verdana',9,1,Bold)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
"Hores de sol:  "
%Graph.Font('Verdana',9,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,SunTime)
" h"
/Cambio de Pantalla
%Common.ChangeScreen(5000,'Next')/
#EndGfxMode

Volver arriba
Ver perfil de usuario Enviar mensaje privado
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Vie, 17 Jun 2005 1:13 am    Asunto: Responder citando

Imagenes para los posts anteriores:
Para la dirección del viento
Norte:

guardar como n.bmp

Nord-Este:

Guardar como no.bmp

Nord-Oeste:

Guardar como nw.bmp

Este:

Guardar como o.bmp

Oeste:

Guardar como w.bmp

Sur-Este:

Guardar como so.bmp

Sur-Oeste:

Guardar como sw.bmp

Sur:

Guardar como s.bmp

Ahora las nuvecitas, los solecitos......:p
os las pongo en orden i las teneis que guardar como Temps0.bmp, Temps1.bmp..... hasta Temps9.bmp











Este guardarlo como TempsNA.bmp


Espero que os gusten....
Las he sacao de un script que hay en la web del programa


PS: Para saber la ID de vuestra ciudad:
1º Ir a: www.wetter.com
2º Poner vuestra ciudad en "Wetter-Schnellsuche"
3º En la barra de direcciones teneis la ID de vuestra ciudad id=xxxxxx
Volver arriba
Ver perfil de usuario Enviar mensaje privado
IVAJ
Moderador
Moderador



País:
Sexo:
Registrado: 02 septiembre 2002
Mensajes: 2835

MensajePublicado: Vie, 17 Jun 2005 3:36 pm    Asunto: Responder citando

outoforder

He probado el script que has puesto del tiempo, pero para el 128x64, y no me rula, podrias ponerlo aqui para que salga bien en el 128x64, xk no me muestra nada solo Fra, x cierto solo ahi que tener el DLL LCDWeather o ai que instalar el programa en si???

Detallame lo necesario para que funcione, ya cambiare yo la zona y lo del numero de mi zona adaptado para 128x64 y lo que hace falta para que funcione...


PD: Al igual que como te ha dixo Mamel enhorabuena por ese peazo de LCD que es una burrada pero muy wapo...





Saludos IVAJ Guiño Guiño
Volver arriba
Ver perfil de usuario Enviar mensaje privado Visitar sitio web del autor
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Sab, 18 Jun 2005 9:53 pm    Asunto: Responder citando

Ivaj te cometo:
1º tengo instalao el LCDHype 0.40+LCDWeather Plugin Version 1.3

2º Dime qual de los dos no te funciona¿? Solo puedes ver FRA
Has provao linea a linea

LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,Weather
'Weather' -> Esto te decuelve un numero de 0 a 9 con el que podras cargar los dibujitos de las nuvelitas y los solecitos :p para mañana por la mañana si canvias ,M, por ,A, es el de la tarde, en principio si pones ,N, te serviria para la noche pero este último no me funciona

LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,Temp
'Temp' -> te devuelve la temperatura para mañana por la mañana en ºC

LCDWeather\lcdweather.dll',%ID(),Forecast,1,M,AirMoistness
'AirMoistness' -> te devuelve la humedad relativa en %

LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,WindSpeed
'WindSpeed' -> Velocidad del viento en Km/h

LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,WindDir
'WindDir' -> Devuelve una letra con la direccion del viento

LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,AirPressure
'AirPressure' -> Devuelve la presion del aire en hPa

LCDWeather\lcdweather.dll,%ID(),Forecast,1,M,Rainfall
'Rainfall' -> devuelve la probabilidad de que llueva en %

LCDWeather\lcdweather.dll,%ID(),Forecast,1,C,TempMax
'TempMax' -> Temperatura Máxima en ºC, lleva una C por que es para todo el dia de mañana

LCDWeather\lcdweather.dll,%ID(),Forecast,1,C,TempMin
'TempMin' -> Temperatura Mínima en ºC, lleva una C por que es para todo el dia de mañana

LCDWeather\lcdweather.dll,%ID(),Forecast,1,C,TempMaxSensed
'TempMaxSensed' -> Temperatura máxima de sensación en ºC, lleva una C por que es para todo el dia de mañana

LCDWeather\lcdweather.dll,%ID(),Forecast,1,C,TempMinSensed
'TempMinSensed' -> Temperatura mínima de sensación en ºC, lleva una C por que es para todo el dia de mañana

LCDWeather\lcdweather.dll,%ID(),Forecast,1,C,SunRise
'SunRise' -> hora a la que sale el sol mañana

LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,SunFall
'SunFall' -> hora a la que se pondrá el sol mañana

LCDWeather\lcdweather.dll',%ID(),Forecast,1,C,SunTime
'SunTime' ->Horas de sol, aun que no he conseguido que me funcione

Parametros para Forecast

  • Weather -> (Sirve para M (mañana),A(Tarde),N(Noche))
  • Temp -> (Sirve para M (mañana),A(Tarde),N(Noche))
  • TempMin
  • TempMinSensed
  • TempMax
  • TempMaxSensed
  • WinDir -> (Sirve para M (mañana),A(Tarde),N(Noche))
  • WinStrength -> (devuelve la fuerza del viento, no lo he provao)
  • WindSpeed -> (Sirve para M (mañana),A(Tarde),N(Noche))
  • WindGust -> (rafagas de viento, no lo he provao)
  • AriPressure -> (Sirve para M (mañana),A(Tarde),N(Noche))
  • AirMoistness -> (Sirve para M (mañana),A(Tarde),N(Noche))
  • Rainfall -> (Sirve para M (mañana),A(Tarde),N(Noche))
  • RainfallQ ->(cantidad de lluvia que puede caer en mm, no lo he provao),(Sirve para M (mañana),A(Tarde),N(Noche), no me ha funcionao aun)
  • SunRise
  • SunFall
  • SunTime ->(Sirve para M (mañana),A(Tarde),N(Noche), no me ha funcionao aun)



Para Current

  • Weather
  • Temp
  • WinDir
  • WinStrength -> (devuelve la fuerza del viento, no lo he provao)
  • WindSpeed
  • WindGust -> (rafagas de viento, no lo he provao)
  • AriPressure
  • AirMoistness
  • SunRise
  • SunFall
  • VisualRange -> (devuelve la visibilidad en Km)


Tened en cuenta que es Case Sensative o como se escriva es decir, tenis que ponerlos tal cual teniendo en cuenta mayusculas i minusculas

Espero que esta pequeña explicación os siva

Esta imagen mustra la primera la prevision pa mañana y la segunda el tiempo de hoy
Volver arriba
Ver perfil de usuario Enviar mensaje privado
outoforder




País:
Sexo:
Registrado: 03 junio 2005
Mensajes: 0

MensajePublicado: Dom, 19 Jun 2005 1:34 pm    Asunto: Responder citando

Pues ale vuelvo al ataque!!!
Os pongo otro winamp pero este lleva una playlist (el único fallo que tiene es que si tienes mas de 1000 canciones solo muestra las 1000 primeras i si por caso borrais la playlist del winamp salen unos signillos raros:p a ver si los especialistas me lo corrigen), tb le he puesto el vu para que sea un poco mas spestacular:p

LCDHype 0.40
Nota es uno modificao del Tatze 1.0.1 del foro de lcdhype

Código:

#Header
%CleanUp.ClearInputBuffer(All)
%CleanUp.ClearVRAM()
%Graph.LoadBitmap(winamp.bmp,0,0,0,0,320,240,0,NONE)

%Graph.SetTextArea(0,0,320,240)
%DefVar(add=0)
%DefVar(pos=0)
%DefVar(Key=0)
%DefVar(Next=0)
%DefVar(Prev=0)
%DefVar(Menu_Status=1)
%DefVar(Menu_Volume=0)
%DefVar(Menu_CPU=0)
%DefVar(Menu_Own=0)
%DefVar(Volume=127)
%DefVar(CPU=75)
/Prio für Gfx_Txt areas setzen/
%DefConst(TextPrio=5)
/Für ersten Durchlauf/
%DefConst(TextPrio=%TextPrio())

%System.SendMessage('Winamp v1.x','',1024,127,122)
%DefVar(LCDWidth,Local=320)
%DefVar(LCDHight,Local=240)
%DefVar(AmpVU,Local=4)
%DefVar(Half,Local=%Div(%LCDWidth(),2))
%DefVar(VULeft,Local=0)
%DefVar(VURight,Local=0)


%Common.SetPriority(1000)

%Param.RenderMode(Simple)

%CleanUp.TextArea(Last)
%Graph.SetRefreshArea(1,1,319,238)
%LCD.Gfx_SetOverlayMode()

/Saber que botoncillo le hemos dao, Prev,Plau,Pause,Stop,Next/
%Common.Compare(%Key() = 1)Then{ %System.SendMessage('Winamp v1.x','',273,40044,0) %Assign(Prev,1) }/Prev/
%Common.Compare(%Key() = 2)Then{ %System.SendMessage('Winamp v1.x','',273,40045,0) }/Play/
%Common.Compare(%Key() = 4)Then{ %System.SendMessage('Winamp v1.x','',273,40046,0) }/Pause/
%Common.Compare(%Key() = 8)Then{ %System.SendMessage('Winamp v1.x','',273,40047,0) }/Stop/
%Common.Compare(%Key() = 16)Then{ %System.SendMessage('Winamp v1.x','',273,40048,0) %Assign(Next,1) }/Next/


/Artista - Album i titol/
%LCD.Gfx_SetFont('Trebuchet MS',10,1,)
%Format.Offset(Horizontal,15)
%Format.Offset(Vertical,28)
%Param.EnableScrolling(Horizontal,Ticker,10,290,1)
"%WinAmp.Artist() - %WinAmp.Album()  "
%LCD.Gfx_SetFont('Trebuchet MS',8,1,)
%Common.CreateNewLine()
%Format.Offset(Horizontal,15)
%Format.Offset(Vertical,-2)
%Param.EnableScrolling(Horizontal,Ticker,8,290,1)
"%WinAmp.Title()  "
%Common.CreateNewLine()


/Temps/
%Common.CreateNewLine()
%Format.Offset(Horizontal,119)
%Format.Offset(Vertical,-6)
%Format.Time(%Mul(%WinAmp.TrackPos(),1000),'mm:ss') ' / '
%Format.Time(%Mul(%WinAmp.TrackLength(),1000),'mm:ss')

/Canal/
%Common.CreateNewLine()
%Format.Offset(Horizontal,203)
%Format.Offset(Vertical,-16)
%If(%WinAmp.Channels() >= 2)Then{ STEREO }Else{ MONO }

/Kbit KHZ canal/
%Common.CreateNewLine()
%Format.Offset(Horizontal,254)
%Format.Offset(Vertical,-16)
"%WinAmp.BitRate() - %Div(%WinAmp.SampleFrequency(),1000)"

/Play Pause Stop/
%If(%Menu_Status() = 1)Then{
%If(%WinAmp.Status() = 0)Then{ %LCD.Gfx_LoadBitmap(play.bmp,34,71,0,0,320,240,0,NONE)}
%If(%WinAmp.Status() = 1)Then{ %LCD.Gfx_LoadBitmap(pause.bmp,52,71,0,0,320,240,0,NONE)}
%If(%WinAmp.Status() = 2)Then{ %LCD.Gfx_LoadBitmap(stop.bmp,70,71,0,0,320,240,0,NONE)}
%If(%Prev() = 1)Then{%LCD.Gfx_LoadBitmap(prev.bmp,14,71,0,0,320,240,0,NONE) %Assign(Prev,0)}
%If(%Next() = 1)Then{%LCD.Gfx_LoadBitmap(next.bmp,88,71,0,0,320,240,0,NONE) %Assign(Next,0)}
}

/Playlist/
       
    %Graph.Font('Trebuchet MS',8,1)
    %Common.CreateNewLine()
    %Format.Offset(Vertical,6)
    /como la playlist muestra 7 titulos resto 3 para que el titulo en reproducción quede en medio de la playlist y coincida con el bmp/
    %Assign(add,%Dec(%WinAmp.TrackNo(),3))
    %Loop.For(playcount,0,6,1)
        {
         %If(%add() = -2)Then{%Format.Offset(Vertikal,30)}
         %If(%add() = -1)Then{%Format.Offset(Vertikal,20)}
         %If(%add() = 0)Then{%Format.Offset(Vertikal,10)}   
         %If(%WinAmp.Artist(%Inc(%playcount(),%add())) ! "")
          Then{
               %Format.Offset(Horizontal,14)
               %If(%Inc(%Inc(%playcount(),%add()),1) > 0)
                Then{
                     %If(%Inc(%Inc(%playcount(),%add()),1) < 100)
                     Then{
                          %If(%Inc(%Inc(%playcount(),%add()),1) < 10)
                           Then{
                                %String.Concat ("00"%Inc(%Inc(%playcount(),%add()),1))
                               }
                           Else{
                                %String.Concat ("0"%Inc(%Inc(%playcount(),%add()),1))
                               }
                         }
                     Else{
                          %Inc(%Inc(%playcount(),%add()),1)
                          ' ' %WinAmp.Artist(%Inc(%playcount(),%add()))' - '
                          %WinAmp.Title(%Inc(%playcount(),%add()))
                         }
                   
                   }
               ' ' %WinAmp.Artist(%Inc(%playcount(),%add()))' - '
               %WinAmp.Title(%Inc(%playcount(),%add()))
               %Common.CreateNewLine()
               %Format.Offset(Vertical,-3)
              }
          Else{
               %Format.Offset(Horizontal,14)
               %If(%WinAmp.RawTitle() = "")
                Then{
                     "%Inc(%Inc(%playcount(),%add()),1)."
                     %WinAmp.RawTitle(%Inc(%playcount(),%add()))
                    }
                Else{"%WinAmp.Title(%Inc(%playcount(),%add()))"}
               %Common.CreateNewLine()
               %Format.Offset(Vertical,-3)
              }               
        }
   
/Spectrum Analyser/
%WinAmp.SpecAnalyzer(FFT,PeakedBarsFilled,57,30,45,6,0.5,4,1,17,200)

/VU/
%CleanUp.InvertArea(All)
%Assign(VULeft,%Div(%Mul(%WinAmp.VU(%AmpVU(),Left),%Half()),255))
%Assign(VURight,%Div(%Mul(%WinAmp.VU(%AmpVU(),Right),%Half()),255))
%Graph.SetInvertArea(15,196,%VULeft(),%Dec(%LCDHight(),10))
%Graph.SetInvertArea(%Inc(%Half(),%Dec(%Half(),%VURight())),196,%Dec(%LCDWidth(),15),%Dec(%LCDHight(),10))
%CleanUp.RefreshArea(Last)

#EndGfxMode


Fotos:
Resultao:

Imagenes para el
guardar como next.bmp

guardar como pause.bmp

guardar como play.bmp

guardar como prev.bmp

guardar como stop.bmp

guardar como winamp.bmp

PS: tened en cuenta que las fotos estan almacenadas como png's por lo que las tendreis que convertir a bmps de 1 bit!!! pq si no el lcdhype no las va a mostrar
Volver arriba
Ver perfil de usuario Enviar mensaje privado
IVAJ
Moderador
Moderador



País:
Sexo:
Registrado: 02 septiembre 2002
Mensajes: 2835

MensajePublicado: Dom, 19 Jun 2005 7:54 pm    Asunto: Responder citando

Buenas a todos

Gracias a outoforder he conseguido "integrar" lo del tiempo que el a mostrado para su LCD de 320x240, para que salga en un LCD de 128x64... y asi me ha quedado... espero que os guste y "si veis que haya que mejorar algo" decirlo y se cambia, o si sabeis lo cambiais y lo poneis aki...




Aqui os dejo el Script que importantisimo es para el LCDHYPE 0.40

Código:
#Header
%LCD.Gfx_ClearVRAM()
%Common.SetPriority(2500)
/Insertar La ID y el Nombre de la Ciudad/
%DefVar(ID=155673)
%Graph.LoadBitmap(Temps%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,Weather).bmp,90,2,0,0,50,50,0,NONE)
%Graph.LoadBitmap(%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,WindDir).bmp,90,33,0,0,50,50,0,NONE)
/%DefVar(ID=10262)/
%DefVar(Ciudad=Almeria)
%UsePlugin(LCDWeather\lcdweather.dll,AddLocation,%ID())
%UsePlugin(LCDWeather\lcdweather.dll,SyncInterval,60)
%LCD.Gfx_SetInvertMode(0)
%LCD.Gfx_SetTextArea(0,0,128,64)
#EndHeader

#GfxMode


%Format.Offset(Horizontal,10)
%Format.Offset(Vertical,4)
/Temperatura/
%Format.AlignCenter()
%Graph.Font('Arial',8,1)
%Ciudad()
%Graph.Font('Arial',8,1,Underline)
%Format.AlignLeft()
%Format.Offset(Horizontal,48)
%Format.Offset(Vertical,0)
%Common.CreateNewLine()
/Dibujo de Prediccion/
%Graph.LoadBitmap(Temps%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,Weather).bmp,10,68,0,0,145,145,0,NONE)
%Graph.Font('Small Fonts',6,1)
%Format.Offset(Horizontal)
%Format.Offset(Vertical,0)
" Temp:           "
%Graph.Font('Small Fonts',6,1)
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,Temp)
" ºC"
%Common.CreateNewLine()
%Graph.Font('Small Fonts',6,1)
%Format.Offset(Horizontal)
%Format.Offset(Vertical,0)
"H.Relativa:   "
%Graph.Font('Small Fonts',6,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,AirMoistness)
" '%'"
%Graph.Font('Small Fonts',6,1)
%Format.Offset(Horizontal,2)
%Format.Offset(Vertical,0)
%Common.CreateNewLine()
%Graph.Font('Small Fonts',6,1)
%Format.Offset(Horizontal,2)
%Format.Offset(Vertical,0)
"Presion:        "
%Graph.Font('Small Fonts',6,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,AirPressure)
" hPa"
%Common.CreateNewLine()
"Vel. Vent:     "
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,WindSpeed)
" Km'/'h "
%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,WindDir)
%Graph.LoadBitmap(%UsePlugin(LCDWeather\lcdweather.dll,%ID(),Current,WindDir).bmp,255,90,0,0,50,50,0,NONE)
%Graph.Font('Small Fonts',6,1)
%Format.Offset(Horizontal,2)
%Format.Offset(Vertical,0)
%Common.CreateNewLine()
" Visibilidad:  "
%Graph.Font('Small Fonts',6,1)
%UsePlugin('LCDWeather\lcdweather.dll',%ID(),Current,VisualRange)
" km"
%Common.CreateNewLine()
%Graph.Font('Small Fonts',6,1)
%Format.Offset(Horizontal,51)
%Format.Offset(Vertical,0)
/Cambio de Pantalla
%Common.ChangeScreen(5000,'Next')/
#EndGfxMode



Recordar que teneis que tener las imagenes en el mismo sitio donde este guardado el SCRIPT, guardarlas en BMP de 1Bits



Creo que no me dejo nada mas... mas adelante pondre el mismo pero modificado para el LCDHype 0.39, k no es igual que para este...

Y tambien pondre el de la prediccion del dia siguiente que tiene "Outoforder" en su LCD de 320x240, pero adaptado al de 128x64...



Espero haberos servido de ayuda y postead tambien los que mismamente hayais creado vosotros...





Saludos IVAJ Guiño Guiño
Volver arriba
Ver perfil de usuario Enviar mensaje privado Visitar sitio web del autor
DAVIZINHO
modder
modder



País:
Sexo:
Registrado: 17 septiembre 2002
Mensajes: 169
Ubicación: Madrid

MensajePublicado: Dom, 19 Jun 2005 8:02 pm    Asunto: Responder citando

NAX:
IVAJ cuando lo modifiques para el lcd hype anterior al 40 cuelgalo POR DIOS, que a mi el .40 no me tira ni jarto vino, y me ha molado mucho como te ha quedado

un saludo
-DAVIZINHO-
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mostrar mensajes de anteriores:   
Publicar nuevo tema   Responder al tema    Foros de discusión -> Software Todas las horas son GMT + 2 Horas
Ir a página     
Página 19 de 29

 
Cambiar a:  

Powered by phpBB.


Este sitio no se hace responsable de ningún daño que cause en su ordenador con la información que en el se expone.Todos los productos y marcas están registrados por sus respectivos propietarios. Prohibida la reproducción total o parcial de los textos e imagenes de esta web sin el consentimiento expreso de su autor.
Hardcore-Modding.com 2001-2019 Los comentarios son propiedad de sus autores (ya sean anonimos o registrados).
Portal basado en NukeET, RSS
Página Generada en: 0,300 segundos

π