連続でQRコードを作る

いっちゃんのブログ（仮）で公開されている
QRコード生成スクリプト For Illustrator CS-CS3を利用して、CSVファイルからデーターを読み込んで
連続でQRコードを生成できるようにしてみた。

けっこう重です。
数があると携帯じゃ確認が面倒いです

。

#includepath 'path of lib'

$.gc();
//CSV
/////////////////////////////////
$.extend  = function(s) {
for(var p in s){$[p] = s[p];}
}
jQuery = $;
////////////////////////////////
#include 'jquery.csv.js'
//http://plugins.jquery.com/project/csv
//修正箇所
//+csv: function(delim, quote, lined) {//変更
//+lined = typeof lined == "string" ? new RegExp( "[" + (lined || "\n") + "]+") : typeof lined == "undefined" ? "\n" : lined;//変更
//


//QRCODE
/////////////////////////////////////////////////////////
#include 'qrcode.js';
/////////////////////////////////////////////////////////
//http://itchang.blog102.fc2.com/blog-entry-20.html
//修正箇所
//-var qrCodeWord = prompt("QRコードのデータを入力して下さい", "http://itchang.blog102.fc2.com/");//消す
//+var qrCodeWord;//追加
//
myDocument = app.activeDocument;
function toQR(qrCodeWord,pos){
// 誤り訂正レベル設定（H固定）
var qrErrorCorrectLevel = QRErrorCorrectLevel.H;

// 入力データのバイト数を取得
var strCount = getByte(qrCodeWord);

// QRコードの型番を決定
var qrVersion = 0;
var i = 0;
while(strCount > qrDataCap[qrErrorCorrectLevel][i++]) qrVersion++;

// QRコードオブジェクトを生成
qr = new QRCode(qrVersion, qrErrorCorrectLevel);

qr.addData(qrCodeWord);
qr.make();

// QRコードの描画位置を設定（ドキュメント中央）
var qrCodeSize = ( (qrVersion - 1) * 4 + 21) * qrModuleSize;
var posX = pos[0] ? pos[0] : myDocument.width / 2 - qrCodeSize / 2;
var posY = pos[1] ? pos[1] : myDocument.height / 2 + qrCodeSize / 2;
drawQRCode(posX, posY, qrModuleSize);
}



//
///////////////////////////////////////////////////////////
#include 'hvg.js'
///////////////////////////////////////////////////////////
sel = new hvg(activeDocument.selection,0);

//MAIN
//////////////////////////////////////////////////////////
var f = new File(myDocument.path+'/urldata.csv');
if(f.open('r'))csvf = f.read();
f.close();
var urls = $.csv()(csvf);
for(i=0;i< urls.length;i++)urls[i][0] && toQR(urls[i][0],sel.next().position);

ウェルキャット USB二次元コードリーダー Image7-USB