KiXgolf 2007: Taunt Generator - Public Round - KiXtart.org

You are not logged in. [Log In] KiXtart.org website » Forums » KiXtart » Lounge » KiXgolf 2007: Taunt Generator - Public Round

Page 1 of 8

Last »

Topic Options

#183816 - 2007-12-18 05:57 AM KiXgolf 2007: Taunt Generator - Public Round
Sealeopard Sealeopard KiX Master Registered: 2001-04-25 Posts: 11164 Loc: Boston, MA, USA	The public round is now open. May the taunting continue... I've incorporated RemcovC's test case bugs into the latest package. This is the package I'll use for score validation. It's available at http://s91376351.onlinehome.us/kixtart/kixgolf_tg.zip Edited by Sealeopard (2007-12-18 06:01 AM) _________________________ There are two types of vessels, submarines and targets.
Top

#183817 - 2007-12-18 06:35 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Sealeopard]

Jochen Offline

KiX Supporter

Registered: 2000-03-17
Posts: 6380
Loc: Stuttgart, Germany

Allright, let me be the first to post code, before I hit the shower and go to work,
for all the grail seekers and cage rattlers to abuse, improve or else



; begin Taunt Generator
;!
function a($)
    dim $_,$c,$d,$e,$f,$g,$h,$j,$k,$l,$n,$q,$r,$t,$z
    $t='Taunter: '
    $e=Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit
    $c=was,personified
    $f=conspicuously,categorically,positively,cruelly,incontrovertibly
    $g=mother,father,grandmother,grandfather,godfather
    for each $n in $
        for $=0 to 36
            $n=join(split($n,'  '))
        next
        $_=$_+'#Knight: '+$n+#
        $=trim($n)
        for $j=33 to 64
            $=join(split(join(split($,' '+chr($j)),''),chr($j)),'')
        next
        $j=ubound(split($))/3+1
        for $d=1 to 12
            $h=instr($,substr('theholygrail',$d,1))
            $=right($,-$h)
        next
        if $h
            $_=$_+$t+'(A childish hand gesture).#'
            $j=$j-1
        endif
        while $j>0
            $=$r mod 3=1
            $j=$j-1-$
            $_=$_+$t+iif($,$e[$q mod 11]+'! ','')+
               'Your '+iif($,split('steed king first-born')[$l mod 3]+split(' is# masquerades as',#)[$l mod 2],
               $g[$k mod 5]+' '+$c[$k mod 2])+' a '+iif($,iif($l mod 2,$f[$z mod 5]+' ','')
               +split('silly wicked sordid naughty repulsive malodorous ill-tempered')[$l mod 7]+' ','')
               +lcase($e[($q+$) mod 11])+'.#'
            $k=($=)+$k
            $z=$*$l mod 2+$z
            $l=$+$l
            $r=1+$r
            $q=1+$+$q
            $a=split(right($_,~),#)
endfunction
;!
;!
; end Taunt Generator



Your solution passed all tests

KiXtart
KiXtart Version  = 4.53
KiXGolf Script   = kixgolf_tg.kix

Computer
OS               = Windows XP Professional
CPU              = Intel Pentium Model 15
Speed            = 2399 MHz
Memory           = 2048 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = Taunt Generator
Processing Start = 2007/12/18 06:35:35.578
Processing End   = 2007/12/18 06:35:35.625
Duration         = 0000/00/00 00:00:00.046
KiXGolf Score    = 997

Thank you for participating in KiXtart Golf!

_________________________

Top

#183818 - 2007-12-18 07:10 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]

DrillSergeant Offline

MM club member

Registered: 2004-07-09
Posts: 1164
Loc: Eijsden, the Netherlands

Here's my 960:


; Begin Taunt Generator
;
;!
Function a($b)

dim $c, $, $t, $s[9], $g, $w, $h

$c= '1{5! 1{1', 'Your 4 7 a 2{Your 3 6 a 2{Your 4 7 a 5', '5{8 5{5{9 8 5', 'steed{king{first-born',
	'mother{father{grandmother{grandfather{godfather', 'Hamster{Coconut{Duck{Herring{Newt{Peril{Chicken{Vole{Parrot{Mouse{Twit',
	'is{masquerades as', 'was{personified', 'silly{wicked{sordid{naughty{repulsive{malodorous{ill-tempered',
	'conspicuously{categorically{positively{cruelly{incontrovertibly'

For each $t in $b

	dim $d
	$g = 'theholygrail'

	while instr($t,'  ')
		$t = join(split($t,'  '))
	Loop

	For each $ in split($t)
		$w=0
		While $
			$w = $w+($>'@')
			$g = substr($g,(left($,1) = left($g,1))+1)
			$  = right($, ~)
		loop
		$d = $d + ($w>)
	Next

	$a = $a + '}Knight: ' + $t + iif($g,},'}Taunter: (A childish hand gesture).}')
	$d = $d - 3*($g=0)

	While $d>0
		$w = 0
		for $ = 0 to 9
			while instr($w, $)
				$d = $d - 3*($=5)
				$g = instr($w, $)
				$t = split($c[$],{)
				$h = $t[$s[$]]
				if $=5 & $g>1 $h=lcase($h) endif
				$w = left($w, $g-1) + $h + right($w, -$g)
				$s[$] = ($s[$]+1) mod (ubound($t)+1)
			Loop
		next
		$a = $a + 'Taunter: ' + $w + '.}'
	loop
Next
$a = split(right($a,~),})

EndFunction
;!
;!
; End Taunt Generator




Your solution passed all tests

KiXtart
KiXtart Version  = 4.60
KiXGolf Script   = kixgolf_tg.KIX

Computer
OS               = Windows Vista Business Edition
CPU              = Intel Pentium Model 15
Speed            = 2194 MHz
Memory           = 2038 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = Taunt Generator
Processing Start = 2007/12/18 07:09:41.680
Processing End   = 2007/12/18 07:09:42.285
Duration         = 0000/00/00 00:00:00.604
KiXGolf Score    = 960
 
Thank you for participating in KiXtart Golf!

_________________________
The Code is out there

Top

#183819 - 2007-12-18 08:03 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: DrillSergeant]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	WTF? My brain hurts edit: seems that my approach is pretty traditional in opposite to yours Edited by Jochen (2007-12-18 08:05 AM) _________________________
Top

#183820 - 2007-12-18 08:10 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]

Jochen Offline

KiX Supporter

Registered: 2000-03-17
Posts: 6380
Loc: Stuttgart, Germany

Nevertheless:



Your solution passed all tests

KiXtart
KiXtart Version  = 4.53
KiXGolf Script   = kixgolf_tg.kix

Computer
OS               = Windows 2000 Professional
CPU              =               Intel(R) Pentium(R) 4 CPU 2.80GHz
Speed            = 2793 MHz
Memory           = 504 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = Taunt Generator
Processing Start = 2007/12/18 08:09:01.171
Processing End   = 2007/12/18 08:09:01.203
Duration         = 0000/00/00 00:00:00.032
KiXGolf Score    = 956

Thank you for participating in KiXtart Golf!


Function a($)

dim $c, $t, $s[9], $g, $w, $h

$c= '1{5! 1{1', 'Your 4 7 a 2{Your 3 6 a 2{Your 4 7 a 5', '5{8 5{5{9 8 5', 'steed{king{first-born',
	'mother{father{grandmother{grandfather{godfather', 'Hamster{Coconut{Duck{Herring{Newt{Peril{Chicken{Vole{Parrot{Mouse{Twit',
	'is{masquerades as', 'was{personified', 'silly{wicked{sordid{naughty{repulsive{malodorous{ill-tempered',
	'conspicuously{categorically{positively{cruelly{incontrovertibly'

For each $t in $

	dim $d
	$g = 'theholygrail'

	while instr($t,'  ')
		$t = join(split($t,'  '))
	Loop

	For each $ in split($t)
		$w=0
		While $
			$w = $w+($>'@')
			$g = substr($g,(left($,1) = left($g,1))+1)
			$  = right($, ~)
		loop
		$d = $d + ($w>)
	Next

	$a = $a + '}Knight: ' + $t + iif($g,},'}Taunter: (A childish hand gesture).}')
	$d = $d - 3*($g=0)

	While $d>0
		$w = 0
		for $ = 0 to 9
			while instr($w, $)
				$d = $d - 3*($=5)
				$g = instr($w, $)
				$t = split($c[$],{)
				$h = $t[$s[$]]
				if $=5 & $g>1 $h=lcase($h) endif
				$w = left($w, $g-1) + $h + right($w, -$g)
				$s[$] = ($s[$]+1) mod (ubound($t)+1)
			Loop
		next
		$a = $a + 'Taunter: ' + $w + '.}'
	loop
Next
$a = split(right($a,~),})

