|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Here's my 960:
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
WTF? My brain hurts edit: seems that my approach is pretty traditional in opposite to yours |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Vista is a pig compared to W2K ... look at the runtimes and the Processors used |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Here's the explanation of that loop:
Does it make sense? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
It makes perfect sense! Why can't I come up with something like this on my own |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I have a bit fear of Remcos code as it might blow a fuse in my poor brain |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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) |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
On the phone he told me one of his dirty tricks: Change:
To:
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 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Wowser, that is dirty - but clever. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
LOL! I saw the similarity in the endings in the make, but lost sight shortly after as for the pesky grail quest |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
DAMN! took me 1 minute to see that but an hour to post damn damn damn, would have had lead with that sneaky stroke. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I realize now that I shouldn't have posted it I say: Jooel can make an official post with that trick incorporated and we go from there? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Oh well, you're right. It might cost me the 2nd place in tournament, but who cares anyway! Go ahead dude, take the lead! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Well, if it's reason for disqualification for me, you're back in the #2 spot, Jochen |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
lol. Mate, I would never demand that! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
So, what If I optimized your code a bit beyond Remcos trick... I can't wait to post that new score, but on the other side Jooel would take advantage If I post it without Remcos trick. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
jochen, doesn't matter, I will always win anyhow, I didn't have the remco trick... I was talking about that silly (=0) stroke. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Dang! What now ? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Jochen, can you incorporate the C$ trick in your score? It wasn't the solution that Jooel talked about so it can be attributed to Remco. But since you're below that again too, it's not important any more... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Ah crap, if you win anyways and I shall not hold back score posts: function a($) dim $!, $c, $t, $s[9], $g, $w, $h $c= '1{5! 1{1', 'Your 4ther 7 a 2{Your 3 6 a 2{Your 4ther 7 a 5', '5{8 5{5{9 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', '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 $! = $! + '}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 $! = $! + 'Taunter: ' + $w + '.}' $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 13:36:45.546 Processing End = 2007/12/18 13:36:45.609 Duration = 0000/00/00 00:00:00.062 KiXGolf Score = 929 Thank you for participating in KiXtart Golf!I don't like closing keywords anyway! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
This was a wrong post, so I deleted the content. It's also my 1000th post so it's too bad I didn't use it for something more spectacular |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
:p function a($) dim $!, $c, $t, $s[9], $g, $w, $h $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' 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 $! = $! + '}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 $! = $! + 'Taunter: ' + $w + '.}' $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 13:49:31.531 Processing End = 2007/12/18 13:49:31.593 Duration = 0000/00/00 00:00:00.061 KiXGolf Score = 921 Thank you for participating in KiXtart Golf! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
So from now on, everybody holds their beak about tricks they heard on phone, or on home shopping europe, or from god, mkay? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Jochen So from now on, everybody holds their beak about tricks they heard on phone, or on home shopping europe, or from god, mkay? LOL Yes, mastah! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
You have to join C$ to a single line before testing it, but I didn't want to break the board layout:
Why I didn't come up with this during private round? I guess I was busy staring blindly at other parts.... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
You dirty basta You even made it impossible to copy your code |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I am going to be out of town most of the day so i will check back in later, mine doesn't stand up to your codes but here is my 1054: Code: Function a($) Dim $c,$d,$e,$f,$g,$h,$i,$j,$k,$l,$m $c = 'silly#wicked#sordid#naughty#repulsive#malodorous#ill-tempered' $d = conspicuously#categorically#positively#cruelly#incontrovertibly $e = was#personified $f = 'is#masquerades as' $g = Hamster#Coconut#Duck#Herring#Newt#Peril#Chicken#Vole#Parrot#Mouse#Twit $h = mother#father#grandmother#grandfather#godfather $i = 'steed#king#first-born' $j = theholygrail $k = #s# For Each $ in $ Dim $n,$o,$p For Each $n in Split($) Dim $r For $o = 1 to $n ^ 0 If SubStr($n,$o) > 'A' $r = 1 EndIf Next $p = $p + $r $=Join(Split($,' ')) Next $n = $ Do Dim $r While $n $o = Left($n,1) If SubStr($j,($r^)+1,1) = $o $r = $r + $o EndIf $n = Right($n,~) Loop $ = $+\Taunter:# If $r = $j $ = $+'(A childish hand gesture).' Else If z($k) $ = $+z($g)+!#Your#+z($i)+#+z($f)+#a# If $m $ = $+z($d)+# $d = y($d) EndIf $m = ~ $m $ = $+z($c) $c = y($c) $g = y($g) $i = y($i) $f = y($f) $p = $p - 3 Else $ = $+Your#+z($h)+#+z($e)+#a $h = y($h) $e = y($e) EndIf $ = $+#+LCase(z($g))+'.' $k = y($k) $g = y($g) EndIf $p = $p - 3 Until $p < 1 $l = Join(Split($l+\Knight:#+$+\,#)) ; Next $a=Split(Right($l,~),\) EndFunction Function y($) $y=Right($,($^)-(#+z($)^))+#+z($) EndFunction Function z($) $z=Split($,#)[0] EndFunction Running Test 1...Result... Passed... Done Running Test 2...Result... Passed... Done Running Test 3...Result... Passed... Done Running Test 4...Result... Passed... Done Running Test 5...Result... Passed... Done Your solution passed all tests KiXtart KiXtart Version = 4.53 KiXGolf Script = kixgolf_tg.kix Computer OS = Windows XP Professional CPU = Intel(R) Pentium(R) D CPU 3.20GHz Speed = 3200 MHz Memory = 2048 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 07:20:56.048 Processing End = 2007/12/18 07:20:56.142 Duration = 0000/00/00 00:00:00.094 KiXGolf Score = 1054 Thank you for participating in KiXtart Golf! Press any key to continue... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
How's this for readability? : Code: ; begin Taunt Generator ; ;! function a($) dim $!, $t, $s[9], $g, $w, $h 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 $! = $! + '}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(split('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',})[$],{) $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 $! = $! + 'Taunter: ' + $w + '.}' $a = split(right($!,~),}) endfunction ;! ;! ; end Taunt Generator Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.KIX Computer OS = Windows XP Professional CPU = Intel(R) Pentium(R) 4 CPU 2.40GHz Speed = 2392 MHz Memory = 1016 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 14:24:07.646 Processing End = 2007/12/18 14:24:07.806 Duration = 0000/00/00 00:00:00.159 KiXGolf Score = 904 Thank you for participating in KiXtart Golf! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Here's my take on it. The phone conversation is akin to the IM conversations that happened in the past during public rounds. Thus, the optimization that RemcovC came up with and conveyed to DrillSargent is official as DrillSargent posted it. RemcovC also potentially had the opportunity to send to code to either me or DrillSargent for posting. So, go for it. In the long run it will most likely not even change the final results as the trick would have been posted anyway. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Code: function a($) dim $!, $t, $s[9], $g, $w, $h 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 $! = $! + '}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(split('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',})[$],{) $h = $t[$s[$]] $w = left($w, $g-1) + iif($=5 & $g>1,lcase($h),$h) + right($w, -$g) $s[$] = ($s[$]+1) mod (ubound($t)+1) loop next $! = $! + 'Taunter: ' + $w + '.}' $a = split(right($!,~),}) endfunction
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
It's getting too wide for me here |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
stupid board. nobody has that wide posts but still it makes the windows scroll |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
woah! I was posting and reading in firefox and that looks perfect, but now I'm looking in IE and it looks like [censored] indeed... In firefox, the codeboxes also get a horizontal scrollbar so the overal width of the topic doesn't change, in IE you only get a vertical scrollbar. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Well Jooel, you have that wide line ! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
sorry jochen, not true. it was way wide before I posted. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
My post AND Jooel's post both have that wide line |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Oh yeah? Well, I don't feel sorry to blame any of you splitters |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
what you guys been doing the whole time? Code: function a($) dim $!, $t, $s[9], $g, $w, $h 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 $! = $! + '}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(split('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',})[$],{) $h = $t[$s[$]] $w = left($w, $g-1) + iif($=5 & $g>1,lcase($h),$h) + right($w, -$g) $s[$] = ($s[$]+1) mod (ubound($t)+1) loop next $! = $! + 'Taunter: ' + $w + '.}' $a = split(right($!,~),}) endfunction
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Lonkero what you guys been doing the whole time? Umm, working? edit: OMFG!!! We were blind !!! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I was hitting coconut halves against eachother... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
good horse. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
what's the purpose of $s array? tried to eliminate it and the code failed. I don't see any reason for it though. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
take that back, didn't look deep enough. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Code: function a($) dim $!, $t, $g, $w, $s[9] 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 $! = $! + '}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(split('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',})[$],{) $a = $t[$s[$]] $w = left($w, $g-1) + iif($=5 & $g>1,lcase($a),$a) + right($w, -$g) $s[$] = ($s[$]+1) mod (ubound($t)+1) loop next $! = $! + 'Taunter: ' + $w + '.}' $a = split(right($!,~),}) endfunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Ok let the brainfusing begin: Here my 886 Code: Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.kix Computer OS = Windows Vista Ultimate Edition CPU = Intel Pentium Model 15 Speed = 1662 MHz Memory = 1014 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 18:34:02.046 Processing End = 2007/12/18 18:34:02.374 Duration = 0000/00/00 00:00:00.327 KiXGolf Score = 886 Code: Function a($b) Dim $z,$y,$c,$t,$,$d,$v,$w For Each $c in $b For $t=0 To 1 $c=Join(Split($c," ")) Next $a=$a+"Knight: "+$c+# For Each $v in Split($c) $y=0 $z=1 For $w=1 To 72 $z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1)) If Asc(Substr($v,$w))>64 $y=1 EndIf Next $t=$t+$y Next $y = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$y[$ mod 11+13]+"! Your "+$y[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$y[$/8 mod 5]+"ly "," is a ")+$y[$/4 mod 7+24] $=$+1 $v=$v+1 Else $z="Your "+$y[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a" EndIf $z=$z+" "+LCase($y[$ mod 11+13])+".#" $=$+1 EndIf $a=$a+"Taunter: "+$z Next $a=$a+# Next $a=Split(Left($a,~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
And one with 885 re-useing $b and fixing bug Code: Function a($b) Dim $z,$c,$t,$,$d,$v,$w For Each $c in $b For $t=-30 To 1 $c=Join(Split($c," ")) Next $a=$a+"Knight: "+$c+# For Each $v in Split($c) $b=0 $z=1 For $w=1 To 72 $z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1)) If Asc(Substr($v,$w))>64 $b=1 EndIf Next $t=$t+$b Next $b = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$b[$ mod 11+13]+"! Your "+$b[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$b[$/8 mod 5]+"ly "," is a ")+$b[$/4 mod 7+24] $=$+1 $v=$v+1 Else $z="Your "+$b[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a" EndIf $z=$z+" "+LCase($b[$ mod 11+13])+".#" $=$+1 EndIf $a=$a+"Taunter: "+$z Next $a=$a+# Next $a=Split(Left($a,~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Lol found a bug in my code... if more then 4 spaces in a row are used, my code will fail ok edited my previous post, removed bug |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
nice!
Code: Function a($b) Dim $z,$c,$t,$,$d,$v,$w For Each $c in $b For $t=-30 To 1 $c=Join(Split($c," ")) Next $a=$a+"Knight: "+$c+# For Each $v in Split($c) $b=0 $z=1 For $w=1 To 72 $z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1)) $b=$b | Asc(Substr($v,$w))>64 Next $t=$t+$b Next $b = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$b[$ mod 11+13]+"! Your "+$b[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$b[$/8 mod 5]+"ly "," is a ")+$b[$/4 mod 7+24] $=$+1 $v=$v+1 Else $z="Your "+$b[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a" EndIf $z=$z+" "+LCase($b[$ mod 11+13])+".#" $=$+1 EndIf $a=$a+"Taunter: "+$z Next $a=$a+# Next $a=Split(Left($a,~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Nice in previous posts Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.kix Computer OS = Windows Vista Ultimate Edition CPU = Intel Pentium Model 15 Speed = 1662 MHz Memory = 1014 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 18:59:33.264 Processing End = 2007/12/18 18:59:33.568 Duration = 0000/00/00 00:00:00.304 KiXGolf Score = 881 Code: Function a($b) Dim $z,$c,$t,$,$d,$v,$w For Each $c in $b For $t=-30 To 1 $c=Join(Split($c," ")) Next $a=$a+"Knight: "+$c+# For Each $v in Split($c) $b=0 $z=1 For $w=1 To 72 $z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1)) If Substr($v,$w)>'@' $b=1 EndIf Next $t=$t+$b Next $b = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$b[$ mod 11+13]+"! Your "+$b[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$b[$/8 mod 5]+"ly "," is a ")+$b[$/4 mod 7+24] $=$+1 $v=$v+1 Else $z="Your "+$b[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a" EndIf $z=$z+" "+LCase($b[$ mod 11+13])+".#" $=$+1 EndIf $a=$a+"Taunter: "+$z Next $a=$a+# Next $a=Split(Left($a,~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Ok yours and mine toghether Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.kix Computer OS = Windows Vista Ultimate Edition CPU = Intel Pentium Model 15 Speed = 1662 MHz Memory = 1014 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 19:03:01.239 Processing End = 2007/12/18 19:03:01.551 Duration = 0000/00/00 00:00:00.312 KiXGolf Score = 876 Code: Function a($b) Dim $z,$c,$t,$,$d,$v,$w For Each $c in $b For $t=-30 To 1 $c=Join(Split($c," ")) Next $a=$a+"Knight: "+$c+# For Each $v in Split($c) $b=0 $z=1 For $w=1 To 72 $z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1)) $b=$b | Substr($v,$w)>'@' Next $t=$t+$b Next $b = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$b[$ mod 11+13]+"! Your "+$b[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$b[$/8 mod 5]+"ly "," is a ")+$b[$/4 mod 7+24] $=$+1 $v=$v+1 Else $z="Your "+$b[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a" EndIf $z=$z+" "+LCase($b[$ mod 11+13])+".#" $=$+1 EndIf $a=$a+"Taunter: "+$z Next $a=$a+# Next $a=Split(Left($a,~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
heh... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Lonkero heh... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Code: 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 19:22:29.170 Processing End = 2007/12/18 19:22:29.436 Duration = 0000/00/00 00:00:00.266 KiXGolf Score = 871 Thank you for participating in KiXtart Golf! Code: ; begin Taunt Generator ; ;! Function a($b) Dim $z,$c,$t,$,$d,$v,$w For Each $c in $b For $t=-30 To 1 $c=Join(Split($c," ")) Next $a=$a+"#Knight: "+$c+# For Each $v in Split($c) $b=0 $z=1 For $w=1 To 72 $z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1)) $b=$b | Substr($v,$w)>'@' Next $t=$t+$b Next $b = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$b[$ mod 11+13]+"! Your "+$b[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$b[$/8 mod 5]+"ly "," is a ")+$b[$/4 mod 7+24] $=$+1 $v=$v+1 Else $z="Your "+$b[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a" EndIf $z=$z+" "+LCase($b[$ mod 11+13])+".#" $=$+1 EndIf $a=$a+"Taunter: "+$z Next Next $a=Split(Right($a,~),#) EndFunction ;! ;! ; end Taunt Generator |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
uhm... went through the whole code to see what drillie boy changed... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
he change the place i added the # to the string (line 10, 38 and 40) |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
sorry, I was pressed for time when I posted (my wife called for dinner ;)) but yeah, I did what remco said. Something I also came across in my own code during private round |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Code: Function a($b) Dim $z,$c,$t,$,$d,$v,$w,$x For Each $c in $b For $t=-30 To 1 $c=Join(Split($c," ")) Next $x=$x+"#Knight: "+$c+# For Each $v in Split($c) $b=0 $z=1 For $w=1 To 72 $z=$z+(Substr($c,$w,1)=Substr(theholygrail,$z,1)) $b=$b | Substr($v,$w)>'@' Next $t=$t+$b Next $b = split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$b[$ mod 11+13]+"! Your "+$b[$/4 mod 3+5]+Iif($/4 mod 2," masquerades as a "+$b[$/8 mod 5]+"ly "," is a ")+$b[$/4 mod 7+24] $=$+1 $v=$v+1 Else $z="Your "+$b[$/2 mod 5+8]+"ther "+Iif($d mod 3,was,personified)+" a" EndIf $z=$z+" "+LCase($b[$ mod 11+13])+".#" $=$+1 EndIf $x=$x+"Taunter: "+$z $a=Split(Right($x,~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
ja, I found the place, just took me line by line reading and had to read the whole code before got it :p I'm not a faster reader, so it took quite a while. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
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 = 2400 MHz Memory = 2048 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 20:34:09.673 Processing End = 2007/12/18 20:34:09.814 Duration = 0000/00/00 00:00:00.141 KiXGolf Score = 865 Thank you for participating in KiXtart Golf! function a($) dim $z,$c,$t,$!,$d,$v,$w,$x for each $c in $ for $t=-30 To 1 $c=join(split($c," ")) next $x=$x+"#Knight: "+$c+# for each $v in split($c) $=0 $z=1 for $w=1 to 72 $z=$z+(substr($c,$w,1)=substr(theholygrail,$z,1)) $=$ | substr($v,$w)>'@' next $t=$t+$ next $ = split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") for $v=1 to $t/3 if $v=1&$z>12 $z="(A childish hand gesture).#" else $d=$d+1 if $d mod 3=2 $z=$[$! mod 11+13]+"! Your "+$[$!/4 mod 3+5]+iif($!/4 mod 2," masquerades as a "+$[$!/8 mod 5]+"ly "," is a ")+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 else $z="Your "+$[$!/2 mod 5+8]+"ther "+iif($d mod 3,was,personified)+" a" endif $z=$z+" "+lcase($[$! mod 11+13])+".#" $!=$!+1 endif $x=$x+"Taunter: "+$z $a=split(right($x,~),#) endfunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
for $t=-30 to 1 Respect!!! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
done.
Code: function a($) dim $z,$c,$t,$!,$d,$v,$w,$x for each $ in $ for $t=-30 To 1 $=join(split($," ")) next $x=$x+"#Knight: "+$+# for each $v in split($) $c=0 $z=1 for $w=1 to 72 $z=$z+(substr($,$w,1)=substr(theholygrail,$z,1)) $c=$c | substr($v,$w)>'@' next $t=$t+$c next $ = split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") for $v=1 to $t/3 if $v=1&$z>12 $z="(A childish hand gesture).#" else $d=$d+1 if $d mod 3=2 $z=$[$! mod 11+13]+"! Your "+$[$!/4 mod 3+5]+iif($!/4 mod 2," masquerades as a "+$[$!/8 mod 5]+"ly "," is a ")+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 else $z="Your "+$[$!/2 mod 5+8]+"ther "+iif($d mod 3,was,personified)+" a" endif $z=$z+" "+lcase($[$! mod 11+13])+".#" $!=$!+1 endif $x=$x+"Taunter: "+$z $a=split(right($x,~),#) endfunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
860 Code: function a($) dim $z,$t,$!,$d,$v,$w,$x for each $ in $ for $t=-30 To 1 $=join(split($," ")) next $x=$x+"#Knight: "+$+# for each $v in split($) $a=0 $z=1 for $w=1 to 72 $z=$z+(substr($,$w,1)=substr(theholygrail,$z,1)) $a=$a | substr($v,$w)>'@' next $t=$t+$a next $ = split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") for $v=1 to $t/3 if $v=1&$z>12 $z="(A childish hand gesture).#" else $d=$d+1 if $d mod 3=2 $z=$[$! mod 11+13]+"! Your "+$[$!/4 mod 3+5]+iif($!/4 mod 2," masquerades as a "+$[$!/8 mod 5]+"ly "," is a ")+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 else $z="Your "+$[$!/2 mod 5+8]+"ther "+iif($d mod 3,was,personified)+" a" endif $z=$z+" "+lcase($[$! mod 11+13])+".#" $!=$!+1 endif $x=$x+"Taunter: "+$z $a=split(right($x,~),#) endfunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Nice ! I haven't inspected this section of $-ability |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I was on the phone with Remco at the end of the private round and he said he couldn't believe that his 886 would get any shorter... Desillusioned Remco? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
can i play too: Code: Function a($) Dim $z,$t,$!,$d,$v,$w,$x For Each $ in $ For $t=-30 to 1 $=Join(Split($," ")) Next $x=$x+#Knight:\+$+# For Each $v in Split($) $a=0 $z=1 For $w=1 to 72 $z=$z+(SubStr($,$w,1)=SubStr(theholygrail,$z,1)) $a=$a | SubStr($v,$w)>'@' Next $t=$t+$a Next $ = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+IIf($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 Else $z=Your\+$[$!/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a EndIf $z=$z+\+LCase($[$! mod 11+13])+".#" $!=$!+1 EndIf $x=$x+Taunter:\+$z $a=Split(Right(Join(Split($x,\)),~),#) EndFunction Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.kix Computer OS = Windows Vista Ultimate Edition CPU = Intel(R) Pentium(R) D CPU 2.80GHz Speed = 2792 MHz Memory = 2048 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 15:19:09.338 Processing End = 2007/12/18 15:19:09.837 Duration = 0000/00/00 00:00:00.498 KiXGolf Score = 855 Thank you for participating in KiXtart Golf! Press any key to continue... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
slashing 5 strokes? That's not playing, that's bullying |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
jihaa, you did what I wanted to do earlier but wasn't able to get my head around it. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
1 more: Code: Function a($) Dim $z,$t,$!,$d,$v,$w,$x For Each $ in $ For $t = -9 to 1 $=Join(Split($," ")) Next $x=$x+#Knight:\+$+# For Each $v in Split($) $a=0 $z=1 For $w=1 to 72 $z=$z+(SubStr($,$w,1)=SubStr(theholygrail,$z,1)) $a=$a | SubStr($v,$w)>'@' Next $t=$t+$a Next $ = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") For $v=1 to $t/3 If $v=1&$z>12 $z="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+IIf($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 Else $z=Your\+$[$!/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a EndIf $z=$z+\+LCase($[$! mod 11+13])+".#" $!=$!+1 EndIf $x=$x+Taunter:\+$z $a=Split(Right(Join(Split($x,\)),~),#) EndFunction Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.kix Computer OS = Windows Vista Ultimate Edition CPU = Intel(R) Pentium(R) D CPU 2.80GHz Speed = 2792 MHz Memory = 2048 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/18 15:39:18.411 Processing End = 2007/12/18 15:39:18.910 Duration = 0000/00/00 00:00:00.499 KiXGolf Score = 854 Thank you for participating in KiXtart Golf! Press any key to continue... |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
hmm... I thought the 32 was needed there? if it is, here is my 852 Code: Function a($) Dim $z,$t,$!,$d,$v,$w,$x For Each $ in $ For $t=-30 to 1 $=Join(Split($," ")) Next $x=$x+#Knight:\+$+# For Each $v in Split($) $a=0 $z=1 For $w=1 to 72 $z=$z+(SubStr($,$w,1)=SubStr(theholygrail,$z,1)) $a=$a | SubStr($v,$w)>'@' Next $t=$t+$a Next For $v=1 to $t/3 $ = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") If $v=1&$z>12 $="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+IIf($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 Else $z=Your\+$[$!/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a EndIf $=$z+\+LCase($[$! mod 11+13])+".#" $!=$!+1 EndIf $x=$x+Taunter:\+$ $a=Split(Right(Join(Split($x,\)),~),#) EndFunction and, if it's not needed, here is my 851 Code: Function a($) Dim $z,$t,$!,$d,$v,$w,$x For Each $ in $ For $t=-9 to 1 $=Join(Split($," ")) Next $x=$x+#Knight:\+$+# For Each $v in Split($) $a=0 $z=1 For $w=1 to 72 $z=$z+(SubStr($,$w,1)=SubStr(theholygrail,$z,1)) $a=$a | SubStr($v,$w)>'@' Next $t=$t+$a Next For $v=1 to $t/3 $ = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") If $v=1&$z>12 $="(A childish hand gesture).#" Else $d=$d+1 If $d mod 3=2 $z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+IIf($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 Else $z=Your\+$[$!/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a EndIf $=$z+\+LCase($[$! mod 11+13])+".#" $!=$!+1 EndIf $x=$x+Taunter:\+$ $a=Split(Right(Join(Split($x,\)),~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
oooh, me can play too Code: Function a($) Dim $z,$t,$!,$d,$v,$w,$x For Each $ in $ For $t=-9 to 1 $=Join(Split($," ")) Next $x=$x+#Knight:\+$+# For Each $v in Split($) $a=0 $z=1 For $w=1 to 72 $z=$z+(SubStr($,$w,1)=SubStr(theholygrail,$z,1)) $a=$a | SubStr($v,$w)>'@' Next $t=$t+$a Next For $v=1 to $t/3 $ = Split("conspicuous categorical positive cruel incontrovertib steed king first-born mo fa grandmo grandfa godfa Hamster Coconut Duck Herring Newt Peril Chicken Vole Parrot Mouse Twit silly wicked sordid naughty repulsive malodorous ill-tempered") If $v=1&$z>12 $="(A childish hand gesture)" Else $d=$d+1 If $d mod 3=2 $z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+IIf($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 Else $z=Your\+$[$!/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a EndIf $=$z+\+LCase($[$! mod 11+13]) $!=$!+1 EndIf $x=$x+Taunter:\+$+".#" $a=Split(Right(Join(Split($x,\)),~),#) EndFunction 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 23:02:15.013 Processing End = 2007/12/18 23:02:15.271 Duration = 0000/00/00 00:00:00.257 KiXGolf Score = 849 Thank you for participating in KiXtart Golf! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
hmm... wonder... was looking at what this produces: $a=$a | SubStr($v,$w)>'@' some hits don't make any sense: here a: there there here a: else else here a: see see what have I missed? that match is for asc() over 64, right? so how can it match these words? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
The 32 can be replaced by a 30 as there won't be 32 double spaces ... a little flaw in my logic for the >'@' ... it inspects every single character in a 'word' or series of characters. if it finds at least one greater than @ it is counted as a word for the number of taunts logic |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Hmmm.... Quote: I thought the 32 was needed there? Using Code: For $t=0 to 1 In stead of Code: For $t=-9 to 1 Still gives a working code (with a stroke less), but I can make a testcase which makes it fail. The minimum steps taken there is 7 (-5 to 1) to make a bullit proof code (cause the maximum concequtive spaces exceeds 64 but doesn't exceed 128) Off topic: Like yesterday, I wont be able to play today, I hope I have time tommorow. Goodluck |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
errm ... I was wrong |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Jochen for the >'@' ... it inspects every single character in a 'word' or series of characters. if it finds at least one greater than @ it is counted as a word for the number of taunts logic btw, I noticed something strange yesterday: Code: break on cls $iRC=SETOPTION('NoVarsInStrings','on') $s = '@' $d = '@@' ? " asc value single = " asc($s) ? " asc value double = " asc($d) ? ? " chr from asc single = " chr(asc($s)) ? " chr from asc double = " chr(asc($d)) |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
it is not so strange when you run this after that: Code: break on $iRC=SETOPTION('NoVarsInStrings','on') $iRC=SETOPTION('NoMacrosInStrings','on') $s = '@' $d = '@@' ? " asc value single = " asc($s) ? " asc value double = " asc($d) ? ? " chr from asc single = " chr(asc($s)) ? " chr from asc double = " chr(asc($d)) get $iRC |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
The syndicate of local anarcho code peasants is proud to present 'A Long Line Broken'. 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/19 11:02:02.500 Processing End = 2007/12/19 11:02:02.734 Duration = 0000/00/00 00:00:00.233 KiXGolf Score = 844 Thank you for participating in KiXtart Golf! function a($) dim $z,$t,$!,$d,$v,$w,$x for each $ in $ for $t=-9 to 1 $=join(split($,' ')) next $x=$x+#Knight:\+$+# for each $v in split($) $a=0 $z=1 for $w=1 to 72 $z=$z+(substr($,$w,1)=substr(theholygrail,$z,1)) $a=$a | substr($v,$w)>'@' next $t=$t+$a next for $v=1 to $t/3 $ = conspicuous,categorical,positive,cruel,incontrovertib,steed,king,'first-born',mo,fa,grandmo, grandfa,godfa,Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit,silly, wicked,sordid,naughty,repulsive,malodorous,'ill-tempered' if $v=1&$z>12 $='(A childish hand gesture)' else $d=$d+1 If $d mod 3=2 $z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+ iif($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 else $z=Your\+$[$!/2 mod 5+8]+ther\+iif($d mod 3,was,personified)+\a endif $=$z+\+lcase($[$! mod 11+13]) $!=$!+1 endif $x=$x+Taunter:\+$+'.#' $a=split(right(join(split($x,\)),~),#) endfunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
It's easy if you think about it Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.KIX Computer OS = Windows XP Professional CPU = Intel(R) Pentium(R) 4 CPU 2.40GHz Speed = 2392 MHz Memory = 1016 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/19 11:56:20.062 Processing End = 2007/12/19 11:56:21.234 Duration = 0000/00/00 00:00:01.171 KiXGolf Score = 833 Thank you for participating in KiXtart Golf!
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Yo Rogier, please close the score part with a </pre> and open the code part with a <pre> Otherwise it is difficult to copy things from the post. nb. Nice move! Can't tell yet what you did, but still nice! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I took out the loop around the double spaces removal routine and (mis-)used another loop for that |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Clever! Well done Concorde |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
one more ... 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/19 13:11:49.203 Processing End = 2007/12/19 13:11:49.656 Duration = 0000/00/00 00:00:00.453 KiXGolf Score = 832 Thank you for participating in KiXtart Golf! function a($) dim $z,$t,$!,$d,$v,$w,$x for each $ in $ $t=2 for each $v in split($) $a=0 $z=1 for $w=1 to 72 $=join(split($,' ')) $z=$z+(substr($,$w,1)=substr(theholygrail,$z,1)) $a=$a | substr($v,$w)>'@' next $t=$a+$t next $x=$x+#Knight:\+$+# for $v=1 to $t/3 $ = conspicuous,categorical,positive,cruel,incontrovertib,steed,king,'first-born',mo,fa,grandmo, grandfa,godfa,Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit,silly, wicked,sordid,naughty,repulsive,malodorous,'ill-tempered' if $z>12 $='(A childish hand gesture)' else $d=$d+1 if $d mod 3=2 $z=$[$! mod 11+13]+!\Your\+$[$!/4 mod 3+5]+ iif($!/4 mod 2,\masquerades\as\a\+$[$!/8 mod 5]+ly\,\is\a\)+$[$!/4 mod 7+24] $!=$!+1 $v=$v+1 else $z=Your\+$[$!/2 mod 5+8]+ther\+iif($d mod 3,was,personified)+\a endif $=$z+\+lcase($[$! mod 11+13]) $!=$!+1 endif $z=1 $x=$x+Taunter:\+$+'.#' $a=split(right(join(split($x,\)),~),#) endfunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
heh... 831
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
heh, heh,... 829 Code: Function a($) Dim $b,$c,$d,$e,$f,$g,$h For Each $ in $ $c=2 $b = theholygrail For Each $f in Split($) $a=0 While $f $a = $a | $f > '@' $b = SubStr($b,(Left($f,1) = Left($b,1))+1) $f = Right($f,~) Loop $c = $c + $a $=Join(Split($,' ')) Next $h=$h+#Knight:\+$+# For $f=1 to $c/3 $ = conspicuous,categorical,positive,cruel,incontrovertib,steed,king,'first-born',mo,fa,grandmo, grandfa,godfa,Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit,silly, wicked,sordid,naughty,repulsive,malodorous,'ill-tempered' If $b $d=$d+1 If $d mod 3=2 $b=$[$e mod 11+13]+!\Your\+$[$e/4 mod 3+5]+IIf($e/4 mod 2,\masquerades\as\a\+$[$e/8 mod 5]+ly\,\is\a\)+$[$e/4 mod 7+24] $e=$e+1 $f=$f+1 Else $b=Your\+$[$e/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a EndIf $b=$b+\+LCase($[$e mod 11+13]) $e=$e+1 Else $b='(A childish hand gesture)' EndIf $h=$h+Taunter:\+$b+'.#' ; Next ; Next $a=Split(Right(Join(Split($h,\)),~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
nice, the alternate. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
heh. 828 Function a($) |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
826
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
heh, heh,... 823 Code: Function a($) Dim $b,$c,$d,$e,$f,$g For Each $f in $ $c=2 $ = theholygrail For Each $b in Split($f) $a=0 While $b $a = $a | $b > '@' $ = SubStr($,(Left($b,1) = Left($,1))+1) $b = Right($b,~) Loop $c = $c + $a $f=Join(Split($f,' ')) Next $g=$g+#Knight:\+$f+# For $f=1 to $c/3 If $ $ = conspicuous,categorical,positive,cruel,incontrovertib,steed,king,'first-born',mo,fa,grandmo, grandfa,godfa,Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit,silly, wicked,sordid,naughty,repulsive,malodorous,'ill-tempered' $d=$d+1 If $d mod 3=2 $b=$[$e mod 11+13]+!\Your\+$[$e/4 mod 3+5]+IIf($e/4 mod 2,\masquerades\as\a\+$[$e/8 mod 5]+ly\,\is\a\)+$[$e/4 mod 7+24] $e=$e+1 $f=$f+1 Else $b=Your\+$[$e/2 mod 5+8]+ther\+IIf($d mod 3,was,personified)+\a EndIf $=$b+\+LCase($[$e mod 11+13]) $e=$e+1 Else $='(A childish hand gesture)' EndIf $g=$g+Taunter:\+$+'.#' ; Next ; Next $a=Split(Right(Join(Split($g,\)),~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Bah! Fix the formatting Dale (and if you are at it ... lowercase the keywords. I don't want to do it any time I copy to improve ) |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
every time you post like you do i get 1 long line, so if you explect me to fix my own you need to post inside code tags |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Eh ? If I copy my own code (with <pre> and </pre> tags) posted as html I get a perfectly formatted paste into my editor (not notepad ) See how to copy code in the faq forum :p |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
dude, don't start with me, i know how to copy and paste! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
tsk tsk tsk |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
JIHAA! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Basta!!! [I can copy that without loosing format ;)] |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
so... that's it? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
What's up, no takers anymore? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Ehrm, I kinda thought that the public round ended at Wednesday 6pm but I just found it runs till Thursday 10pm, so I'll have another look at it today and see if I can take off another stroke or two |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I tried real hard yesterday ... but it seems to be quite complete to me. Nice end game Jooel! Well, I will try again today, but I think without a complete rewrite there is not much to do |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
As a matter of fact, there seem to be the one or other braincell left 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/20 09:47:43.625 Processing End = 2007/12/20 09:47:43.671 Duration = 0000/00/00 00:00:00.046 KiXGolf Score = 816 Thank you for participating in KiXtart Golf! function a($) dim $b,$c,$d,$e,$g for each $b in $ $c=2 $=theholygrail for each $a in split($b) dim $f while $a $f=$f|$a>'@' $=substr($,1+(left($a,1)=left($,1))) $a=right($a,~) loop $c=$c+$f $b=join(split($b,' ')) Next $g=$g+#Knight:\+$b+# for $b=1 to $c/3 if $ $c=Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit $=conspicuous,categorical,positive,cruel,incontrovertib,steed,king,'first-born',mo,fa,grandmo, grandfa,godfa,silly,wicked,sordid,naughty,repulsive,malodorous,'ill-tempered' $d=$d+1 if $d mod 3=2 $=$c[$e mod 11]+!\Your\+$[$e/4 mod 3+5]+iif($e/4 mod 2,\masquerades\as\a\+$[$e/8 mod 5]+ly\,\is\a\)+$[$e/4 mod 7+13] $e=$e+1 $b=$b+1 else $=Your\+$[$e/2 mod 5+8]+ther\+iif($d mod 3,was,personified)+\a endif $=$+\+lcase($c[$e mod 11]) $e=$e+1 else $='(A childish hand gesture)' endif $g=$g+Taunter:\+$+'.#' $a=split(right(join(split($g,\)),~),#) endfunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
nice! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Freak! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Wtf... you freaks 816 Deep bow |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Who's the freak now ? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
From my point of view: You all :P |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Jaaaa !!! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
hmmpff... I had a cunning plan (that is a ref to The Black Adder), but that also gave 816 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
drill, wtf you did with your post??? can't copy&paste to notepad!!! |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
lol! he did that before this round |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I dunno.. it's just plain text between PRE tags... Here's the same info between CODE tags: Code: ; begin Taunt Generator ; ;! function a($) dim $b,$c,$d,$e,$g for each $b in $ $c=2 $=theholygrail for each $a in split($b) dim $f while $a $f=$f|$a>'@' $=substr($,1+(left($a,1)=left($,1))) $a=right($a,~) loop $c=$c+$f $b=join(split($b,' ')) Next $g=$g+#Knight:\+$b+# for $b=1 to $c/3 if $ $c=Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit $=conspicuous,categorical,positive,cruel,incontrovertib,steed,king,'first-born',mo,fa,grandmo, grandfa,godfa,silly,wicked,sordid,naughty,repulsive,malodorous,'ill-tempered' $d=$d+1 $a = Your\+$[$e/2 mod 5+8]+ther\+iif($d mod 3,was,personified)+\a if $d mod 3=2 $a=$c[$e mod 11]+!\Your\+$[$e/4 mod 3+5]+iif($e/4 mod 2,\masquerades\as\a\+$[$e/8 mod 5]+ly\,\is\a\)+$[$e/4 mod 7+13] $e=$e+1 $b=$b+1 endif $=$a+\+lcase($c[$e mod 11]) $e=$e+1 else $='(A childish hand gesture)' endif $g=$g+Taunter:\+$+'.#' $a=split(right(join(split($g,\)),~),#) endfunction ;! ;! ; end Taunt Generator |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
As cunning as a fox who's just been appointed Professor of Cunning at Oxford University? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Hmmm... if I post with IE it loses the CRLF's when you try to copy it. If I post with Firefox you can copy it without problems. I fixed the first posting of my 815, so you should be able to copy that one now. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: DrillSergeant As cunning as a fox who's just been appointed Professor of Cunning at Oxford University? I dunno, but it was quite cunning nb. Congrats on the 1000th post (it has to be one of the posts in this topic) |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
sorry Jochen, i had a pms moment. well done guys. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Benny69 sorry Jochen, i had a pms moment. Eh? what was that for? The copy paste thing? No problem... we are all grumpy but hearty code freakz |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Jochen nb. Congrats on the 1000th post (it has to be one of the posts in this topic) Yeah, this was my 1000th post: http://www.kixtart.org/forums/ubbthreads.php?ubb=showflat&Main=24895&Number=183849#Post183849 I'm really very proud of my MM club membership, I expect the member card is in the mail? |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
i don't know what happened, like a woman i just went off, sorry dude. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: DrillSergeant I'm really very proud of my MM club membership, I expect the member card is in the mail? I still wait for my T-Shirt |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Benny69 i don't know what happened, like a woman i just went off, sorry dude. As said, no problem dude |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Yes !!!!!!! Finaly Your solution passed all tests KiXtart KiXtart Version = 4.60 KiXGolf Script = kixgolf_tg.kix Computer OS = Windows Vista Ultimate Edition CPU = Intel Pentium Model 15 Speed = 1662 MHz Memory = 1014 MB KiXGolf Scoring Engine Scoring Engine = 3.3 KiXtart Golf Score Tournament = Taunt Generator Processing Start = 2007/12/20 16:29:37.304 Processing End = 2007/12/20 16:29:37.492 Duration = 0000/00/00 00:00:00.188 KiXGolf Score = 812 Code: Function a($) dim $b,$c,$d,$e,$g for each $b in $ $c=2 $=theholygrail for each $a in split($b) dim $f while $a $f=$f|$a>'@' $=substr($,1+(left($a,1)=left($,1))) $a=right($a,~) loop $c=$c+$f $b=join(split($b,' ')) Next $g=$g+#Knight:\+$b+# for $b=1 to $c/3 if $ $c=Hamster,Coconut,Duck,Herring,Newt,Peril,Chicken,Vole,Parrot,Mouse,Twit $=conspicuous,categorical,positive,cruel,incontrovertib,steed,king,'first-born',mo,fa,grandmo, grandfa,godfa,silly,wicked,sordid,naughty,repulsive,malodorous,'ill-tempered' $d=$d+1 $a=Your\+$[$e/2 mod 5+8]+ther\+iif($d,was,personified)+\a if $d=2 $a=$c[$e mod 11]+!\Your\+$[$e/4 mod 3+5]+iif($e/4 mod 2,\masquerades\as\a\+$[$e/8 mod 5]+ly\,\is\a\)+$[$e/4 mod 7+13] $e=$e+1 $b=$b+1 $d=-1 endif $=$a+\+lcase($c[$e mod 11]) $e=$e+1 else $='(A childish hand gesture)' endif $g=$g+Taunter:\+$+'.#' $a=split(right(join(split($g,\)),~),#) EndFunction |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Welcome to the inner freak circle ... we contact you via PM to teach you the secret handshake [edit: Very clever Remco!!!] |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
I have something... can't see where it fails but the theory works on test script... damn, wish I find the issue in time. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
failed 2/5 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
damn. total brainfart. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
darn... Your solution failed 1 of 5 tests. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
and back to working code, but got way up to 814. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Looks like 812 it is. Congrats to all participants. The public round is clsoed now and the KiXgolf Tournament 2007 comes to an end. Final results for this round and the tournament will be posted tomorrow night. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
:'( |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Congrats, Remco! Hmmm, winning the private AND the public round the first time round. You're "Rookie of the year" in my book |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Thanx But it was really a come-back ^^ Also special thanx to Jens for making this possible I wish you all happy holidays and hope to see you next golf tournament |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: RemcovC wish you all happy holidays and hope to see you next golf tournament So, you think Rogier is gonna tell you ? Hm hmm hmm This was a hell of a kixgolf game, Thanx Jens for this and all the others before! I learned a trick, allthough it was not applicable (at least it didn't shorten this very code costruct), I will keep that in my secret tricks book for later use. And no, I won't tell you :p I wish y'all a very special christmas and a happy new year! We'll meet again next year |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
This is the only Golf I'll ever watch intensively. Thank you for a great golf-year! edit - you see - I can't even spell correctly :). Thought about participating, but naah. The time spent figuring out what you do in a few mins isn't worth it yet. Perhaps next season :). |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Originally Posted By: Björn This is the only Golf I'll ever watch intensivly. Thank you for a great golf-year! You shouldn't watch, you should participate |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Well done Rem, hope to see you around more. |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||
Final Results
|