JD's Blog

Go Faster

piotrgiedziun — Sat, 26 Sep 2009 18:15:21 +0000

Go Faster is simple and really useful application write in Basic4ppc. Basic4ppc is cool and smart app to create exe files for windows 6.0 etc.
Go Faster was created to help people who use public transport. If you are one of them maybe you found sth useful. This app showing current train/bus traffic in simple table. You can easy generate your own bus-stop traffic! App use XML files. If you live in Wrocław you can use this source to generate your XML files also if you’re developer you can transform this script. To regenerate app you have to have Basic4ppc created by Anywhere Software.

Download cab files

Generate XML files

 0,1,2
		train - number of train
		time - time in minuts
		*/
		$tab['busstop_id']='24214';
		$tab['train']=$id;
		$xml='';
		$html = file_get_contents($filename);
		//select wariant
		preg_match_all('#(.*?)#si', $html, $przystanek);
		//pobieram kod dni
		preg_match_all('#(.*?)#si', $przystanek[0][0], $dzien);
		/*
			dzien array
			1 - nazwa dnia
			2 - rozkład dla dnia
		*/
		for($i=0;$i';
					$xml.=''.$tab['type_of_day'].'';
					$xml.=''.$tab['time'].'';
					$xml.='>';
				}
			}
		}
		return $xml;
	}
	//set line number
	$xml='';
	//generate heders
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';
	$xml.='';

	//make lines
	$xml.=doit('line9.xml','9');
	$xml.=doit('line17.xml','17');
	$xml.=doit('line12.xml','12');

	$xml.='';
	//save it!
	$handle = fopen('default.xml', 'w+');
	fwrite($handle, $xml);
	fclose($handle);
?>

Application source (download)

Sub Globals
	constval=False
End Sub

Sub App_Start
	Form1.Show

	If constval = False Then
	Table1.LoadXML("default.xml")
	End If

	today = DateDayOfweek(Now)
	If today = "Monday" Then
		datetype=0
	Else If today = "Tuesday" Then
		datetype=0
	Else If today = "Wednesday" Then
		datetype=0
	Else If today = "Thursday" Then
		datetype=0
	Else If today = "Friday" Then
		datetype=0
	Else If today = "Saturday" Then
		datetype=1
	Else If today = "Sunday" Then
		datetype=2
	End If
	Table1.Filter(Table1.ColName(2) & " = '" & datetype & "'")
	Table1.TableSort(Table1.ColName(3) & " ASC")
	'show sellected current
	timenow=(TimeH*60)+TimeM-1
	'Dim i As Integer
	i = Table1.RowCount-1
	Do While i > 2
		If timenow <= Table1.Cell(Table1.ColName(3),i) Then 			j=i 		End If 		If Table1.Cell(Table1.ColName(3),i)-timenow => 0 Then
			Table1.Cell(Table1.ColName(0),i)=Table1.Cell(Table1.ColName(0),i) & " (" & Table1.Cell(Table1.ColName(3),i)-timenow & ")"
		End If
	i=i-1
	Loop
	Table1.SelectCell(Table1.ColName(0), j)
	constval=True
End Sub

Sub mnuLoadXML_Click
	OpenXML.Filter = "XML Files|*.xml"
	If OpenXML.Show = cCancel Then Return
	Table1.Clear
	Table1.LoadXML(OpenXML.File)
	App_Start
End Sub

Sub btnPrevious_Click
'priev
If Table1.SelectedRow = -1 Then
	Table1.SelectCell(Table1.ColName(0),0)
Else
	If Table1.SelectedRow-10 >= 0 Then
	Table1.SelectCell(Table1.ColName(0),Table1.SelectedRow-10)
	Else
	Table1.SelectCell(Table1.ColName(0),0)
	End If
End If
End Sub

Sub btnNext_Click
'next
If Table1.SelectedRow = -1 Then
	Table1.SelectCell(Table1.ColName(0),11)
