Hi!

Regadr = 0 'Register NUMMER 0:
Regvalue = &H80
Call Loadreg()

Regadr = 1 'Register NUMMER 1:
Regvalue = &H0C
Call Loadreg()

Regadr = 2 'Register NUMMER 2:
Regvalue = &H04
Call Loadreg()

Regadr = 3 'Register NUMMER 3:
Regvalue = &H05
Call Loadreg()

Regadr = 4 'Register NUMMER 4:
Regvalue = &H01
Call Loadreg()

Regadr = 5 'Register NUMMER 5:
Regvalue = &H00
Call Loadreg()

Regadr = 6 'Register NUMMER 6:
Regvalue = &H01
Call Loadreg()

Regadr = 7 'Register NUMMER 7:
Regvalue = &B00000111
Call Loadreg()