Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/bash
- clear
- useragent="Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US) AppleWebKit/525.19 (KHTML, like Gecko) Chrome/1.0.154.53 Safari/525.19"
- banner() {
- printf " }--O--{"
- printf " [^]"
- printf " /ooo\"
- printf " ______________:/o o\:______________"
- printf " |=|=|=|=|=|=|:A|":|||:"|A:|=|=|=|=|=|=|"
- printf " ^""""""""""""""!::{o}::!""""""""""""""^"
- printf " \ /"
- printf " \.../"
- printf " ____ "---" ____"
- printf " |\/\/|=======|*|=======|\/\/|"
- printf " :----" /-\ "----:"
- printf " /ooo\"
- printf " #|ooo|#"
- printf " \___/"
- }
- menu() {
- printf "(1).Gempa Dirasakan"
- printf "(2).Tsunami"
- printf "(3).Gempa Terkini"
- echo ""
- read -p "Pilih : " babang;
- echo ""
- if [ $babang = 1 ]
- then
- echo "Gempa Dirasakan"
- gempa_dirasakan
- fi
- elif [[ $babang = 2 ]]; then
- echo "Tsunami"
- Tsunami
- fi
- elif [[ $babang = 3 ]]; then
- echo "Gempa Terkini"
- gempa_terkini
- fi
- }
- gempa_dirasakan() {
- curl -s -A "$useragent" "http://data.bmkg.go.id/gempadirasakan.xml" >> aw
- if [[ -z $(cat aw) ]]; then
- echo "Terjadi Kesalahan / error !"
- else
- echo "Tanggal : $(cat aw | grep -Po '(?<=<Tanggal>).*?(?<=)')"
- echo "Posisi : $(cat aw | grep -Po '(?<=Posisi>).*?(?<=)')"
- fi
- }
- Tsunami() {
- curl -s -A "$useragent" "http://data.bmkg.go.id/lasttsunami.xml" >> aw1
- if [[ -z $(cat aw1) ]]; then
- echo "Terjadi Kesalan / error !"
- else
- echo "Tanggal : $(cat aw1 | grep -Po "(?<=<Tanggal>).*?(<=)")"
- echo "Jam : $(cat aw1 | grep -Po "(?<=<Jam>).*?(<=)")"
- echo "Area : $(cat aw1 | grep -Po "(?<=<Area>).*?(<=)")"
- fi
- }
- gempa_terkini() {
- curl -s -A "$useragent" "http://data.bmkg.go.id/en_gempaterkini.xml" >> aw2
- if [[ -z $(cat aw2) ]]; then
- echo "Terjadi Kesalahan / error"
- else
- echo "Tanggal : $(cat aw2 | grep -Po "(?<=<Tanggal>).*?(?<=)")"
- echo "Wilayah : $(cat aw2 | grep -Po "(?<=<Wilayah>).*?(?<=)")"
- echo "Koordinat : $(cat aw2 | grep -Po "(?<=<coordinates>).*?(?<=)")"
- fi
- }
- banner
- menu
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement