If you look at the new code it does exactly what you need.
Take the time and effort to see how it works.
Since all you want are thin lines, get rid of the four "Line" statements after the remark ";Adustment" in the RRect() function.
Call the function twice like so:
x = 100
y = 100
wide = 400
high = 300
color 128,128,255 ;(light blue)
rad = 15
Rect (x, y, wide, high, rad)
color 0,0,255 ;(blue)
rad = 14
RRect (x, y, wide, high, rad)
Done!
It doesn't get any easier than that, the rest is up to you.
Suggest testing and studying before making judgements.
Take the time and effort to see how it works.
Since all you want are thin lines, get rid of the four "Line" statements after the remark ";Adustment" in the RRect() function.
Call the function twice like so:
x = 100
y = 100
wide = 400
high = 300
color 128,128,255 ;(light blue)
rad = 15
Rect (x, y, wide, high, rad)
color 0,0,255 ;(blue)
rad = 14
RRect (x, y, wide, high, rad)
Done!
It doesn't get any easier than that, the rest is up to you.
Suggest testing and studying before making judgements.