HyperCard: Script to Sum a List of Numbers (7/92)

This function adds up a series of numbers. It demonstrates how to process
both item lists and separate parameters.

function sum
put 0 into total
repeat with paramNum = 1 to the paramCount
put param(paramNum) into list
repeat with i = 1 to the number of items in list
add item i of list to total
end repeat
end repeat
return total
end sum

This article is adapted from the Claris Tech Info database.