\starttext % % Zähler für die Punkte [summeP] = 0 % \global\newcount\summeP \summeP=0 % % % Schalter [ZeigeP] (intern) zur Steuerung der Anzeige der Punkte % Ausgangswert 0, d.h. die Punkte werden nicht angezeigt % \chardef\ZeigeP=0 % % Schalter [addP] (intern) zur Steuerung der Berechnung der Gesamtpunkte % Ausgangswert 0, d.h. die Gesamtpunkte werden nicht berechnet \chardef\addP=0 % % Die Schalter für den Anwender % direkt nach \starttext setzen % [1] % die Punkte der Aufgaben anzeigen \def\zeigePunkte{\chardef\ZeigeP=1} % % [2] % die Gesamtpunktzahl berechnen \def\SummePunkte{\chardef\addP=1} % % Berechnung der GesamtPunkte [getPunkte] durchführen % \def\getPunkte[#1]{\advance\summeP by \number#1} % % % Punkte im rechten Rand ausgeben % \def\showP[#1]{\inright{\hfill(#1 P.)}} % % % Die Behandlung der Punktangaben % \def\pkt[#1]% {% \ifnum\ZeigeP=1 \showP[#1]% \ifnum\addP=1 \getPunkte[#1] \fi \fi% } % % \defineenumeration[question][location=inmargin,text=,width=fit] % \zeigePunkte % Punkte anzeigen \SummePunkte % Summe der Punkte berechnen % % \textrule[top]{first test} max. points (start): \number\summeP\blank % First TestQuestion \pkt[5] \dorecurse{10}{just a test text } \blank[medium] Second TestQuestion \pkt[15] \dorecurse{10}{just a test text } \blank[medium] % max. points (end): \number\summeP.\blank[2*big] % % \textrule[top]{second test} % \summeP=0 max. points (start): \number\summeP\blank % \question\pkt[5] \dorecurse{10}{just a test text }\par % \question\pkt[15] \dorecurse{10}{just a test text }\par % max. points (end): \number\summeP.\blank[2*big] % % \textrule[top]{third test} % \summeP=0 max. points (start): \number\summeP\blank % \question \dorecurse{10}{just a test text }\par\pkt[5] % \question \dorecurse{10}{just a test text }\par\pkt[15] % max. points (end): \number\summeP.\blank[2*big] % \stoptext