참고 : https://gist.github.com/twkang/4608424#file-lun2sol-js
country: 국가명(영문) | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
foreign-send: 해외 송금 환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
foreign-recv: 해외 받을 때 환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
cash-buy: 현찰 살 때 환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
cash-sell: 현찰 팔 때 환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
buy-tc: TC 구입 환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
standard / basic / default : 고시환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
bok / bank-of-korea : 한국은행 환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
us-calc : 달러대비 환율 | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
통화 | 살때 | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||
JPY | =getExchangeRate($A14,"cash-buy") | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||
GBP | =getExchangeRate($A14,"cash-buy") | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||
EUR | =getExchangeRate($A14,"cash-buy") |
function getDate(decrease) {
var date = new Date();
if(decrease && decrease > 0) {
date = new Date(date);
date.setDate(date.getDate() - decrease);
}
var yyyy = date.getFullYear().toString(),
dd = date.getDate().toString(),
mm = (date.getMonth() + 1).toString();
if(dd.length == 1) dd = '0' + dd;
if(mm.length == 1) mm = '0' + mm;
return yyyy + mm + dd;
}
var baseURL = 'https://spib.wooribank.com/pib/jcc?withyou=ENENG0358&__ID=c008822&BAS_DT=';
function getExchangeHash() {
var html = '';
var cache = CacheService.getPublicCache();
var cached = cache.get('exchange-rate-woori');
if (cached != null) {
html = cached;
} else {
var decrease = -1;
while(html.length == 0 || html.indexOf('Today\'s exchange rates are not notified') > -1) {
decrease++;
var url = baseURL + getDate(decrease);
var html = UrlFetchApp.fetch(url).getContentText();
}
cache.put('exchange-rate-woori', html, 3600); // cache for 1 hour
}
var hash = {};
var h = html.match(/<tbody[\s\S]*?<\/tr>/g).filter(function(tr) {
return tr.indexOf('<th') == -1;
});
h.map(function(tr) {
var data = tr.match(/\<td[\s\S]*?>*?\<\/(td|th)\>/gm).map(function(td) {
var datum = td.replace(/\<td[\s\S]*?\>|\<a[\s\S]*?\>|\<\/td\>|\<\/th\>|<\/a>|,/g, '').trim();
return (isNaN(parseFloat(datum)) ? datum : parseFloat(datum));
});
var key = data.shift();
hash[key] = {
'country': data[0],
'foreign-send': data[1],
'foreign-recv': data[2],
'cash-buy': data[3],
'cash-sell': data[4],
'buy-tc': data[5],
'standard': data[6],
'bank-of-korea': data[7],
'us-calc': data[8]
};
});
return hash;
}
function getExchangeRate(currency, type) {
if(!currency) currency = 'JPY';
var data = getExchangeHash();
if(!data.hasOwnProperty(currency)) {
throw 'Unexcepted currency: ' + currency;
} else if(!data[currency].hasOwnProperty(type)) {
throw 'Unexcepted type: ' + type;
}
return data[currency][type];
}
var cellConfig = {
'N3': ['JPY', 'standard'],
'O3': ['JPY', 'cash-buy'],
'N4': ['GBP', 'standard'],
'O4': ['GBP', 'cash-buy'],
'N5': ['EUR', 'standard'],
'O5': ['EUR', 'cash-buy'],
};
function setCellValue(cell, value, apply) {
SpreadsheetApp.getActiveSheet().getRange(cell).setValue(value);
if(apply) SpreadsheetApp.flush();
}
function reloadCell() {
for(var cell in cellConfig) {
if(cellConfig.hasOwnProperty(cell)) {
setCellValue(cell, 'Loading..', true);
var value = getExchangeRate.apply(null, cellConfig[cell]);
setCellValue(cell, value, true);
}
}
} |
번호 | 분류 | 제목 | 날짜 | 조회 수 |
---|---|---|---|---|
1084 | 회로도전자부품 | LCD1602 사양 및 아두이노 연결방법 | 2013.10.31 | 20364 |
1083 | AutoHotKey | ahk) 오토핫키 콤보박스 제어하기 | 2013.10.30 | 38186 |
1082 | AutoHotKey | autohotkey) 오토핫키에서 자주쓰는 함수모음 | 2013.10.30 | 33707 |
1081 | AutoHotKey | ahk) autohotkey 엑셀(Excel)에서 행값 증가시키기 | 2013.10.30 | 37426 |
1080 | AutoHotKey | ahk) autohotkey 글자 자르기 방법 | 2013.10.30 | 34679 |
1079 | AutoHotKey | ahk) 열려진 엑셀창의 값 불러오기 1 | 2013.10.30 | 32539 |
1078 | 회로도전자부품 | 555타이머의 Duty-Cycle을 55%이하로 사용시 회로도 | 2013.10.29 | 14613 |
1077 | 회로도전자부품 | 역기전력은 왜 입력전압보다 높게 나오는 이유(Volt Boost 원리) | 2013.10.26 | 20172 |
1076 | 회로도전자부품 | 주문한 부품 리스트 | 2013.10.26 | 20761 |
1075 | 회로도전자부품 | DC to DC 승압이론 | 2013.10.20 | 21329 |
http://urin79.com
우린친구블로그