Else
	If Table1.SelectedRow+11 <= Table1.RowCount-1 Then
	Table1.SelectCell(Table1.ColName(0),Table1.SelectedRow+11)
	Else
	Table1.SelectCell(Table1.ColName(0),Table1.RowCount-1)
	End If
End If
End Sub

Sub Menu2_Click
	Table1.Clear
	Table1.LoadXML("default.xml")
	App_Start
End Sub

Sub btnNow_Click
Menu2_Click
End Sub

Proxy Machine

piotrgiedziun — Mon, 24 Aug 2009 18:36:42 +0000

Proxy Machine is smart, lite and portable application. Using this app you can generate artificial traffic. It’s rally good machine for all gamers who play via www games. For example you’re bitefight player and you earn money (of course in game ) because sb opens your link, also you can use it to many different things. So if you want generate traffic you have to download this app. Next click at “GET PROXY” button (you can use three different proxy servers with many pages) and after “Let’s ROCK!”. Proxy Machine doing all automatically.

Download:
Proxy Machine (rar)

Molehill Empire / Zielone Imperium BOT

piotrgiedziun — Tue, 11 Aug 2009 18:25:50 +0000

RockYou Pets – automatic driver

piotrgiedziun — Mon, 10 Aug 2009 15:51:02 +0000

RockYou Pets’s very popular game on facebook.com. Now you can earning money easier, run application and watch how your pet will earn money and exp. If you want build this app you need delphi 7 or older.

Pobierz z www.giedek-blog.teampm.net
Source and build application
276 KB

MP3 Finder 1.5

piotrgiedziun — Tue, 04 Aug 2009 15:50:04 +0000

Szukasz ulubionej muzyki? Lepiej trafić nie mogłeś!

Dzięki aplikacji MP3 Finder będziesz mógł szybko wyszukać interesujący Cię utwór muzyczny, odsłuchać go za pomocą wbudowanego odtwarzacza, a następnie pobrać w formacie mp3. To takie proste – wystarczy kilka kliknięć!
Zmiany w programie:

nowa szata graficzna programu,
okno dopasowuje się do rozdzielczości ekranu, co pozwala używać programu przez użytkowników z niestandardowymi rozdzielczościami ekranu,
usługa “TOP10 MP3 Finder” zintegrowana w karcie głównej programu pozwala jeszcze szybciej słuchać aktualnie najpopularniejszą muzykę,
pełna integracja TAG EDYTORA, tagi wprowadzone w programie są zgodne ze standardem tagowania plików mp3,
możliwość pobrania utworów “TOP10 MP3 Finder” jako playlista,
większy wybór skinów dostępny na stronie programu,
dwujęzyczna strona oraz forum,
rozbudowana pomoc techniczna.

Pobierz z FTP
Windows XP/Vista/7
2.00 MB

Simple CMS – php portal

piotrgiedziun — Fri, 24 Jul 2009 09:52:37 +0000

Simple CMS – php portal to prosty cms napisany w php oraz mysql. Do jego prawidłowego działania wymagane jest php w werji 5.x oraz mysql. System został napisany na potrzeby pewnego projektu, jego jądro zostało trochę rozbudowane. Wydaje mi się, że napisałem go wmiare czytęlnię i jego przekształacanie, rozkładanie i rozbudowywanie sprawi Wam samą przyjemność.

Konfiguracja
1) uzupełnij dane w pliku include/config.php

DB_HOST = "localhost" //adres host
DB_USER = "username" //nazwa użytkownika bazy
DB_PASS = "password" //hasło do bazy
DB_NAME = "dbname" //nazwa bazy
PAGE_DIR = "http://adresstrony.pl/" //dokładny adres strony

uzupełnienie tych danych jest niezbędne do funkcjonowania systemu.

2) Import bazy danych z pliku sql.sql z głównego katalogu
3) Wgraj zawartość głównego katalogu na serwer
4) Standardowe konto administracyjne (login: admin, hasło:admin) powinno zostać zedytowane, tak aby hasło było inne niż standardowe.
(zapis hasła w md5)

