bmkg.sh

#!/bin/bash
# Widhisec | JANGAN DI RECODE GAN HARGAI PEMBUAT NYA!
GREEN=$(tput setaf 2) #HIJAU
RED=$(tput setaf 1) #MERAH
CYAN=$(tput setaf 6) #CYAN
WHITE=$(tput setaf 7) #PUTIH
NORMAL=$(tput sgr0) #NORMAL
gempa() {
       IpInfo=$(curl -Ls "http://data.bmkg.go.id/autogempa.xml" |
       tr -d '\n')
       info2=$(echo "${Ipinfo}" | grep -Po '(?<=<Wilayah2>).*?(?=<)')
       info3=$(echo "${IpInfo}" | grep -Po '(?<=<Wilayah4>).*?(?=<)')
       info4=$(echo "{$IpInfo}" | grep -oP '(?<=<Wilayah5>).*?(?=<)')
       info5=$(echo "${IpInfo}" | grep -Po '(?<=<Jam>).*?(?=<)')
       info6=$(echo "${IpInfo}" | awk -F"[<>]" '{print $9'})
       info7=$(echo "${IpInfo}" |awk -F"[<>]" '{print $25}')
       info8=$(echo "${IpInfo}" | awk -F"[<>]" '{print $29}')
       info9=$(echo "${IpInfo}" |awk -F"[<>]" '{print $45}')
       info10=$(echo "${IpInfo}" | awk -F"[<>]" '{print $37}')
       info11=$(echo "${IpInfo}" | awk -F"[<>]" '{print $53}')
       info12=$(echo "${IpInfo}" | grep -Po '(?<=<Potensi>).*?(?=<)')
}
tsunami() {
       Info=$(curl -sL "http://data.bmkg.go.id/lasttsunami.xml")
       tanggal=$(echo "${Info}" | grep -Po '(?<=<Tanggal>).*?(?=<)')
       jam=$(echo "${Info}" | grep -Po '(?<=<Jam>).*?(?=<)')
       A=$(echo "{$Info}" | grep -Po '(?<=<Lintang>).*?(?=<)')
       B=$(echo "${Info}" | grep -Po '(?<=<Bujur>).*?(?=<)')
       C=$(echo "${Info}" | grep -Po '(?<=<Kedalaman>).*?(?=<)')
       D=$(echo "${Info}" | grep -Po '(?<=<Area>).*?(?=<)')
       F=$(echo "${Info}" | grep -Po '(?<=<Magnitude>).*?(?=<)')
}
bannor() {
printf """
  ____  __  __ _  _______
 |  _ \|  \/  | |/ / ____|${CYAN}
 | |_) | \  / | ' / |  __
 |  _ <| |\/| |  <| | |_ |
 | |_) | |  | | . \ |__| |${GREEN}
 |____/|_|  |_|_|\_\_____|
    [ CREATE BY WIDHISEC ] ${NORMAL}
    [     BMKG INFO      ] ${WHITE}
"""
}
bannor
tsunami;
printf "[√] TANGGAL : %s\n" "$tanggal"
printf "[√] JAM : %s\n" "$jam"
printf "[√] LINTANG : %s\n" "$A"
printf "[√] BUJUR : %s\n" "$B"
printf "[√] DALAM : %s\n" "$C"
printf "[√] AREA : %s\n" "$D"
printf "[√] BESAR : %s\n" "$F"
sleep 5;clear