EndFunction

_________________________

Top

#183821 - 2007-12-18 08:21 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	Vista is a pig compared to W2K ... look at the runtimes and the Processors used _________________________
Top

#183822 - 2007-12-18 08:37 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]

Jochen Offline

KiX Supporter

Registered: 2000-03-17
Posts: 6380
Loc: Stuttgart, Germany

borrowing from mine adding to yours ...


Function a($)

dim $c, $t, $s[9], $g, $w, $h

$c= '1{5! 1{1', 'Your 4 7 a 2{Your 3 6 a 2{Your 4 7 a 5', '5{8 5{5{9 8 5', 'steed{king{first-born',
	'mother{father{grandmother{grandfather{godfather', 'Hamster{Coconut{Duck{Herring{Newt{Peril{Chicken{Vole{Parrot{Mouse{Twit',
	'is{masquerades as', 'was{personified', 'silly{wicked{sordid{naughty{repulsive{malodorous{ill-tempered',
	'conspicuously{categorically{positively{cruelly{incontrovertibly'

For each $t in $

	dim $d
	$g = 'theholygrail'

	for $ = 0 to 36
		$t = join(split($t,'  '))
	next

	For each $ in split($t)
		$w=0
		While $
			$w = $w+($>'@')
			$g = substr($g,(left($,1) = left($g,1))+1)
			$  = right($, ~)
		loop
		$d = $d + ($w>)
	Next

	$a = $a + '}Knight: ' + $t + iif($g,},'}Taunter: (A childish hand gesture).}')
	$d = $d - 3*($g=0)

	While $d>0
		$w = 0
		for $ = 0 to 9
			while instr($w, $)
				$d = $d - 3*($=5)
				$g = instr($w, $)
				$t = split($c[$],{)
				$h = $t[$s[$]]
				if $=5 & $g>1 $h=lcase($h) endif
				$w = left($w, $g-1) + $h + right($w, -$g)
				$s[$] = ($s[$]+1) mod (ubound($t)+1)
			Loop
		next
		$a = $a + 'Taunter: ' + $w + '.}'
	loop
Next
$a = split(right($a,~),})

