vb.net: eigene Rechenregeln (HEX)

[Andij (Gast)]

Hallo, es geht darum das ich eine SPS habe dessen Software bestimmte 
Prüfwerte wie folgt berechnet:

(HEX) A-F, 8, 9, dann geht es von vorne los.
Heißt: F + 2 = 9 und
                                       F + 3 = A, weil F -> 8 -> 9 -> A.

Mit

[Wert z.B. F] + &H2

 kommt natürlich in vb (oder generell) dann 11 raus.

Ich bräuchte einen Denkansatz oder ein grobes Beispiel wie man das in VB 
so festlegen kann, das nur A-F,8,9 verwendet wird, und es nach der 9 
wieder bei A beginnt.

Kann jemand helfen?

Danke im Voraus

[Andi (Gast)]

Wert = ((Wert + n) and 7) or 8

[Jay Low (Gast)]

So?

Public Class Program
    Public Shared Sub Main()
        Dim arr As Byte() = {&HA, &HB, &HC, &HD, &HE, &HF, &H8, &H9}

        For i As Integer = 0 To 100 - 1
            System.Console.WriteLine("{0}) {1:X}", i, arr(i Mod arr.Length))
        Next
    End Sub
End Class

Also eigentlich in C# und dann konvertiert:

public class Program
{
  public static void Main()
  {
    byte[] arr = { 0xA, 0xB, 0xC, 0xD, 0xE, 0xF, 0x8, 0x9 };
    for(int i = 0; i < 100; i++)
    {
      System.Console.WriteLine("{0}) {1:X}", i, arr[i % arr.Length]);
    }
  }
}