#164901 - 2006-07-25 10:18 PM
Re: KiXgolf: Mayan Number Converter - Public Phase
|
Lonkero
KiX Master Guru
Registered: 2001-06-05
Posts: 22346
Loc: OK
|
well, here is 191 of your rogier-code:
Code:
Function m($)
dim $b
if $=$+0
$m = iif($ mod 20,split(' . : .: ::')[$ mod 5],'-') + left('|||',$ mod 20/5)
$=$/20
if $
$m = m($) + ' ' + $m
endif
else
for each $ in split($)
dim $a
while m($a)<>$
$a = $a + 1
loop
$m = $m * 20 + $a
EndFunction
|
|
Top
|
|
|
|
#164902 - 2006-07-25 10:19 PM
Re: KiXgolf: Mayan Number Converter - Public Phase
|
Shawn
Administrator
Registered: 1999-08-13
Posts: 8611
|
Rogier 188
Code:
Function m($)
dim $a
if $=$+0
$m = iif($ mod 20,split(' . : .: ::')[$ mod 5],'-') + left('|||',$ mod 20/5)
$=$/20
if $
$m = m($) + ' ' + $m
endif
else
for each $ in split($)
$a = -1
do
$a=$a+1
until m($a)=$
$m = $m * 20 + $a
;next
;endif
EndFunction
|
|
Top
|
|
|
|
|
#164903 - 2006-07-25 10:19 PM
Re: KiXgolf: Mayan Number Converter - Public Phase
|
Lonkero
KiX Master Guru
Registered: 2001-06-05
Posts: 22346
Loc: OK
|
wtf, here is 186:
Code:
Function m($)
if $=$+0
$m = iif($ mod 20,split(' . : .: ::')[$ mod 5],'-') + left('|||',$ mod 20/5)
$=$/20
if $
$m = m($) + ' ' + $m
endif
else
for each $ in split($)
dim $a
while m($a)<>$
$a = $a + 1
loop
$m = $m * 20 + $a
EndFunction
|
|
Top
|
|
|
|
|
#164905 - 2006-07-25 10:25 PM
Re: KiXgolf: Mayan Number Converter - Public Phase
|
Lonkero
KiX Master Guru
Registered: 2001-06-05
Posts: 22346
Loc: OK
|
185
Code:
Function m($)
if $<$+0
for each $ in split($)
dim $a
while m($a)<>$
$a = $a + 1
loop
$m = $m * 20 + $a
next
else
$m = iif($ mod 20,split(' . : .: ::')[$ mod 5],'-') + left('|||',$ mod 20/5)
$=$/20
if $
$m = m($) + ' ' + $m
EndFunction
|
|
Top
|
|
|
|
|
#164907 - 2006-07-25 10:46 PM
Re: KiXgolf: Mayan Number Converter - Public Phase
|
DrillSergeant
MM club member
Registered: 2004-07-09
Posts: 1164
Loc: Eijsden, the Netherlands
|
Hehehe, this isn't rogier-code. This is freaky jooel-shawn voodoo, and I'm not having any part of it! 
|
|
Top
|
|
|
|
|
#164908 - 2006-07-25 11:11 PM
Re: KiXgolf: Mayan Number Converter - Public Phase
|
Benny69
Moderator
Registered: 2003-10-29
Posts: 1036
Loc: Lincoln, Ne
|
Rogier and I can play this game, here is Jooel code 149  :
Code:
Function m($)
If $<$+0
$m=-1
Do
$m=$m+1
Until $=m($m)
Else
$m = IIf($ mod 20,Split(' . : .: ::')[$ mod 5],'-') + Left('|||',$ mod 20/5)
$=$/20
If $
$m = m($) + ' ' + $m
EndFunction
|
|
Top
|
|
|
|
|
#164911 - 2006-07-25 11:19 PM
Re: KiXgolf: Mayan Number Converter - Public Phase
|
Benny69
Moderator
Registered: 2003-10-29
Posts: 1036
Loc: Lincoln, Ne
|
by my estimation it would take about 7 days to run, but it is all in good fun
|
|
Top
|
|
|
|
|
#164912 - 2006-07-26 04:23 AM
Re: KiXgolf: Mayan Number Converter - Public Phase - 170
|
Shawn
Administrator
Registered: 1999-08-13
Posts: 8611
|
Arrrrr ... 170
Code:
Function m($b)
dim $,$a
for $ = 1 to 16
$a = split("- . : .: :: " + $m)
$m = $m + "| " + $a[$]
next
for each $ in split($b)
$m = ascan($a,$) + 20 * $m
if $m<0
$m = $a[$ mod 20]
$ = $b/20
if $
$m = m($) + " " + $m
;endif
;endif
;next
EndFunction
|
|
Top
|
|
|
|
Moderator: Arend_, Allen, Jochen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Mart
|
2023-12-29 [BradV]
Happy new year!
2024-02-09 [RSLHA]
No access possible!
2024-02-09 [RSLHA]
Database Error!
2024-02-18 [Dr_Rick]
What happened to Bruno
2024-03-08 [mole]
Thanks for getting the posts back again.
2024-04-18 [MarineV]
will the db errors get fixed????
2024-04-26 [Tonny]
database error, please!
2024-05-09 [NTDOC]
I'm not seeing any errors
2024-05-31 [chojin]
DB is down again 
2024-06-04 [selsner]
Still no access, please help!
2024-06-07 [mole]
Looks like DB is back again. Thanks.
2024-06-17 [It_took_my_meds]
We encountered a problem. The reason reported was Database error only visible to forum administrators Please click back to return to the previous page.
2024-07-04 [Armin73]
There is still a database error 🤷♂️
2024-07-09 [0neZero]
There is still a database error 🤷♂️
2024-07-10 [Allen]
DB working a few times in between the messages above. Working again as of 7/10. Thanks Doc
2024-08-31 [NetGnostic]
Bummer, the Database error is back.
2024-09-04 [NTDOC]
Fourms are back up without error for the moment
2024-10-02 [Arend_]
Wll still have database errors ;-)
2024-10-03 [Allen]
Thanks to Doc... it's back.
2024-12-09 [chojin]
could we move kixtart to a new place in order to keep it living ? maybe create a github page and a subreddit?
2024-12-10 [Allen]
do know about moving it, but I know Doc is aware of the DB issue. Should be back online soon.
2024-12-10 [Allen]
don't know...
2025-02-09 [Comet]
Greetings. I installed KiX on my new Windows 11 computer, and joined this foum. Hello World!
2025-02-10 [Allen]
Welcome
2025-03-07 [Comet]
UBB Error We encountered a problem. The reason reported was Database error only visible to forum administrators
2025-06-30 [mole]
Thanks for getting this working again.
2025-07-28 [mole]
UBB Error We encountered a problem. The reason reported was Database error only visible to forum administrators
2025-08-01 [Arend_]
I think it's fixed, I don't have the problem.
|
|
0 registered
and 368 anonymous users online.
|
|
|
