//program ini sudah dimodifikasi dengan 4 data yang dikirim ke thingspeak
//saat percobaan hanya digunakan sensor pressure di A0
//field1 dan 2 pakai data dari sensor pressure
//field3 dan 4 pakai bilangan acak utk trial koneksi to thingspeak
//modified by gedeasetiawan@yahoo.com 15 Mei 2023
//
// Simple demo for feeding some random data to Pachube.
// 2011-07-08 <jc@wippler.nl>
// License: GPLv2
// Handle returning code and reset ethernet module if needed
// 2013-10-22 hneiraf@gmail.com
// Modifing so that it works on my setup for www.thingspeak.com.
// Arduino pro-mini 5V/16MHz, ETH modul on SPI with CS on pin 10.
// Also added a few changes found on various forums. Do not know what the
// res variable is for, tweaked it so it works faster for my application
// 2015-11-09 dani.lomajhenic@gmail.com
#include <EtherCard.h>
// change these settings to match your own setup
//#define FEED "000"
#define APIKEY "N3JG5CU3O8TA9B86" // put your key here
// ethernet interface mac address, must be unique on the LAN
static byte mymac[] = { 0x74,0x69,0x69,0x2D,0x30,0x31 };
const char website[] PROGMEM = "api.thingspeak.com";
byte Ethernet::buffer[700];
uint32_t timer;
Stash stash;
byte session;
//timing variable
int res = 100; // was 0
//------------------------------------pressure-----------------------
float inputpressure = A0;
//lcd
#include <Wire.h>
#include <LiquidCrystal_I2C.h>
LiquidCrystal_I2C lcd(0x27, 16, 2);
// defenisi variabel
float bacapressure;
float rumus;
float konstan = 0.13158; //??
float maxi = 935; //output byte saat dikasi pressure pada range maximal
float zero = 1; //(kalo kekecilan hasil psi-nya, ini naikkan) paling 168
float range = 15; //range maximal sensor
//-----------------------------------------------------------
void initialize_ethernet(void){
for(;;){ // keep trying until you succeed
//Reinitialize ethernet module
//pinMode(5, OUTPUT); // do notknow what this is for, i ve got something elso on pin5
//Serial.println("Reseting Ethernet...");
//digitalWrite(5, LOW);
//delay(1000);
//digitalWrite(5, HIGH);
//delay(500);
// Change 'SS' to your Slave Select pin, if you arn't using the default pin
if (ether.begin(sizeof Ethernet::buffer, mymac, SS) == 0){
Serial.println( "Failed to access Ethernet controller");
continue;
}
if (!ether.dhcpSetup()){
Serial.println("DHCP failed");
continue;
}
ether.printIp("IP: ", ether.myip);
ether.printIp("GW: ", ether.gwip);
ether.printIp("DNS: ", ether.dnsip);
if (!ether.dnsLookup(website))
Serial.println("DNS failed");
ether.printIp("SRV: ", ether.hisip);
//reset init value
res = 180;
break;
}
}
void setup () {
Serial.begin(9600);
Serial.println("\n[Hotel Platform Process Monitoring]");
//Initialize Ethernet
initialize_ethernet();
lcd.begin(); //lcd inisiasi
pinMode(inputpressure, INPUT); //untuk pressure sensor ------------------------------------------
}
void loop () {
//if correct answer is not received then re-initialize ethernet module
if (res > 220){
initialize_ethernet();
//------------------------------------pressure-----------------------
bacapressure = analogRead(inputpressure);
rumus = ((bacapressure-zero)*(range/(maxi-zero))); //rumus kalkulasi pressure dlm satuan psig
//if (rumus < 0) rumus = 0;
//Serial.print("Data asli: ");
//Serial.print(bacapressure);
//Serial.print(" Pressure: ");
//Serial.println(rumus);
//Serial.println("-------------");
lcd.setCursor(0,0);
lcd.print("Pressure Gauge");
lcd.setCursor(0,1);
lcd.print(rumus);
lcd.print(" psig ");
delay(200);
//------------------------------------pressure-----------------------
}
res = res + 1;
ether.packetLoop(ether.packetReceive());
//200 res = 10 seconds (50ms each res)
if (res == 200) {
// Generate random info
float demo = random(0,500);
word one = random(500,1000);
String msje;
if (demo < 250){
msje = "low";
}
else{
msje = "high";
}
// generate two fake values as payload - by using a separate stash,
// we can determine the size of the generated message ahead of time
// field1=(Field 1 Data)&field2=(Field 2 Data)&field3=(Field 3 Data)&field4=(Field 4 Data)&field5=(Field 5 Data)&field6=(Field 6 Data)&field7=(Field 7 Data)&field8=(Field 8 Data)&lat=(Latitude in Decimal Degrees)&long=(Longitude in Decimal Degrees)&elevation=(Elevation in meters)&status=(140 Character Message)
byte sd = stash.create();
stash.print("field1=");
stash.print(bacapressure);
stash.print("&field2=");
stash.print(rumus);
stash.print("&field3=");
stash.print(demo);
stash.print("&field4=");
stash.print(one);
stash.save();
//Display data to be sent
Serial.println();
Serial.print("Pressure Gas Lift: ");
Serial.println(bacapressure);
Serial.print("Pressure Gross: ");
Serial.println(rumus);
Serial.print("Pressure OGOL Juliet: ");
Serial.println(demo);
Serial.print("Pressure OGGL Juliet: ");
Serial.println(one);
// generate the header with payload - note that the stash size is used,
// and that a "stash descriptor" is passed in as argument using "$H"
Stash::prepare(PSTR("POST /update HTTP/1.0" "\r\n"
"Host: $F" "\r\n"
"Connection: close" "\r\n"
"X-THINGSPEAKAPIKEY: $F" "\r\n"
"Content-Type: application/x-www-form-urlencoded" "\r\n"
"Content-Length: $D" "\r\n"
"\r\n"
"$H"),
website, PSTR(APIKEY), stash.size(), sd);
// send the packet - this also releases all stash buffers once done
session = ether.tcpSend();
// added from: http://jeelabs.net/boards/7/topics/2241
int freeCount = stash.freeCount();
if (freeCount <= 3) { Stash::initMap(56); }
}
const char* reply = ether.tcpReply(session);
if (reply != 0) {
res = 0;
Serial.println(F(" >>>REPLY recieved...."));
// Serial.println(reply);
}
delay(300);
}
No comments:
Post a Comment