plothist & oplothist using separate function

Here is another pull request of the plothist that now uses separate function. This also now accepts many histograms like this
```
plothist(randn(100), "r--", 2randn(100), "k-", rand(100), [0.0 :0.1: 1.0], "b;", linewidth=5.0)
```