diff --git a/atari/plot/plot.c b/atari/plot/plot.c
index 19c34e257..3ebaaa281 100755
--- a/atari/plot/plot.c
+++ b/atari/plot/plot.c
@@ -49,6 +49,7 @@ struct s_view {
     short vis_w;            /* clipped to screen dimensions					*/
     short vis_h;            /* visible width								*/
     struct rect clipping;	/* clipping rectangle							*/
+    float scale;
 };
 
 /*
@@ -1899,6 +1900,16 @@ bool plot_get_dimensions(GRECT *dst)
 	return(true);
 }
 
+bool plot_set_scale(float scale)
+{
+    view.scale = scale;
+}
+
+float plot_get_scale()
+{
+    return(view.scale);
+}
+
 bool plot_clip(const struct rect *clip)
 {
 	GRECT canvas, screen, gclip, isection;