PLC装置のデータ収集（Loggerと直接通信）

// グローバル変数
var Endflag = 1;
var D9033Prev = 0;
// 初期化関数　Logger起動後に1回だけ実行します。
function Initialize() {

}

// ロギング関数　Loggerのロギングの1サイクルごとに実行します。getPlcValue関数でPLC値を取得します。setFieldでロギングデータを設定します。
function Logging() {
//alarm定義、取得
	var alarm = [
		['1', 'オーバフロータンク満水',getPlcValue('M1143')],
		['2', '加工不良',		getPlcValue('M1341')],
		['3', '焼入機操作手動',	getPlcValue('X10A3')]
	];
	var alarmcnt = alarm.length;//アラーム定義数を取得
	var alarmexist = 0;//アラームの有無
	for (i = 0; i < alarmcnt; i++){
		alarmexist += alarm[i][2];
	}
			

//operatingstatus
	var stat = [];
	stat[1] = 'D9040';//STEP番号
	stat[2] = 'D9033';//行程
	stat[3] = 'D9092';//発信機出力電力測定値
	stat[4] = 'D9099';//焼入水流量1測定値
	stat[5] = 'D9100';//焼入水流量2測定値
	stat[6] = 'D9101';//焼入水流量3測定値
	stat[7] = 'D9102';//焼入水流量4測定値
	stat[8] = 'D9103';//焼入水流量5測定値
	stat[9] = 'D9104';//焼入水流量6測定値
	stat[10] = 0;

	for (let i = 1; i < 10; i++){
		stat[i] = getPlcValue(stat[i]);
		stat[10] = stat[10]+(i > 3 ? stat[i] : 0);
	};
	//工程が2なら工程間停止
	if (stat[2] === 2){
		setField('operatingstatus',4);
	}else{
		//アラームがなければ作業中
		if (alarmexist === 0){
			if ((stat[3] > 0) || (stat[10] > 0)){
				setField('operatingstatus',1);
			}else{
				setField('operatingstatus',2);
			}
		}else{
			//アラームが出てれば工程内停止
			setField('operatingstatus', 3);
		}
	}

//endflag
	if ((stat[2] < D9033Prev)){
		Endflag = -1 * Endflag;
	}else{
		Endflag = Endflag;
	}
	setField('endflag',Endflag);
	D9033Prev = stat[2];

//datatag
	setField('datatag','KOMATSU');

//BlockNum
	var Block;
	var PrcMode = getPlcValue('D9031');
	var StpNo = getPlcValue('D9040');
	var HtPrcNo = getPlcValue('D9050');

	if (PrcMode === 0){
		Block = StpNo;
	}else{
		Block = HtPrcNo;
	};
	setField('blocknum',Block);

//alarmnum
	var alarmnum='';
	for (let i = 0; i < (alarmcnt); i++){
		if (alarm[i][2] === 1){
			alarmnum += alarm[i][0] + ((i < alarmcnt-1) ? '|' : '');
		}
	}
	if (alarmnum === ''){
		alarmnum = 0;
	}
	setField('alarmnum', alarmnum);

}

// グローバル変数
	var Counter = 0;
	var coilvolsum = 0;
	var coilvolsum1 = 0;
	var coilvolsum2 = 0;
	var srcvolsum = 0;
	var coilpowsum = 0;
	var coilpowsum1 = 0;
	var coilpowsum2 = 0;
	var coilcursum = 0;
	var coilcursum1 = 0;
	var coilcursum2 = 0;
	var stp_prev = 0;
	var stat_val_prev = 0;
	var interval = 100;
	cycleOnprev = 1;

//BCD変換の関数定義
function toBCD(decimal) {
	let str = decimal.toString(); // 文字列に変換
	let bcd = '';
	for (let i = 0; i < str.length; i++) {
		let digit = parseInt(str[i], 10);
		let bin = digit.toString(2).padStart(4, '0'); // 4ビットに揃える
		bcd += bin + '';
	}
	return bcd.trim(); // 最後のスペースを削除
}

// 初期化関数　Logger起動後に1回だけ実行します。
function Initialize() {
}