EndFunction



Your solution passed all tests

KiXtart
KiXtart Version  = 4.53
KiXGolf Script   = kixgolf_tg.kix

Computer
OS               = Windows 2000 Professional
CPU              =               Intel(R) Pentium(R) 4 CPU 2.80GHz
Speed            = 2793 MHz
Memory           = 504 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = Taunt Generator
Processing Start = 2007/12/18 08:35:43.656
Processing End   = 2007/12/18 08:35:43.718
Duration         = 0000/00/00 00:00:00.062
KiXGolf Score    = 947

Thank you for participating in KiXtart Golf!

_________________________

Top

#183823 - 2007-12-18 08:39 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	the $=0 to 36 part is explained by the maximum length of input of 72 characters ... therfore it will pass all future cases that follow the rules $;\)$ _________________________
Top

#183824 - 2007-12-18 09:01 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	Pffft... I tried to introduce my grail finder, but the part between while $d>0 and loop is so weird and dependant on your grail finder that I had to give up _________________________
Top

#183825 - 2007-12-18 09:18 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]

DrillSergeant Offline

MM club member

Registered: 2004-07-09
Posts: 1164
Loc: Eijsden, the Netherlands

Here's the explanation of that loop:


While $d>0
	; make taunt while there are words left

	; every taunt starts with a '0' which is replaced by the C$[0]
	$w = 0

	; walk through all the elements of array C$
	for $ = 0 to 9

		; I need to incorporate a while because for $=5 there are two occurances (explained later)
		while instr($w, $)

			; take three words of the total count for every occurence of a noun
			$d = $d - 3*($=5)
			
			; find the number of the element of C$ in the string
			$g = instr($w, $)
			
			; split the element of C$ to singular words
			$t = split($c[$],{)

			; take the specific word from the C$-line array based on the counter in $S
			; ($S has the same dimension as $c and contains the counter for each element of $C)
			$h = $t[$s[$]]
			
			; lowercase the noun if it's not at the beginning of the sentence
			if $=5 & $g>1 $h=lcase($h) endif
			
			; combine the sentence. I can't do this with a join(split()) because the counter
			; has to be updated after every occurence and there can be a double occurence of the noun. 
			$w = left($w, $g-1) + $h + right($w, -$g)

			; add one to the counter
			$s[$] = ($s[$]+1) mod (ubound($t)+1)
		Loop
	next
	
	; Add the taunt to the result.
	$a = $a + 'Taunter: ' + $w + '.}'
loop

Does it make sense?

_________________________
The Code is out there

Top

#183826 - 2007-12-18 09:20 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: DrillSergeant]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	It makes perfect sense! Why can't I come up with something like this on my own $\:\($ Edited by Jochen (2007-12-18 09:22 AM) _________________________
Top

#183827 - 2007-12-18 09:22 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: DrillSergeant]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	I have a bit fear of Remcos code as it might blow a fuse in my poor brain _________________________
Top

#183828 - 2007-12-18 10:53 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]
DrillSergeant DrillSergeant MM club member Registered: 2004-07-09 Posts: 1164 Loc: Eijsden, the Netherlands	I just got a message from Remco. He's been sent to a customer to fix a broken server, and he won't have time to post his code before 18.00 (amsterdam time, 9 hours after time of this post) _________________________ The Code is out there
Top

#183830 - 2007-12-18 11:00 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: DrillSergeant]

Jochen Offline

KiX Supporter

Registered: 2000-03-17
Posts: 6380
Loc: Stuttgart, Germany

My fuses are safe for another 9 hours then...



Function a($)

dim $c, $t, $s[9], $g, $w, $h

$c= '1{5! 1{1', 'Your 4 7 a 2{Your 3 6 a 2{Your 4 7 a 5',
    '5{8 5{5{9 8 5', 'steed{king{first-born',
	'mother{father{grandmother{grandfather{godfather',
	'Hamster{Coconut{Duck{Herring{Newt{Peril{Chicken{Vole{Parrot{Mouse{Twit',
	'is{masquerades as', 'was{personified',
	'silly{wicked{sordid{naughty{repulsive{malodorous{ill-tempered',
	'conspicuously{categorically{positively{cruelly{incontrovertibly'

For each $t in $

	dim $d
	$g = 'theholygrail'

	for $ = 0 to 36
		$t = join(split($t,'  '))
	next

	For each $ in split($t)
		$w=0
		While $
			$w = $w+($>'@')
			$g = substr($g,(left($,1) = left($g,1))+1)
			$  = right($, ~)
		loop
		$d = $d + ($w>)
	Next

	$a = $a + '}Knight: ' + $t + iif($g,},'}Taunter: (A childish hand gesture).}')
	$d = $d - 3*($g=)

	While $d>0
		$w = 0
		for $ = 0 to 9
			while instr($w, $)
				$d = $d - 3*($=5)
				$g = instr($w, $)
				$t = split($c[$],{)
				$h = $t[$s[$]]
				if $=5 & $g>1 $h=lcase($h) endif
				$w = left($w, $g-1) + $h + right($w, -$g)
				$s[$] = ($s[$]+1) mod (ubound($t)+1)
			Loop
		next
		$a = $a + 'Taunter: ' + $w + '.}'
	loop
Next
$a = split(right($a,~),})

