Seite 2 von 3

Verfasst: 17.11.2008 20:31
von sibru
also, ich hab´ mir aus genau den Gründen ´ne USB-Uhr angeschafft:
USB-Stick als ArmbandUhr, und das Ding kann piepsen, wenn die
Temperatur unter 25 Grad fällt...
Nachteil: schnell durschen !!! (nicht wasserdicht: die Uhr klappt schon
nicht mehr, und nach 3 bis 4 Minuten ohne wärmenden Arm piepst...)

Verfasst: 17.11.2008 20:41
von X360 Andy
sibru hat geschrieben:also, ich hab´ mir aus genau den Gründen ´ne USB-Uhr angeschafft:
USB-Stick als ArmbandUhr, und das Ding kann piepsen, wenn die
Temperatur unter 25 Grad fällt...
Nachteil: schnell durschen !!! (nicht wasserdicht: die Uhr klappt schon
nicht mehr, und nach 3 bis 4 Minuten ohne wärmenden Arm piepst...)
Sowas wäre lustig :lol:

Man bräuchte en Stick der "Piebst" wenn ich eine bestimmte reichweite entfernt bin , mit einem Sender z.b ...

Verfasst: 17.11.2008 20:48
von Rings
X360 Andy hat geschrieben:
Rings hat geschrieben:ne lange Kordel am stick, fertig !
Sieht kacke aus :lol:

Und da die PCs bei Uns UNTER dem Tisch sind...
Ich muss mich also "bücken" um den einzustecken bzw auszustecken :(

Hab bereits was kleines gebastelt... bzw bin grad dabei
na als Kordel geht auch ne Kette, damits mehr gruftig aussieht ,
evtl. auch direkt am Hosenstall festzurren ;)
und wegen dem usb untern tisch, das macht man eh nimmer.
Hier so was macht sich immer gut auffem Tisch:
http://www.pearl.de/a-PE2946-1413.shtml

Verfasst: 17.11.2008 20:51
von TomS
Hub ist schön und gut, aber er muss ja dann trotzdem unter den Tisch krabbeln, um in der Schule den Hub anzuschließen...
Allerdings wäre dann der Stick immer im Sichtbereich. Und der Hub auch dank der großen Kaffeetasse ;)

Verfasst: 17.11.2008 20:51
von Kevin
du kannst ja auf das hintergrundbild des desktops
"vergiss deinen stick nicht!!"
schreiben und wenn du dann am ende alles schließt
siehst du den hindergrund und packst deinen stick ein

Verfasst: 18.11.2008 01:35
von Regenduft
Aus gegebenem Anlassen ermögliche ich euch nun die Ehre eines exklusiven Einblicks in mein Mamutprojekt "USB-Stick-Reminder"!

Auf dem USB-Stick folgende "Autorun.inf" erstellen:

Code: Alles auswählen

[autorun]
OPEN=USBstickreminder.exe
anschließend folgenden Code kompilieren und als "USBstickremover.exe" ins Grundverzeichnis des USB-Stick kopieren (wegen der extrem hohen Komplexität habe ich alles kommentiert, aber bitte nicht traurig sein, wenn Ihr es trotzdem nicht versteht! Das geht allen anderen ebenso!):

Code: Alles auswählen

; ******************************
; ***   USB-Stick-Reminder   ***
; *** Version 1032.30 beta 1 ***
; ******************************
; ****   (c) 1981 to 2008  *****
; ****     by Regenduft    *****
; **** Handfratze-Software *****
; ******************************
; *  Comercial distibution is  *
; *  only allowed with a VERY  *
; * special permission! muhaHA!*
; ******************************
; **   people, pirating this  **
; ** software will be tickled **
; **        to death!         **
; ******************************

