--- loncom/interface/spreadsheet/default_assesscalc	2001/03/10 22:30:18	1.2
+++ loncom/interface/spreadsheet/default_assesscalc	2014/02/28 19:20:11	1.8
@@ -1,9 +1,78 @@
-<field col=A row=0>[stores_0_solved]</field>
+<field col=A row=0>
+if ("[stores_0_solved]" eq 'excused') {
+    'excused';
+} elsif (M0) { 
+    if(K0) {
+        if (K0 == M0) {
+            "correct";
+        } elsif (K0 < M0) {
+            K0.'/'.M0.' correct';
+        } else {
+            'correct';
+        }
+    } else {
+        "incorrect";
+    }
+} else {
+    '';
+}
+</field>
+
 <field col=B row=0>'Tries:'</field>
-<field col=C row=0>[stores_0_tries]</field>
-<field col=D row=0>'Duedate:'</field>
-<field col=E row=0>[parameter_0_duedate]</field>
+<field col=C row=0>
+if (M0) {
+    [&EXPANDSUM(PART;stores_PART_tries)]/M0;
+} else {
+    '';
+}
+</field>
+
+<field col=D row=0>'Timestamp:'</field>
+<field col=E row=0>[timestamp]</field>
+<field col=F row=0>
+if ([timestamp]>100000000) { 
+    $tmp = localtime([timestamp]); 
+    $tmp =~ s/\s/&nbsp;/g;
+    $tmp;
+} else {
+    '';
+}
+</field>
+
+<field col=G row=0>'Due Date:'</field>
+<field col=H row=0>[parameter_0_duedate]</field>
+<field col=I row=0>
+if ([parameter_0_duedate]>100000000) { 
+    $tmp = localtime([parameter_0_duedate]); 
+    $tmp =~ s/\s/&nbsp;/g;
+    $tmp;
+} else {
+    '';
+}
+</field>
+
+<field col=J row=0>'Attempted Parts:'</field>
+<field col=K row=0>
+[&EXPANDSUM(PART;(stores_PART_solved !~ /^(\W?excused\W?|)$/ ?1:0))]
+</field>
+
+<field col=L row=0>'Solved Parts:'</field>
+<field col=M row=0>[&EXPANDSUM(PART;(stores_PART_awarded?1:0))]</field>
+
 <field col=W row=0>'Available Points:'</field>
-<field col=X row=0>[parameter_0_weight]</field>
+<field col=X row=0>
+if ("[stores_0_solved]" eq 'excused') {
+    0 
+} else { 
+    [&EXPANDSUM(PART;parameter_PART_weight*(stores_PART_solved !~ /^\W?excused\W?$/ ? 1 : 0))];
+}
+</field>
+
 <field col=Y row=0>'Awarded Points:'</field>
-<field col=Z row=0>[parameter_0_weight]*[stores_0_awarded]</field>
+<field col=Z row=0>
+if ("[stores_0_solved]" eq 'excused') { 
+    0 
+} else { 
+    [&EXPANDSUM(PART;parameter_PART_weight*stores_PART_awarded)]
+}
+</field>