RootSeeker
24th October 2012, 01:18 PM
ini gan salah satu program yang gw buat sendiri!!!, udah lama banget buatnya sih..gunanya program ini buat nyari solusi di puzzle sudoku.
nyari solusinya itu pake 2 algoritma, backtrack dan dancing link x (dlx)
dulu pas ICT itu pernah ada yang menang di kategori student project, buatan reden tanago, gw buatnya jauh sebelum lomba ICT itu, hehehe.. kalau gak percaya silakan cari papernya di kampus gw, pasti bakalan ketemu tuh taun pembuatannya
keunggulan:
- bisa solving sampai level hard sekalipun dalam hitungan milisecond
- bisa menemukan solusi sampai tidak terhingga, kadang2 soal sudoku tidak hanya menghasilkan 1 solusi saja tetapi banyak solusi
- selain puzzlenya diinput sendiri, puzzlenya juga bisa diinput pake file *.ss, untuk edit dan membuka file *.ss nya bisa pake notepad
- bisa buat ngecheat kuis sudoku di intisari sama sudoku yang di ekstensi google wave, hehehe
[/spoiler] for skrinsut:
http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/11.png
http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/22.png
http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/33.png
DOWNLOAD DISINI!!! (http://www.zid*du.com/download/7938492/programsudokusolver.rar.html)
for technical only:
- gw bikin program ini buat kuliah desain analisis algoritma
- inti dari program ini adalah ngebandingin 2 algoritma AI (backtrack dan dancing link x) untuk nyelesein puzzle sudoku
- parameter yang diliat itu kecepatan mendapatkan hasil dan resource memory yang digunakan masing2 algoritma
- gw bikin sendiri alur algoritma backtracknya, soalnya di internet belum ada, walaupun banyak algoritma backtrack di internet, tapi backtrack spesifik untuk solving sudoku belum pernah ada
- untuk alur algoritma dancing link x nya waktu itu udah ada yang buat di matlab, gw bikin ulang ke delphi
- overall algoritma dancing link x lebih cepat, tapi makan banyak memory dibanding algoritma backtrack
for pusing 1, pseudocode backtrack:
- algoritma backtrack pasti udah pada kenal, ga usah gw ceritain ya, hehehe
Code:
indexrow := 1
while (indexrow > 0) do
indexcol := firstcol[indexrow]
while (indexcol[indexrow] endcol[indexrow]) and not (validvalue()) do
indexcol[indexrow] := nextcol[indexrow]
endwhile
if (indexcol[indexrow] endcol[indexrow]) then
putvalueinmatrix()
if indexrow = endrow then
onesolutionfound()
else
indexrow:= nextrow
indexcol[indexrow]:=firstrow[indexrow]
else
deletevaluefrommatrix()
indexrow := previousrow
endwhile
for [I]pusing 2, pseudocode dancing link x:
- sedangkan algoritma dancing link x itu adalah algoritma buatan knuth (pasti juga udah pada kenal, orang legendaris di dunia komputer), memakai konsep double linked list yang di buat ke matrik
- untuk lebih detailnya download aja paper ini (http://www-cs-faculty.stanford.edu/~knuth/papers/dancing-color.ps.gz) ato di wiki (http://en.wikipedia.org/wiki/Dancing_Links)
Code:
count clues
i:=clues
state := 2;
repeat
case state of
2: //goto next level
i++;
if empty column is found then state:=4
else
//fungsi next level
state:=3
3: //walk through
fill the match colum and row in board
if i = N4 then solution found, add board to new solution
4://back track or goto previous level
i--;
//fungsi backtrak
until i = clues
for source, free gratis diunduh:
bagi yang ingin ngembangin, gw kasih sourcenya nih, gratis!!!
DOWNLOAD DISINI!!! (http://www.zid*du.com/download/7938493/sourcesudokusolver.rar.html)
bagi yang suka ama thread gw:
kasih rate bintang 5 http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/rating.pnghttp://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/rating.pnghttp://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/rating.png
dikomen :sundul::sundul::sundul:
dimelon :melonndan::melonndan::melonndan:
ok gan? hehehe
:ceriwislove::ceriwislove::ceriwislove:
[spoiler=open this] for thread gw lainnya:
WALLPAPER ELEGAN KASKUS, KEREN!! silakan unduh dan dicoba!!! (http://www.ceriwis.us/showthread.php?t=2939452)
[PIC] KEREN!! 9 pedang Nabi Muhammad SAW beserta nama-namanya!! (http://www.ceriwis.us/showthread.php?t=2306992)
[AJAIB+PIC] Ada seorang anak lahir bln mei, meninggal bln februari TAHUN YANG SAMA!! (http://www.ceriwis.us/showthread.php?t=2807353)
</div>
nyari solusinya itu pake 2 algoritma, backtrack dan dancing link x (dlx)
dulu pas ICT itu pernah ada yang menang di kategori student project, buatan reden tanago, gw buatnya jauh sebelum lomba ICT itu, hehehe.. kalau gak percaya silakan cari papernya di kampus gw, pasti bakalan ketemu tuh taun pembuatannya
keunggulan:
- bisa solving sampai level hard sekalipun dalam hitungan milisecond
- bisa menemukan solusi sampai tidak terhingga, kadang2 soal sudoku tidak hanya menghasilkan 1 solusi saja tetapi banyak solusi
- selain puzzlenya diinput sendiri, puzzlenya juga bisa diinput pake file *.ss, untuk edit dan membuka file *.ss nya bisa pake notepad
- bisa buat ngecheat kuis sudoku di intisari sama sudoku yang di ekstensi google wave, hehehe
[/spoiler] for skrinsut:
http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/11.png
http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/22.png
http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/33.png
DOWNLOAD DISINI!!! (http://www.zid*du.com/download/7938492/programsudokusolver.rar.html)
for technical only:
- gw bikin program ini buat kuliah desain analisis algoritma
- inti dari program ini adalah ngebandingin 2 algoritma AI (backtrack dan dancing link x) untuk nyelesein puzzle sudoku
- parameter yang diliat itu kecepatan mendapatkan hasil dan resource memory yang digunakan masing2 algoritma
- gw bikin sendiri alur algoritma backtracknya, soalnya di internet belum ada, walaupun banyak algoritma backtrack di internet, tapi backtrack spesifik untuk solving sudoku belum pernah ada
- untuk alur algoritma dancing link x nya waktu itu udah ada yang buat di matlab, gw bikin ulang ke delphi
- overall algoritma dancing link x lebih cepat, tapi makan banyak memory dibanding algoritma backtrack
for pusing 1, pseudocode backtrack:
- algoritma backtrack pasti udah pada kenal, ga usah gw ceritain ya, hehehe
Code:
indexrow := 1
while (indexrow > 0) do
indexcol := firstcol[indexrow]
while (indexcol[indexrow] endcol[indexrow]) and not (validvalue()) do
indexcol[indexrow] := nextcol[indexrow]
endwhile
if (indexcol[indexrow] endcol[indexrow]) then
putvalueinmatrix()
if indexrow = endrow then
onesolutionfound()
else
indexrow:= nextrow
indexcol[indexrow]:=firstrow[indexrow]
else
deletevaluefrommatrix()
indexrow := previousrow
endwhile
for [I]pusing 2, pseudocode dancing link x:
- sedangkan algoritma dancing link x itu adalah algoritma buatan knuth (pasti juga udah pada kenal, orang legendaris di dunia komputer), memakai konsep double linked list yang di buat ke matrik
- untuk lebih detailnya download aja paper ini (http://www-cs-faculty.stanford.edu/~knuth/papers/dancing-color.ps.gz) ato di wiki (http://en.wikipedia.org/wiki/Dancing_Links)
Code:
count clues
i:=clues
state := 2;
repeat
case state of
2: //goto next level
i++;
if empty column is found then state:=4
else
//fungsi next level
state:=3
3: //walk through
fill the match colum and row in board
if i = N4 then solution found, add board to new solution
4://back track or goto previous level
i--;
//fungsi backtrak
until i = clues
for source, free gratis diunduh:
bagi yang ingin ngembangin, gw kasih sourcenya nih, gratis!!!
DOWNLOAD DISINI!!! (http://www.zid*du.com/download/7938493/sourcesudokusolver.rar.html)
bagi yang suka ama thread gw:
kasih rate bintang 5 http://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/rating.pnghttp://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/rating.pnghttp://i279.photobucket.com/albums/kk129/kura2lincah/ngejunk/rating.png
dikomen :sundul::sundul::sundul:
dimelon :melonndan::melonndan::melonndan:
ok gan? hehehe
:ceriwislove::ceriwislove::ceriwislove:
[spoiler=open this] for thread gw lainnya:
WALLPAPER ELEGAN KASKUS, KEREN!! silakan unduh dan dicoba!!! (http://www.ceriwis.us/showthread.php?t=2939452)
[PIC] KEREN!! 9 pedang Nabi Muhammad SAW beserta nama-namanya!! (http://www.ceriwis.us/showthread.php?t=2306992)
[AJAIB+PIC] Ada seorang anak lahir bln mei, meninggal bln februari TAHUN YANG SAMA!! (http://www.ceriwis.us/showthread.php?t=2807353)
</div>