// ロギング関数　Loggerのロギングの1サイクルごとに実行します。getPlcValue関数でPLC値を取得します。setFieldでロギングデータを設定します。
function Logging() {
// タグ設定
	setField('datatag', 'KOMATSU');

	// operatingStatus（D9031の0bitで判断）
	var OnOffRaw = getPlcValue('D9031');
	var OnOffBCD = toBCD(OnOffRaw);

	// BCDの末尾1ビットを取得し、数値に変換
	var OnOffBits = parseInt(OnOffBCD.charAt(OnOffBCD.length - 1), 2);
	setField('script001', OnOffBits);

	// ON/OFF状態に応じてサイクル状態を設定
	var cycleOn = (OnOffBits === 1 ? 1 : 4);
	setField('OperatingStatus', cycleOn);

// PartsSerialnumber
	setField('partsserialnumber', getPlcValue('D9011'));

// BlockNumber（D9031が変化、または電圧・流量が閾値をまたぐと変化）
	var vol = getPlcValue('D9044'); // 電圧
	var wflow = getPlcValue('D9060'); // 流量
// processname
	setField('processname','IQ');

// 状態値の計算
	var stat_val = 10 * (vol > 10 ? 1 : 0) + (wflow > 900 ? 1 : 0);
	var status = 10 * OnOffRaw;
	var stp;
	var block;

	if (OnOffBits === 0) {
		stp = 0;
	} else {
		if (stat_val_prev !== stat_val) {
			stp = stp_prev + 1;
		} else {
			stp = stp_prev;
		}
	}

	block = status + stp;
	stp_prev = stp;
	stat_val_prev = stat_val;

	setField('BlockNum', block);

//data026コイル電流累計[Ah]
	var coilcur = getPlcValue('D9048');
	if (coilcur > 0){
		coilcursum = coilcursum + coilcur * (interval/1000)/3600;
	}else{
		coilcursum = 0;
	}
	setField('Data026', coilcursum);
//data027コイル皮相電力累計[kVAh]
	var coilpow = getPlcValue('D9049');
	if (coilpow > 0){
		coilpowsum = coilpowsum + coilpow * (interval/1000)/3600;
	}else{
		coilpowsum = 0;
	}
	setField('Data027', coilpowsum);
//data028D9047コイル電圧累計[Vh]
	var coilvol = getPlcValue('D9047');
	if (coilvol > 0){
		coilvolsum = coilvolsum + coilvol * (interval/1000)/3600;
	}else{
		coilvolsum = 0;
	}
	setField('Data028', coilvolsum);
//data029D9044高周波電圧累計[Vh]
	var srcvol = getPlcValue('D9044');
	if (srcvol > 0){
		srcvolsum = srcvolsum + srcvol * (interval/1000)/3600;
	}else{
		srcvolsum = 0;
	}
	setField('Data029', srcvolsum);
//data030 D9047 1次加熱コイル電圧累計,コイル電流累計、コイル電力累計
	if (block === 25731){
		coilvolsum1 = coilvolsum1 + (coilvol * (interval/1000))/3600;
		coilcursum1 = coilcursum1 + (coilcur * (interval/1000))/3600;
		coilpowsum1 = coilpowsum1 + (coilpow * (interval/1000))/3600;
	}
	//工程間停止はゼロ
	if (cycleOnprev === 444){
		coilvolsum1 = 0;
		coilcursum1 = 0;
		coilpowsum1 = 0;
	}
	setField('Data030', coilvolsum1);
	setField('Data032', coilcursum1);
	setField('Data034', coilpowsum1);

//data031 D9047 2次加熱コイル電圧累計,コイル電流累計,コイル電力累計
	if (block === 25733){
		coilvolsum2 = coilvolsum2 + (coilvol * (interval/1000))/3600;
		coilcursum2 = coilcursum2 + (coilcur * (interval/1000))/3600;
		coilpowsum2 = coilpowsum2 + (coilpow * (interval/1000))/3600;
	}
	//工程間停止はゼロ
	if (cycleOnprev === 444){
		coilvolsum2 = 0;
		coilcursum2 = 0;
		coilpowsum2 = 0;
	}
	setField('Data031', coilvolsum2);
	setField('Data033', coilcursum2);
	setField('Data035', coilpowsum2);

cycleOnprev = Math.trunc(cycleOnprev / 10) + (100 * cycleOn);
}