#!/bin/csh

# ----------------
# Create Scale Bar
# ----------------

# Set Parameters
# --------------
  set DPAR    = "-D2.5/-0.8/2.0/0.30h"
  set DPAR    = "-D7.5/-2.4/6.0/0.45h"
  set CPAR    = "-Cmmi10.cpt"
  set SPAR    = "-X+2.0 -Y+3.0"
  set SPAR    = "-X-3.0 -Y+6.0"

  gmtset        COLOR_MODEL RGB
  gmtset        LABEL_FONT_SIZE  10p
  gmtset        HEADER_FONT_SIZE 24p
  gmtset        ANOT_FONT_SIZE   16p
  gmtset        LABEL_FONT_SIZE  16p
  gmtset        PAPER_MEDIA letter

# Plot SCALE
# ----------
  psscale $DPAR $CPAR $SPAR -B002:"Shaking Intensity (MMI)": -P >  scale.ps

# Clean Up
# --------

