#178487 - 2007-07-26 10:22 PM
Re: KiXgolf Freebie: Quicksum
[Re: Jochen]
|
sixdoubleo
Starting to like KiXtart
Registered: 2004-02-06
Posts: 118
Loc: California, US
|
I know it looks like everybody already has this solved, but I wanted to check it out just to see how I'd do. Is there somewhere else I can get the download? The original URL is giving me a 404. Thanks!
|
Top
|
|
|
|
#178611 - 2007-08-01 08:42 PM
Re: KiXgolf Freebie: Quicksum
[Re: Richard H.]
|
sixdoubleo
Starting to like KiXtart
Registered: 2004-02-06
Posts: 118
Loc: California, US
|
Well, not knowing all the the little tricks (EndIf and Next not needed, ASC() only evaluating the first character of a string) I get a 96 on my own merits.
Where can I find a list of some of these "quirks" you guys have found?
Function a($t)
Dim $p, $
For $p = 1 to len($t)
$ = asc(SubStr($t,$p,1))-64
If $ > 0
$a = $a + $p * $
EndIf
Next
EndFunction
Running Test 1...Done Running Test 2...Done Running Test 3...Done Running Test 4...Done Running Test 5...Done Running Test 6...Done Your solution passed all tests
KiXtart KiXtart Version = 4.50 KiXGolf Script = kixgolf_qs.kix
Computer OS = Windows XP Professional CPU = Intel(R) Pentium(R) 4 CPU 3.00GHz Speed = 2992 MHz Memory = 2040 MB
KiXGolf Scoring Engine Scoring Engine = 3.3
KiXtart Golf Score Tournament = Quicksum Processing Start = 2007/08/01 11:43:47.213 Processing End = 2007/08/01 11:43:47.213 Duration = 0000/00/00 00:00:00.000 KiXGolf Score = 96
Thank you for participating in KiXtart Golf!
Edited by sixdoubleo (2007-08-01 08:43 PM)
|
Top
|
|
|
|
#178612 - 2007-08-01 09:20 PM
Re: KiXgolf Freebie: Quicksum
[Re: sixdoubleo]
|
Benny69
Moderator
Registered: 2003-10-29
Posts: 1036
Loc: Lincoln, Ne
|
well done, there is no documented list of 'quirks' (not really quirks, just coding experience).
Edited by Benny69 (2007-08-01 09:20 PM)
|
Top
|
|
|
|
Moderator: Arend_, Allen, Jochen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Mart
|
0 registered
and 718 anonymous users online.
|
|
|