🚀 go-pugleaf

Modulo 10 und 11 fuer VESR
Habe das Teil aus einer groesseren Library herauskopiert ist hoffentlich
alles dabei.

-------------------------------

#include <stdio.h>
#include <fcntl.h>
#include <string.h>
#include <ctype.h>

static int t[33] = {
    4, 3, 2, 7, 6, 5, 4, 3, 2, 7,
    6, 5, 4, 3, 2, 7, 6, 5, 4, 3,
    2, 7, 6, 5, 4, 3, 2, 7, 6, 5,
    4 , 3, 2
};

static int m[10][10] = {
  { 0, 9, 4, 6, 8, 2, 7, 1, 3, 5 },
  { 9, 4, 6, 8, 2, 7, 1, 3, 5, 0 },
  { 4, 6, 8, 2, 7, 1, 3, 5, 0, 9 },
  { 6, 8, 2, 7, 1, 3, 5, 0, 9, 4 },
  { 8, 2, 7, 1, 3, 5, 0, 9, 4, 6 },
  { 2, 7, 1, 3, 5, 0, 9, 4, 6, 8 },
  { 7, 1, 3, 5, 0, 9, 4, 6, 8, 2 },
  { 1, 3, 5, 0, 9, 4, 6, 8, 2, 7 },
  { 3, 5, 0, 9, 4, 6, 8, 2, 7, 1 },
  { 5, 0, 9, 4, 6, 8, 2, 7, 1, 3 }
};

int mod10(s)
char *s;
{
  char c, *p;
  int u = 0;
  p = s;
  while (isdigit(*p))
      u = m[u][*p++ - '0'];
 if (b[u ] == 11) {
  return (0);
 }else {
  return(b[u]);
  }
}

  int mod11(s)
char *s;
{
  char c, *p;
  int r = 0;
  int i = 0;

  p = s;
  while (isdigit(*p)) {
    r += (t[i++] * (*p++- '0'));
  }
  r = 11 - (r % 11);

  if ( r == 11)
      r = 0;

  return r;
}


Marc Balmer <marc@msys.ch> schrieb in im Newsbeitrag:
3847FFBC.8C23F040@msys.ch...
> Hallo
>
>   Ich habe eine Frage, die zwar etwas off-topic ist...
>
>   Weiss jemand, wie die Pruefziffer eines VESR/BESR Einzahlungs-
> scheins (die "blauen") berechnet wird?  Die tabellarische Darstellung
> hab ich schon, die sprechen aber von einer "rekursiven modulo 10"
> Berechnung.  Ich find den Algorithmus nicht heraus...
>
> Help...
> Marc
>
> --
> /"\  ASCII Ribbon Campaign - Say NO to HTML in email and news
> \ /
>  x   Marc Balmer, Micro Systems, Kannenfeldstrasse 32, CH-4056 Basel
> / \  Tel. +41 61 383 05 10, Fax 383 05 12, http://www.msys.ch/~marc/