The need for the double mod got lost somewhere along the line. Since we don't need it anymore:

Code:
; begin Mayan Number Converter
;
;!
Function m($)
Dim $a
	If $+0=$
		Do
			$m = iif($ mod 20, Split(' . : .: ::')[$ mod 5],'-') + Left('|||',$ mod 20/5)+$a+$m
			$a = ' '
			$ = $ / 20
		Until $ = 0
	Else
		While $
			$a = InStr('-.:__|', Left($,1))
			$m = iif($a, $m+$a-1, $m*20)
			$ = Right($,~)
EndFunction
;!
;!
; end Mayan Number Converter


for a result of:
Code:

Mayan Number Converter passed all 60 tests (100% correct)

KiXtart
KiXtart Version  = 4.52 Release Candidate 2
KiXGolf Script   = kixgolf_mnc.kix

Computer
OS               = Windows XP Professional
CPU              = Intel Pentium Model 13
Speed            = 1595 MHz
Memory           = 478 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.0.3

KiXtart Golf Score
Tournament       = KiXtart Golf: Mayan Number Converter
Processing Start = 2006/07/24 13:39:21.692
Processing End   = 2006/07/24 13:39:21.702
Duration         = 0000/00/00 00:00:00.009
KiXGolf Score    = 203
 
Thank you for participating in KiXtart Golf!