There are quite a few problems with it, still.
I've attached a pic. On the left is AOZ, AMOS Pro on the right.
Here is the code:
cls 0
set paint 1
ink 2,4,5
bar 40,50 to 60,70
set pattern 3:set paint 1
bar 40,100 to 60,120
set pattern 5:set paint 0
ink 6,7,8
bar 70,100 to 90,120
The first pattern should be a solid fill, not pattern 4. It seems to be using the background ink colour as the pattern. The rest is correct.
The one below should be using ink colour 4 for the background (red). The foreground and border are correct (ink 2 and 5)
The one on the right should be a different pattern (it's using pattern 7), and be using colour 7 for the background. Ink 6 is correct for the foreground pattern colour, and the border is off, which is correct.