Przykładowe zastosowania

Download:
Archiwum WinRAR, 624 KB

OTS Restarter

piotrgiedziun — Fri, 24 Jul 2009 09:02:24 +0000

OTS Restarter to program do restartowania serwera OTS. Źródło w paczce.

Download:
OTS Restarter (Open Source)

Przykładowy skrypt

close|ServerWindowName
sleep|40
getip
setip|c:\ots\config.lua
open|c:\ots\server.exe

Funkcje:

sleep - czeka podaną liczbę sekund
(np. sleep|10),
mouseset - ustawia kursor na podane współrzędne o zapisnie x,y
(np. mouseset|100,90),
mouseclick - kliknięcie myszki, bez parametru,
terminate - zabija proces o nazwie podanej w parametrze
(np. terminate|explorer),
close - zamyka aplikacje o podanym w parametrze uchwycie (nazwa okna)
(np. close|Bez tytułu - Notatnik),
open - otwiera ścieżkę podaną w parametrze
(np. open|c:\windows\system32\calc.exe),
getip - pobiera aktualny zewnętrzny adres ip, bez parametru,
setip - ustawia pobrane ip w pliku config.lua, parametr to ścieżka do pliku config.lua
(np. setip|c:\ots\config.lua)

LastFm Launcher 1.0

piotrgiedziun — Fri, 19 Jun 2009 16:04:52 +0000

LastFM Launcher
Program pozwalający słuchać LastFM za darmo! Dzięki prostej obsłudze każdy łatwo i przyjemnie może skonfigurować proxy swojego odtwarzacza. Aplikacja posiada wbudowaną, na bieżąco uzupełnianą bazę sprawdzonych proxy, synchronizacia odbywa się przy uruchomieniu programu. Każdy użytkownik może podzielić się swoją opinią odnośnie jakości transferu używanego proxy dzięki możliwości oceniania oraz zaproponować nowy adres w zakładce Add proxy. Każdy indywidualnie może przechowywać w aplikacji własne adresy, konfigurowane w zakładce Add proxy. Status adresów sprawdzany jest przy każdym uruchomieniu programu. Miłego użytkowania!
Download: LastFM Launher

MP3 Finder 1.4

piotrgiedziun — Wed, 15 Apr 2009 18:09:50 +0000

W nowej wersji dodatkowo:

obsługa serwisu tagoo.ru – serwis jest wielką bazą indeksującą pliki z innych serwisów, do jego zalet należy bardzo duża baza utworów (niestety mało polskich), pobierane utwory automatycznie są tagowane!, przy nazwie utworu znajduje się jego jakość z zakresu od 128 Kbitów/sek do 320 Kb/s (najwyższa jakość mp3).
tagi – popularne frazy wyszukiwane w porgramie
nowy system tagów (sortowanie, ocenianie, itp)
możliwość wyłączenia potwierdzenia zamykania okien (inicjatywa użytkownika)

Download for free
Windows Vista/XP
1.42 MB

Oficjalna strona programu:
http://mp3finder.n48.eu/index.html
Lista dostępnych skinów:
http://mp3finder.n48.eu/skin-mp3-finder/

mTesty – mobilna wersja programu Prawo jazdy B – Testy

piotrgiedziun — Sat, 11 Apr 2009 15:38:41 +0000

mTesty - mobilna wersja napisana została w javie (dokładniej J2ME). Wersja dostosowana jest do urządzeń moblinych (telefony, pocket pc itp.) o wyświetlaczu 240 x 320. Niezbędna do działania jest obsługa javy przez urządzenie, na którym chcemy uruchomić aplikację.
Testowany na HTC TyTn II oraz Nokia N95. Aplikacja standardowo udostępniona jest na licencji opensource. Materiał merytoryczny dotyczy części teoretycznej testu na prawo jazdy, kategoria B.

Download:
mTesty (jar)
mTesty (jad)

Screeny: