tips? skulle exempelvis vilja ha matrix-skärmsläckare... anything goes, digitalur, texter, akvarium vika tips som helst?

Bra sökord i Google:
screensaver
windows (gärna med angiven version ex. XP eller Vista)
download
freeware (om du inte är beredd att betala...)

Skriv dom alla på en rad, och leta igenom länkarna.

Man kan göra om så gott som vilket program som helst till skärmsläckare i windows.
Men av samma anledning finns det nästan lika mycket skit i skärmsläckare som i vanliga program.

Koden nedanför är ett autohotkey script. Döper du om det kompilerade programmet till blaha.SCR istället för blaha.EXE (som det blir automatiskt), så går den att använda som en skärmsläckare.
Jag har kopierat koden från ett par existerande script på www.autohotkey.net/forum Finns mängder av nytto/kul- script där.
Open source

Kod: Markera allt

#Persistent
#SingleInstance, Force
SetBatchLines, -1
CoordMode,Mouse,Screen
BlockInput,MouseMove

radius := 170      ; Storlek på cirkeln från början
f_1  := 1
x_1 := 0

CoordMode, Mouse, Screen
Gui -Caption +AlwaysOnTop +LastFound
Gui, Color, 0x000000, 0x000000
WinGet, IDvar , ID
Gui, Show, x0 y0 h%A_ScreenHeight% w%A_ScreenWidth%
PolygonP1 := " 0-0 "
PolygonP3 := "0-0 0-" . A_ScreenHeight . " " . A_ScreenWidth . "-" . A_ScreenHeight . " " . A_ScreenWidth . "-0 0-0"


MakeSpot:
loop
{

a_1 := A_TimeIdlePhysical
 if a_1 < 500
 if f_1 <> 1
 if x_1 <> 1
 exitapp
   
    x_1 := 0
    f_1 := 0
   random,ranx,0,1440
   random,rany,0,900
   random,rans,1,10
   mousemove,ranx,rany,rans ;mouse move
   sleep 450
   
   gosub, MakePolygonP2
   Polygon := PolygonP1 . PolygonP2 . PolygonP3
   WinSet, Region, %Polygon%, ahk_id %IDvar%
   Gui +AlwaysOnTop
   sleep, 10
}
return


~WheelUp::   ; + eller uppåt på musens scrollknapp förstorar cirkeln när programmet körs
~+::
x_1 := 1
if (radius <A_ScreenWidth> 20)
   radius -= 10
return


~WheelDown::   
~-::
x_1 := 1
if (radius > 20)
   radius -= 10
return


MakePolygonP2:
segments := 36
if (radius >= 200)
   segments := 72
if (radius >= 600)
   segments := 108
PolygonP2 =
MouseGetPos, X_Mouse, Y_Mouse,,,1
segsize := 360 / segments
loop %segments%
{
   segrad := A_Index * segsize * 0.01745329252   
   tmpX := Ceil( X_Mouse + ( radius * cos(segrad) ) )
   tmpY := Ceil( Y_Mouse + ( radius * sin(segrad) ) )
   PolygonP2 .= tmpX . "-" . tmpY . " "
   if (A_Index = 1)
   {
      firstX := tmpX
      firstY := tmpY   
   }
   if (A_Index = segments)
      PolygonP2 .= firstX . "-" . firstY . " "
}
return

Esc::ExitApp    ; Escape "dödar" programmet, t.ex ifall det fastnar.


Sätt den på "ingen skärmsläckare" och ställ in så den somnar av sig själv efter en stunds icke-användning. Allt annat är totalt onödigt slöseri med energi.

Jo, men inte lika roligt...

Inger skrev:Sätt den på "ingen skärmsläckare" och ställ in så den somnar av sig själv efter en stunds icke-användning. Allt annat är totalt onödigt slöseri med energi.

skärmsläckare är så 1998...