VBA GF (256) 로그 테이블

Question

VBA에서 QR 코드를 생성하는 함수를 만들고 있습니다. 나는 this tutorial을 팔로우하고 있습니다. 지금은 this step에 오류 수정 단어를 생성하려고합니다. 이를 위해서는 GF (256) 로그/안티 로그 테이블, seen here이 필요합니다. 나는 정말로 전체 테이블에 입력하고 싶지 않습니다. 누구든지 배열에 저장할 수 있도록이 테이블을 생성하는 데 사용되는 함수를 알고 있습니까? 이 자습서에는 테이블 생성 방법에 대한 링크가 있지만 깨졌습니다.

이전에 언급 했어야했지만 액세스가 가능하므로 Excel에 붙여 넣기가 제대로 작동하지 않습니다. 하지만이 글을 쓰면서 나는 액세스 테이블을 사용할 수 있음을 깨닫고있다. 비록 내가 코드에서 그것을 모두하는 것을 선호 할지라도.

Answer 1

Const GF = 256 '// define the Size & Prime Polynomial of this Galois field 
Const PP = 285 
Dim logg(GF) 'establish global Log and Antilog arrays 
Dim alogg(GF) 


'fill the logg() and alogg() arrays with appropriate integer values 

logg(0) = 1 
alogg(0) = 1 

For i = 1 To 255 
    alogg(i) = alogg(i - 1) * 2 
    If alogg(i) >= GF Then alogg(i) = alogg(i) Xor PP 
    logg(alogg(i)) = i 
Next i