EndFunction



Your solution passed all tests

KiXtart
KiXtart Version  = 4.53
KiXGolf Script   = kixgolf_tg.kix

Computer
OS               = Windows 2000 Professional
CPU              =               Intel(R) Pentium(R) 4 CPU 2.80GHz
Speed            = 2793 MHz
Memory           = 504 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = Taunt Generator
Processing Start = 2007/12/18 10:56:28.000
Processing End   = 2007/12/18 10:56:28.062
Duration         = 0000/00/00 00:00:00.061
KiXGolf Score    = 946

Thank you for participating in KiXtart Golf!

_________________________

Top

#183832 - 2007-12-18 11:17 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]

DrillSergeant Offline

MM club member

Registered: 2004-07-09
Posts: 1164
Loc: Eijsden, the Netherlands

On the phone he told me one of his dirty tricks:

Change:


$c= '1{5! 1{1', 'Your 4 7 a 2{Your 3 6 a 2{Your 4 7 a 5',
    '5{8 5{5{9 8 5', 'steed{king{first-born',
	'mother{father{grandmother{grandfather{godfather',
	'Hamster{Coconut{Duck{Herring{Newt{Peril{Chicken{Vole{Parrot{Mouse{Twit',
	'is{masquerades as', 'was{personified',
	'silly{wicked{sordid{naughty{repulsive{malodorous{ill-tempered',
	'conspicuously{categorically{positively{cruelly{incontrovertibly'

To:


$c= '1{5! 1{1', 'Your 4ther 7 a 2{Your 3 6 a 2{Your 4ther 7 a 5',
    '5{8 5{5{9ly 8 5', 'steed{king{first-born',
	'mo{fa{grandmo{grandfa{godfa',
	'Hamster{Coconut{Duck{Herring{Newt{Peril{Chicken{Vole{Parrot{Mouse{Twit',
	'is{masquerades as', 'was{personified',
	'silly{wicked{sordid{naughty{repulsive{malodorous{ill-tempered',
	'conspicuous{categorical{positive{cruel{incontrovertib'

