Some argument count fixes.

Platform/Apple/tools/PackPartitions/src/org/badvision/A2PackPartitions.groovy

@@ -3304,6 +3304,7 @@ end
 
             def name = getScriptName(script)
             assert name : "Can't find script name in $script"
+            getScriptArgs(script)
             scriptNames[script] = "sc_${humanNameToSymbol(name, false)}"
             packScript(script)
 

Platform/Apple/virtual/src/plasma/party.pla

@@ -550,37 +550,41 @@ def tabTo(cursorX)#0
 end
 
 ///////////////////////////////////////////////////////////////////////////////////////////////////
-def formatDice(encoded)#0
+def formatDice(encoded)#1
   byte nDice, dieSize, add
   nDice = encoded >> 12
   dieSize = (encoded >> 8) & $F
   add = encoded & $F
   rawDisplayf2("%dd%d", nDice, dieSize)
   if add; rawDisplayf1("+%d", add); fin
+  return 0
 end
 
 ///////////////////////////////////////////////////////////////////////////////////////////////////
-def formatNum(num)#0
+def formatNum(num)#1
   rawDisplayf1("%d", num)
+  return 0
 end
 
 ///////////////////////////////////////////////////////////////////////////////////////////////////
-def formatStr(str)#0
+def formatStr(str)#1
   rawDisplayStr(str)
+  return 0
 end
 
 ///////////////////////////////////////////////////////////////////////////////////////////////////
-def formatEquipped(num)#0
+def formatEquipped(num)#1
   if num == 1
     rawDisplayStr("Y")
   else
     rawDisplayStr("N")
   fin
+  return 0
 end
 
 ///////////////////////////////////////////////////////////////////////////////////////////////////
-def formatAttack(code)#0
-  if !code; return; fin
+def formatAttack(code)#1
+  if !code; return 0; fin
   if code == 1
     rawDisplayStr("single")
   elsif code == 2
@@ -588,6 +592,7 @@ def formatAttack(code)#0
   else
     rawDisplayf1("%d-shot", code)
   fin
+  return 0
 end
 
 ///////////////////////////////////////////////////////////////////////////////////////////////////

Platform/Apple/virtual/src/plasma/store.pla

@@ -413,6 +413,7 @@ def _sellToStore(profitPercent)#1
   word pItemTbl, choice
   byte nItemsOnPage, pageNum, totalItems, nPages, redisplay
 
+  loadExtraModules()
   totalItems = iterateSellables(9999, 0)
   if totalItems == 0
     scriptDisplayStr("\nNothing to sell.\n")