Beiträge von BugFix

[autoit]

#include <GUIConstants.au3>

Dim $grafik, $width = 190, $height = 190, $desc = 1
Dim $diameter, $pos, $sec = @SEC, $color
Dim $DarkOrange = 0xFF8C00, $Orange = 0xFFA500, $HotPink = 0xFF69B4, $LightCoral = 0xF08080

[/autoit] [autoit][/autoit] [autoit]

$gui=GUICreate("Time "&@HOUR&':'&@MIN&':'&@SEC, 200,200,-1,-1,BitOR($WS_SYSMENU,$WS_CAPTION))
$grafik=GuiCtrlCreateGraphic(5, 5, $width, $height)
GUISetState()

Do
$msg = GUIGetMsg()
If @SEC <> $sec Then
Switch $desc
Case 1
$sec = @SEC
If $sec = 59 Then $desc = 0
$diameter = @SEC*3
$pos = ($width-$diameter)/2
If (Mod(@SEC,2) = 0) Or (@SEC = 0) Then
$color = $DarkOrange
Else
$color = $Orange
EndIf
Case 0
$sec = @SEC
If $sec = 59 Then $desc = 1
$diameter = (60 - @SEC)*3
$pos = ($width-$diameter)/2
If (Mod(@SEC,2) = 0) Or (@SEC = 0) Then
$color = $HotPink
Else
$color = $LightCoral
EndIf
EndSwitch
SetGraphik()
EndIf
Sleep(100)
Until $msg=$GUI_EVENT_CLOSE

[/autoit] [autoit][/autoit] [autoit]

Func SetGraphik()
Local $title = WinGetTitle("Time")
WinSetTitle($title, '', "Time "&@HOUR&':'&@MIN&':'&@SEC)
GuiSetState(@SW_LOCK, $gui)
GUICtrlDelete($grafik)
$grafik=GuiCtrlCreateGraphic(5, 5, $width, $height)
GUICtrlSetGraphic(-1,$GUI_GR_COLOR, $color,$color)
GUICtrlSetGraphic(-1,$GUI_GR_ELLIPSE, $pos, $pos, $diameter, $diameter)
GUICtrlSetGraphic($grafik,$GUI_GR_REFRESH)
GuiSetState(@SW_UNLOCK, $gui)
EndFunc

[/autoit]

[autoit]

#include <GUIConstants.au3>
Opt("GUIOnEventMode", 1)

[/autoit] [autoit][/autoit] [autoit]

DllCall("uxtheme.dll", "none", "SetThemeAppProperties", "int", 1)
Dim $hour = @HOUR, $min = @MIN, $sec = @SEC
$SteelBlue = 0x4682B4
$White = 0xFFFFFF

[/autoit] [autoit][/autoit] [autoit]