I'm not officially posting it because I didn't come up with it, but you can see he really has the mind of a madman $;\)$

_________________________
The Code is out there

Top

#183833 - 2007-12-18 11:32 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: DrillSergeant]
Björn Björn Korg Regular Registered: 2005-12-07 Posts: 953 Loc: Stockholm, Sweden.	Wowser, that is dirty - but clever. _________________________ as long as it works - why fix it? If it doesn't work - kix-it!
Top

#183834 - 2007-12-18 11:32 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: DrillSergeant]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	LOL! I saw the similarity in the endings in the make, but lost sight shortly after as for the pesky grail quest $\:\)$ _________________________
Top

#183835 - 2007-12-18 11:33 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Björn]
Lonkero Lonkero KiX Master Guru Registered: 2001-06-05 Posts: 22346 Loc: OK	DAMN! took me 1 minute to see that but an hour to post damn damn damn, would have had lead with that sneaky stroke. _________________________ ! download KiXnet
Top

#183836 - 2007-12-18 11:39 AM

Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]

Jochen Offline

KiX Supporter

Registered: 2000-03-17
Posts: 6380
Loc: Stuttgart, Germany

If only I thought of that again, my private code should have been this:



function a($)
    dim $_,$c,$d,$e,$f,$g,$h,$j,$k,$l,$n,$q,$r,$t,$z
    $t='Taunter: '
    $e=Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit
    $c=was,personified
    $f=conspicuously,categorically,positively,cruelly,incontrovertibly
    $g=mo,fa,grandmo,grandfa,godfa
    for each $n in $
        for $=0 to 36
            $n=join(split($n,'  '))
        next
        $_=$_+'#Knight: '+$n+#
        $=trim($n)
        for $j=33 to 64
            $=join(split(join(split($,' '+chr($j)),''),chr($j)),'')
        next
        $j=ubound(split($))/3+1
        for $d=1 to 12
            $h=instr($,substr('theholygrail',$d,1))
            $=right($,-$h)
        next
        if $h
            $_=$_+$t+'(A childish hand gesture).#'
            $j=$j-1
        endif
        while $j>0
            $=$r mod 3=1
            $j=$j-1-$
            $_=$_+$t+iif($,$e[$q mod 11]+'! ','')+
               'Your '+iif($,split('steed king first-born')[$l mod 3]+split(' is# masquerades as',#)[$l mod 2],
               $g[$k mod 5]+'ther '+$c[$k mod 2])+' a '+iif($,iif($l mod 2,$f[$z mod 5]+' ','')
               +split('silly wicked sordid naughty repulsive malodorous ill-tempered')[$l mod 7]+' ','')
               +lcase($e[($q+$) mod 11])+'.#'
            $k=($=)+$k
            $z=$*$l mod 2+$z
            $l=$+$l
            $r=1+$r
            $q=1+$+$q
            $a=split(right($_,~),#)
endfunction



Your solution passed all tests

KiXtart
KiXtart Version  = 4.53
KiXGolf Script   = kixgolf_tg.kix

Computer
OS               = Windows 2000 Professional
CPU              =               Intel(R) Pentium(R) 4 CPU 2.80GHz
Speed            = 2793 MHz
Memory           = 504 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.3

KiXtart Golf Score
Tournament       = Taunt Generator
Processing Start = 2007/12/18 11:36:24.937
Processing End   = 2007/12/18 11:36:25.000
Duration         = 0000/00/00 00:00:00.063
KiXGolf Score    = 981

Thank you for participating in KiXtart Golf!

Still this would have changed nothing in the standings...

_________________________

Top

#183837 - 2007-12-18 11:44 AM Re: KiXgolf 2007: Taunt Generator - Public Round [Re: Jochen]
Jochen Jochen KiX Supporter Registered: 2000-03-17 Posts: 6380 Loc: Stuttgart, Germany	Guys, how should we handle that case ?? Shouldn't we wait for Remco to introduce this trick into Rogiers code and let him post the 934 score? After he posted, it would be free to mangle again ... Agreed? _________________________
Top

Page 1 of 8

Last »

Previous Topic View All Topics

Index Next Topic

Moderator: Arend_, Allen, Jochen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Mart

Hop to:

Shout Box

Search the board with:
superb Board Search
or try with google:

	Web kixtart.org