; Pfeil-Image erstellen/zeichnen
CreateImage(0, 50, 150, #PB_Image_DisplayFormat)
StartDrawing(ImageOutput(0))
  Box( 15,   0,  20, 100, $FF)
  Line( 0, 100,  50,   0, $FF)
  Line( 0, 100,  25,  50, $FF)
  Line(50, 100, -25,  50, $FF)
  FillArea(25, 125, $FF, $FF)
  DrawText(25-TextWidth(" Stick! ")/2, 75-TextHeight(" Stick! "), " Stick! ", $FFFF, 10)
StopDrawing()

; Desktop abmessen
ExamineDesktops()
x = DesktopWidth(0)-125
y = DesktopHeight(0)-200

; Fenster erstellen (unsichtbar)
#WinFlags = #WS_SYSMENU | #PB_Window_BorderLess | #PB_Window_Invisible
OpenWindow(0, x, y, 50, 150, "USB-STICK!!!", #WinFlags)
ImageGadget(0,0,0,0,0,ImageID(0))
StickyWindow(0,1)

; "Fenster-Skin erstellen"
SetWindowLong_(WindowID(0), #GWL_EXSTYLE, #WS_EX_LAYERED)
SetLayeredWindowAttributes_(WindowID(0), 0, 0, #LWA_COLORKEY)

; Fenster anzeigen
HideWindow(0,0)

; Variablen initialisieren
Ton = 1000
Select OSVersion()
  ;-Hier bitte rumschrauben!!!
  ; ==========================
  ; 0 -> kein Sound
  ; 1 -> Windows Standard-Sound
  ; 2 -> System-Speaker
  Case #PB_OS_Windows_NT3_51      : OS = 0
  Case #PB_OS_Windows_95          : OS = 1
  Case #PB_OS_Windows_NT_4        : OS = 0
  Case #PB_OS_Windows_98          : OS = 1
  Case #PB_OS_Windows_ME          : OS = 1
  Case #PB_OS_Windows_2000        : OS = 2
  Case #PB_OS_Windows_XP          : OS = 2 ; getestet!
  Case #PB_OS_Windows_Server_2003 : OS = 2
  Case #PB_OS_Windows_Vista       : OS = 2
  Case #PB_OS_Windows_Server_2008 : OS = 2
EndSelect

; dum-di-dum...
While WindowEvent() : Wend

; Hauptschleife
Repeat
  
  ; Event-Abfrage
  WinEvnt = WindowEvent()
  Delay(2)
  
  ; Bewegung berechnen
  Winkel.f + 0.075
  Sinus = 25 - Sin(Winkel) * 25

  ; Sound spielen und "sperren"
  If Sinus = 0 And Flanke = 0
    Flanke = 1
    Select OS
      Case 1 : Beep_(0, 0)
      Case 2 : For i = 1 To 8 : Beep_(1000 + Ton / i, 2) : Next i
    EndSelect

  ; Sound "freigeben" und Tonhöhe wechseln
  ElseIf Flanke = 1 And Sinus > 0
    Ton * -1
    Flanke = 0
  EndIf
  
  ; Fenster 
  ResizeWindow(0, #PB_Ignore, y-Sinus, #PB_Ignore, #PB_Ignore)

; Schwierigster Teil: Hier wird das Programm beendet!
Until WinEvnt = #PB_Event_CloseWindow

Verfasst: 18.11.2008 19:39
von Regenduft
Man könnte im obrigen Code noch einen InputRequester() mit der Frage "Wie lange geht die Schulstunde noch?" einbauen... dann noch einen kleinen Timer...

Aber ich glaube ich stelle lieber die Arbeit an meinem Lebenswerk auf Grund der fehlenden Ressonanz ein. :cry:

Kein Sinn für Chindōgu hier! :evil:

Verfasst: 18.11.2008 20:15
von X360 Andy
@Regenduft

Bekomm bei Line 37 ne Fehlermeldung bei Imagegadget
[ERROR] There is ni current GadgetList

EDIT
CreateGadgetList(WindowID(0))
...
Geht danke
Perfekt das übterbietet mein Prog. (-;

Danke

Verfasst: 18.11.2008 20:31
von Andesdaf
Der Code ist PB 4.3 und wurde auf PB 4.2 kompiliert. Standard-Problem bei mir.

Verfasst: 18.11.2008 20:33
von Regenduft
Ups! Ich passe mal meine Signatur an! (Nutze PB4.20 in Nutze PB4.30)