Dim $arCol[60]
$arCol[0] = 0xFFEBCD
$arCol[1] = 0xFFDEAD
$arCol[2] = 0xD2B48C
$arCol[3] = 0xDEB887
$arCol[4] = 0xCD853F
$arCol[5] = 0xA0522D
$arCol[6] = 0x8B4513
$arCol[7] = 0xFFA07A
$arCol[8] = 0xE9967A
$arCol[9] = 0xF08080
$arCol[10] = 0xBC8F8F
$arCol[11] = 0xCD5C5C
$arCol[12] = 0xA52A2A
$arCol[13] = 0xDC143C
$arCol[14] = 0xFF69B4
$arCol[15] = 0xFF1493
$arCol[16] = 0xC71585
$arCol[17] = 0xFF00FF
$arCol[18] = 0x8B008B
$arCol[19] = 0x800080
$arCol[20] = 0x9400D3
$arCol[21] = 0x9932CC
$arCol[22] = 0x8A2BE2
$arCol[23] = 0x0000FF
$arCol[24] = 0x0000CD
$arCol[25] = 0x000080
$arCol[26] = 0x4169E1
$arCol[27] = 0x1E90FF
$arCol[28] = 0x00BFFF
$arCol[29] = 0x00CED1
$arCol[30] = 0x00FFFF
$arCol[31] = 0x008B8B
$arCol[32] = 0x008080
$arCol[33] = 0x48D1CC
$arCol[34] = 0x20B2AA
$arCol[35] = 0x40E0D0
$arCol[36] = 0x00FF7F
$arCol[37] = 0x32CD32
$arCol[38] = 0x00FF00
$arCol[39] = 0x008000
$arCol[40] = 0x7FFF00
$arCol[41] = 0xADFF2F
$arCol[42] = 0x9ACD32
$arCol[43] = 0xFFFF00
$arCol[44] = 0x808000
$arCol[45] = 0xFFD700
$arCol[46] = 0xDAA520
$arCol[47] = 0xB8860B
$arCol[48] = 0xFFA500
$arCol[49] = 0xFF8C00
$arCol[50] = 0xF4A460
$arCol[51] = 0xD2691E
$arCol[52] = 0xFF4500
$arCol[53] = 0xFF7F50
$arCol[54] = 0xFF6347
$arCol[55] = 0xFA8072
$arCol[56] = 0xFF0000
$arCol[57] = 0xB22222
$arCol[58] = 0x8B0000
$arCol[59] = 0x800000

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$Time = GUICreate("Time", 100, 285, -1, -1, BitOR($WS_SYSMENU,$WS_CAPTION))
GUISetOnEvent($GUI_EVENT_CLOSE, "Close")
GUISetBkColor($SteelBlue)
$prHour = GUICtrlCreateProgress(15, 10, 20, 250, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$prMin = GUICtrlCreateProgress(40, 10, 20, 250, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$prSec = GUICtrlCreateProgress(65, 10, 20, 250, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$lHour = GUICtrlCreateLabel("lHour", 15, 265, 20, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
GUICtrlCreateLabel(":", 36, 265, 4, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
$lMin = GUICtrlCreateLabel("lMin", 40, 265, 20, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
GUICtrlCreateLabel(":", 61, 265, 4, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
$lSec = GUICtrlCreateLabel("lSec", 65, 265, 20, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
GUISetState(@SW_SHOW)
GUICtrlSetData($prHour, @HOUR*100/24)
GUICtrlSetData($lHour, @HOUR)
GUICtrlSetData($prMin, @MIN*100/60)
GUICtrlSetData($lMin, @MIN)
GUICtrlSetData($prSec, @SEC*100/60)
GUICtrlSetData($lSec, @SEC)
_HourColor()
_MinColor()
_SecColor()
While 1
Sleep(100)
If @SEC <> $sec Then
$sec = @SEC
GUICtrlSetData($prSec, @SEC*100/60)
GUICtrlSetData($lSec, @SEC)
_SecColor()
EndIf
If @MIN <> $min Then
$min = @MIN
GUICtrlSetData($prMin, @MIN*100/60)
GUICtrlSetData($lMin, @MIN)
_MinColor()
EndIf
If @HOUR <> $hour Then
$hour = @HOUR
GUICtrlSetData($prHour, @HOUR*100/24)
GUICtrlSetData($lHour, @HOUR)
_HourColor()
EndIf
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func Close()
Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _SecColor()
GUICtrlSetColor($prSec, $arCol[@SEC])
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _MinColor()
GUICtrlSetColor($prMin, $arCol[@MIN])
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _HourColor()
Select
Case @HOUR = 0
GUICtrlSetColor($prHour, $arCol[0])
Case (@HOUR > 0) And (@HOUR < 13)
GUICtrlSetColor($prHour, $arCol[@HOUR*5-1])
Case Else
GUICtrlSetColor($prHour, $arCol[(@HOUR-12)*5-1])
EndSelect
EndFunc

[/autoit]

[autoit]

#include <GUIConstants.au3>
Opt("GUIOnEventMode", 1)

[/autoit] [autoit][/autoit] [autoit]

Dim $hour = @HOUR, $min = @MIN, $sec = @SEC
$SteelBlue = 0x4682B4
$White = 0xFFFFFF
$Chartreuse = 0x7FFF00
$Lime = 0x00FF00
$LimeGreen = 0x32CD32
$YellowGreen = 0x9ACD32
$Gold = 0xFFD700
$Goldenrod = 0xDAA520
$Orange = 0xFFA500
$DarkOrange = 0xFF8C00
$Coral = 0xFF7F50
$Salmon = 0xFA8072
$Tomato = 0xFF6347
$Red = 0xFF0000
$Time = GUICreate("Time", 100, 285, -1, -1, BitOR($WS_SYSMENU,$WS_CAPTION))
GUISetOnEvent($GUI_EVENT_CLOSE, "Close")
GUISetBkColor($SteelBlue)
$prHour = GUICtrlCreateProgress(15, 10, 20, 250, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$prMin = GUICtrlCreateProgress(40, 10, 20, 250, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$prSec = GUICtrlCreateProgress(65, 10, 20, 250, BitOR($PBS_SMOOTH,$PBS_VERTICAL))
$lHour = GUICtrlCreateLabel("lHour", 15, 265, 20, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
GUICtrlCreateLabel(":", 36, 265, 4, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
$lMin = GUICtrlCreateLabel("lMin", 40, 265, 20, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
GUICtrlCreateLabel(":", 61, 265, 4, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
$lSec = GUICtrlCreateLabel("lSec", 65, 265, 20, 17, $SS_CENTER)
GUICtrlSetColor(-1, $White)
GUICtrlSetFont(-1, 10, 600)
GUISetState(@SW_SHOW)
GUICtrlSetData($prHour, @HOUR*100/24)
GUICtrlSetData($lHour, @HOUR)
GUICtrlSetData($prMin, @MIN*100/60)
GUICtrlSetData($lMin, @MIN)
GUICtrlSetData($prSec, @SEC*100/60)
GUICtrlSetData($lSec, @SEC)
_HourColor()
_MinColor()
_SecColor()
While 1
Sleep(100)
If @SEC <> $sec Then
$sec = @SEC
GUICtrlSetData($prSec, @SEC*100/60)
GUICtrlSetData($lSec, @SEC)
_SecColor()
EndIf
If @MIN <> $min Then
$min = @MIN
GUICtrlSetData($prMin, @MIN*100/60)
GUICtrlSetData($lMin, @MIN)
_MinColor()
EndIf
If @HOUR <> $hour Then
$hour = @HOUR
GUICtrlSetData($prHour, @HOUR*100/24)
GUICtrlSetData($lHour, @HOUR)
_HourColor()
EndIf
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func Close()
Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _SecColor()
Select
Case @SEC < 6
GUICtrlSetColor($prSec, $Chartreuse)
Case (@SEC > 5) And (@SEC < 11)
GUICtrlSetColor($prSec, $Lime)
Case (@SEC > 10) And (@SEC < 16)
GUICtrlSetColor($prSec, $LimeGreen)
Case (@SEC > 15) And (@SEC < 21)
GUICtrlSetColor($prSec, $YellowGreen)
Case (@SEC > 20) And (@SEC < 26)
GUICtrlSetColor($prSec, $Gold)
Case (@SEC > 25) And (@SEC < 31)
GUICtrlSetColor($prSec, $Orange)
Case (@SEC > 30) And (@SEC < 36)
GUICtrlSetColor($prSec, $Goldenrod)
Case (@SEC > 35) And (@SEC < 41)
GUICtrlSetColor($prSec, $DarkOrange)
Case (@SEC > 40) And (@SEC < 46)
GUICtrlSetColor($prSec, $Coral)
Case (@SEC > 45) And (@SEC < 51)
GUICtrlSetColor($prSec, $Salmon)
Case (@SEC > 50) And (@SEC < 56)
GUICtrlSetColor($prSec, $Tomato)
Case Else
GUICtrlSetColor($prSec, $Red)
EndSelect
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _MinColor()
Select
Case @MIN < 6
GUICtrlSetColor($prMin, $Chartreuse)
Case (@MIN > 5) And (@MIN < 11)
GUICtrlSetColor($prMin, $Lime)
Case (@MIN > 10) And (@MIN < 16)
GUICtrlSetColor($prMin, $LimeGreen)
Case (@MIN > 15) And (@MIN < 21)
GUICtrlSetColor($prMin, $YellowGreen)
Case (@MIN > 20) And (@MIN < 26)
GUICtrlSetColor($prMin, $Gold)
Case (@MIN > 25) And (@MIN < 31)
GUICtrlSetColor($prMin, $Orange)
Case (@MIN > 30) And (@MIN < 36)
GUICtrlSetColor($prMin, $Goldenrod)
Case (@MIN > 35) And (@MIN < 41)
GUICtrlSetColor($prMin, $DarkOrange)
Case (@MIN > 40) And (@MIN < 46)
GUICtrlSetColor($prMin, $Coral)
Case (@MIN > 45) And (@MIN < 51)
GUICtrlSetColor($prMin, $Salmon)
Case (@MIN > 50) And (@MIN < 56)
GUICtrlSetColor($prMin, $Tomato)
Case Else
GUICtrlSetColor($prMin, $Red)
EndSelect
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _HourColor()
Select
Case @HOUR < 3
GUICtrlSetColor($prHour, $Chartreuse)
Case (@HOUR > 2) And (@HOUR < 5)
GUICtrlSetColor($prHour, $Lime)
Case (@HOUR > 4) And (@HOUR < 7)
GUICtrlSetColor($prHour, $LimeGreen)
Case (@HOUR > 6) And (@HOUR < 9)
GUICtrlSetColor($prHour, $YellowGreen)
Case (@HOUR > And (@HOUR < 11)
GUICtrlSetColor($prHour, $Gold)
Case (@HOUR > 10) And (@HOUR < 13)
GUICtrlSetColor($prHour, $Orange)
Case (@HOUR > 12) And (@HOUR < 15)
GUICtrlSetColor($prHour, $Goldenrod)
Case (@HOUR > 14) And (@HOUR < 17)
GUICtrlSetColor($prHour, $DarkOrange)
Case (@HOUR > 16) And (@HOUR < 19)
GUICtrlSetColor($prHour, $Coral)
Case (@HOUR > 18) And (@HOUR < 21)
GUICtrlSetColor($prHour, $Salmon)
Case (@HOUR > 20) And (@HOUR < 23)
GUICtrlSetColor($prHour, $Tomato)
Case Else
GUICtrlSetColor($prHour, $Red)
EndSelect
EndFunc

[/autoit]

[autoit]

#include <GUIConstants.au3>

$h_maingui = GUICreate("FB 0.00A for GW", 320, 70, -1, -1)
$h_progressbar = GUICtrlCreateProgress(10, 10, 300, 20)
$label = GUICtrlCreateLabel('', 45, 45, 230, 17, $SS_CENTER)
GUISetState(@SW_SHOW, $h_maingui)

$f_readvalue = 25.8
GUICtrlSetData($h_progressbar, $f_readvalue)
GUICtrlSetData($label, $f_readvalue)
While 1
$a_msg = GUIGetMsg(1)

Select
Case $a_msg[0] == $GUI_EVENT_CLOSE
ExitLoop 1
EndSelect
WEnd
GUIDelete($h_maingui)
Exit(0)

[/autoit]

[autoit]

#NoTrayIcon
AutoitSetOption("MouseCoordMode", 0)
Dim $state, $aktiv, $butt_x, $butt_y, $var, $path, $game, $c_game, $key_game
Dim $room, $c_room, $key_room, $i, $t1, $t2, $delay, $Spiel

[/autoit] [autoit][/autoit] [autoit]

If FileExists(@ScriptDir & "\" & "carom_again.INI") Then
$var = IniRead(@ScriptDir & "\" & "carom_again.INI", "set", "done", "")
If $var = 0 Then
MsgBox(16, "Achtung", "Die 'carom_again_settings' müssen zumindest einmal ausgeführt" & @LF & @LF & _
"und an deine Installation angepaßt werden." & @LF & @LF & @LF & @LF & "Das Einstellungsprogramm wird jetzt aufgerufen.")
Run(@ScriptDir & "\" & "carom_again_settings.exe")
If @error Then
MsgBox(16, "Achtung!", "Das Einstellungsprogramm: 'carom_again_settings.exe' ist nicht im Installationspfad: " & _
@ScriptDir & "\" & "vorhanden!" & @LF & @LF & "Das Programm wird jetzt beendet.")
Exit
EndIf
While $var = 0
Sleep(250)
$var = IniRead(@ScriptDir & "\" & "carom_again.INI", "set", "done", "")
WEnd
EndIf
$path = IniRead(@ScriptDir & "\" & "carom_again.INI", "path", "current", "")
$game = IniReadSection(@ScriptDir & "\" & "carom_again.INI", "game")
$c_game = $game[10][1]
$room = IniReadSection(@ScriptDir & "\" & "carom_again.INI", "room")
$c_room = $room[9][1]
$delay = IniRead(@ScriptDir & "\" & "carom_again.INI", "set", "delay", "")
Else
MsgBox(16, "Achtung ! Fehlende Datei!", "Die Datei: <carom_again.INI> ist nicht im Ordner: <" & @ScriptDir & "\" & "> enthalten!" _
& @LF & @LF & "Ohne diese Datei kann das Programm nicht ausgeführt werden!")
Exit
EndIf
HotKeySet("!y", "_CaromStart")
$aktiv = 0
For $i = 1 To $game[0][0]-1
If $game[$i][0] = $c_game Then
$key_game = $game[$i][1]
ExitLoop
EndIf
Next
For $i = 1 To $room[0][0]-1
If $room[$i][0] = $c_room Then
$key_room = $room[$i][1]
ExitLoop
EndIf
Next
Select
Case $key_game = 3
$t1 = "3-Cushion"
Case $key_game = 4
$t1 = "4-Ball"
Case $key_game = 6
$t1 = "6-Ball"
Case $key_game = 8 Or $key_game = "e"
$t1 = "8-Ball"
Case $key_game = 9
$t1 = "9-Ball"
Case $key_game = "c"
$t1 = "CardBall"
Case $key_game = "r"
$t1 = "Rotation"
Case $key_game = "s"
$t1 = "Short-Snooker"
Case $key_game = "n"
$t1 = "Normal-Snooker"
EndSelect

[/autoit] [autoit][/autoit] [autoit]

Switch $key_room
Case "u"
$t2 = "Underground"
Case "j"
$t2 = "Japanese"
Case "k"
$t2 = "Korean"
Case "m"
$t2 = "Millennium"
Case "c"
$t2 = "Christmas"
Case "e"
$t2 = "Event"
Case "a"
$t2 = "Antique"
Case "{PGDN}"
$t2 = "CaromBeach"
EndSwitch
If StringInStr($path, "carom.exe") Then
$Spiel = "Standard"
Else
$Spiel = "Full Practice"
EndIf
MsgBox(64, "Hinweis", "Spiel: " & $t1 & @LF & @LF & _
"Raum: " & $t2 & @LF & @LF & _
"Modus: " & $Spiel & @LF & @LF & @LF & _
"Nach Beendigung des Spiels, kann mit der Tastenkombination:" & @LF & @LF & "< ALT > + < y >" & @LF & @LF & _
"sofort ein neues Spiel begonnen werden." & @LF & @LF & @LF & @LF & @LF & @LF & _
"eMail: [email='bug_fix@web.de'][/email]" & @LF & @LF & "Created with AutoIt3")

[/autoit] [autoit][/autoit] [autoit]

While 1
Sleep(500)
$state = WinGetState("Carom3D", "")
Select
Case $state = 0 And $aktiv = 1
ExitLoop
Case $aktiv = 0 ; Practice Mode
Run($path)
If @error Then
MsgBox(16, "Achtung", "Programmpfad der Anwendung: " & $path & " ist nicht vorhanden!")
Exit
EndIf
WinWaitActive("Carom3D")
$aktiv = 1
Sleep(1000)
_CaromStart()
EndSelect
WEnd
Exit

[/autoit] [autoit][/autoit] [autoit]

Func _CaromStart()
BlockInput(1)
If StringInStr($path, "carom.exe") Then
MouseClick("left",520,180,1,0)
Else
MouseClick("left",492,128,1,0)
EndIf
If $key_game = 8 Or $key_game = "e" Then
Send("8e")
Else
Send($key_game)
EndIf
Send("{TAB}")
Send($key_room)
Send("{ENTER}")
BlockInput(0)
Sleep($delay)
If StringInStr($path, "carom.exe") Then ; wenn nicht full_praxis_modus
If _ScanF1() Then Send("{F1}")
If _ScanF4() Then Send("{F4}")
EndIf
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _ScanF1()
Local $left, $top, $right, $bottom
Switch @DesktopWidth
Case 800
$left = 696
$top = 108
$right = 788
$bottom = 204
Case 1024
$left = 920
$top = 120
$right = 1012
$bottom = 208
Case 1280
$left = 1176
$top = 108
$right = 1268
$bottom = 208
EndSwitch
PixelSearch($left,$top,$right,$bottom,0x00314A,0,4)
If Not @error Then Return True
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _ScanF4()
Local $left, $top, $right, $bottom
Switch @DesktopWidth
Case 800
$left = 8
$top = 156
$right = 164
$bottom = 320
Case 1024
$left = 8
$top = 156
$right = 164
$bottom = 304
Case 1280
$left = 8
$top = 156
$right = 164
$bottom = 324
EndSwitch
PixelSearch($left,$top,$right,$bottom,0x00314A,0,4)
If Not @error Then Return True
EndFunc

[/autoit]

Zitat

Anwaltskanzlei Tank
RA Olaf Tank
Rheiner Landstraße 197

49078 Osnabrück

Aktenzeichen: 522760/61
Osnabrück, den 21.05.2007

Bitte geben Sie Ihr Aktenzeichen bei jeglichem Schriftverkehr und Zahlungen immer an.

Sehr geehrte Kunde,

hiermit zeige ich die Interessenvertretung der Firma Andreas & Manuel Schmidtlein GbR, Vor der Hube 3, D 64572 Büttelborn an. Ordnungsgemäße Bevollmächtigung wird anwaltlich versichert. Meine Mandantschaft macht gegen Sie folgende Forderung geltend:

Rechnung vom 29.04.2007 aus Dienstleistungsvertrag mit der Rechnungsnummer R951181 für die Anmeldung vom 29.04.2007 um 14:51 Uhr auf der Internetseite P2P-heute.com mit folgender Anmelde-IP: 217.444.203.03.

Sie schulden meiner Mandantschaft daher 697,00 EUR. Da Sie sich in Verzug befinden, sind Sie gegenüber meiner Mandantschaft verpflichtet, die durch meine Tätigkeit entstandenen Gebühren zu erstatten.

Das Originalrechnung finden Sie im Anhang als signierte Word Datei.
Bitte behalten Sie das Original Rechnung unbedingt für Ihre Unterlagen.

Liquidation:

1,3 Geschäftsgebühr, Nr. 2300 VV 243,50 EUR

Auslagenpauschale, Nr. 7002 VV 5,50 EUR

Gesamtsumme 252,00 EUR

Der von Ihnen zu zahlende Gesamtbetrag beläuft sich somit auf 913,00 EUR.

Ich fordere Sie auf, den Gesamtbetrag, innerhalb einer Frist von 10 Tagen, also bis zum

29.05.2007 (hier eingehend)

auszugleichen. Bitte überweisen Sie diesen Betrag auf das unten angegebene Konto. Sollte der Gesamtbetrag nicht fristgerecht eingehen, werde ich meiner Mandantschaft empfehlen, die Forderung ohne weitere außergerichtliche Ankündigung, gerichtlich geltend zu machen, wodurch weitere Kosten zu Ihren Lasten entstehen.

Wir möchten in diesem Zusammenhang auf die bereits ergangenen Urteile verweisen, welche Sie auf der Internetseite https://autoit.de/www.forderungseinzug.de einsehen können.

Bei der Anmeldung auf oben genannter Internetseite wurde die zu diesem Zeitpunkt übermittelte IP-Adresse gespeichert. Die IP-Adresse ermöglicht den Strafverfolgungsbehörden, im Falle einer strafrechtlichen Ermittlung, die Identifikation des PC's, der zum Zeitpunkt der Anmeldung genutzt wurde.

Als weitere Sicherheitsinstanz ist auf oben genannter Internetseite das Geburtsdatum des Users eingegeben worden. Sollte sich bei einer weiteren überprüfung der Daten herausstellen, dass ein falsches Geburtsdatum eingegeben wurde, ist von einem Betrugsdelikt auszugehen. In diesem Fall hätte sich eine gegebenenfalls minderjährige Person eine Leistung erschlichen, die ihr nicht hätte bereitgestellt werden dürfen. Hier behalte ich mir im Namen meiner Mandantschaft die Erstattung einer Strafanzeige vor. Die dabei anfallenden Kosten und Auslagen sind gegebenenfalls gegen Sie geltend zu machen.

Mit freundlichen Grüßen

Olaf Tank
Rechtsanwalt

Anwaltskanzlei Tank
RA Olaf Tank
Postfach 6251
49078 Osnabrück
Tel: 0541 34 97 70 0
Fax: 0541 34 97 70 77
anwalt@forderungseinzug.de

Bankverbindung Ausland: Postbank Hannover IBAN DE06 2501 0030 0077 6673 07, BIC: PBNKDEFF

Bankverbindung Deutschland: Postbank Hannover Kontonummer: 77 667 307, BLZ 250 100 30

Bitte geben Sie als Zahlungsempfänger unbedingt RA Olaf Tank an und Ihr Aktenzeichen als Verwendungszweck.

Alles anzeigen