#183925 - 2007-12-19 11:04 AM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Jochen]
|
Jochen
KiX Supporter
Registered: 2000-03-17
Posts: 6380
Loc: Stuttgart, Germany
|
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
_________________________
|
Top
|
|
|
|
#183930 - 2007-12-19 11:58 AM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Jochen]
|
DrillSergeant
MM club member
Registered: 2004-07-09
Posts: 1164
Loc: Eijsden, the Netherlands
|
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!
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=$t+$a 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 $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
Edited by DrillSergeant (2007-12-19 12:05 PM)
_________________________
The Code is out there
|
Top
|
|
|
|
#183937 - 2007-12-19 01:16 PM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Jochen]
|
Jochen
KiX Supporter
Registered: 2000-03-17
Posts: 6380
Loc: Stuttgart, Germany
|
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
_________________________
|
Top
|
|
|
|
#183946 - 2007-12-19 05:30 PM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Jochen]
|
Lonkero
KiX Master Guru
Registered: 2001-06-05
Posts: 22346
Loc: OK
|
heh...
831
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 12<$z $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 ; $z=1 $x=$x+Taunter:\+$z+'.#' $a=split(right(join(split($x,\)),~),#) endfunction
_________________________
!download KiXnet
|
Top
|
|
|
|
#183949 - 2007-12-19 06:16 PM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Lonkero]
|
Benny69
Moderator
Registered: 2003-10-29
Posts: 1036
Loc: Lincoln, Ne
|
heh, heh,... 829
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
|
Top
|
|
|
|
#183953 - 2007-12-19 07:27 PM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Lonkero]
|
Lonkero
KiX Master Guru
Registered: 2001-06-05
Posts: 22346
Loc: OK
|
heh. 828
Function a($) Dim $b,$c,$d,$e,$f,$g,$h For Each $f in $ $c=2 $b = theholygrail For Each $ in Split($f) $a=0 While $ $a = $a | $ > '@' $b = SubStr($b,(Left($,1) = Left($b,1))+1) $ = Right($,~) Loop $c = $c + $a $f=Join(Split($f,' ')) Next $h=$h+#Knight:\+$f+# For $f=1 to $c/3 If $b $ = 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=$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
_________________________
!download KiXnet
|
Top
|
|
|
|
#183954 - 2007-12-19 07:30 PM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Lonkero]
|
Lonkero
KiX Master Guru
Registered: 2001-06-05
Posts: 22346
Loc: OK
|
826
Function a($) Dim $b,$c,$d,$e,$f,$g,$h 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 $h=$h+#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 $h=$h+Taunter:\+$+'.#' ; Next ; Next $a=Split(Right(Join(Split($h,\)),~),#) EndFunction
_________________________
!download KiXnet
|
Top
|
|
|
|
#183955 - 2007-12-19 07:34 PM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Lonkero]
|
Benny69
Moderator
Registered: 2003-10-29
Posts: 1036
Loc: Lincoln, Ne
|
heh, heh,... 823
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
Edited by Benny69 (2007-12-19 08:06 PM) Edit Reason: because jooel said
|
Top
|
|
|
|
#183959 - 2007-12-19 08:04 PM
Re: KiXgolf 2007: Taunt Generator - Public Round
[Re: Jochen]
|
Benny69
Moderator
Registered: 2003-10-29
Posts: 1036
Loc: Lincoln, Ne
|
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
|
Top
|
|
|
|
Moderator: Arend_, Allen, Jochen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Mart
|
0 registered
and 569 anonymous users online.
|
|
|