CLS

INPUT "Horisontal size (2 to 79):", hs
INPUT "Vertical size (2 to 23):", vs


FOR i = 1 TO hs         ' make top of the box
  PRINT "#";
NEXT i
PRINT

FOR y = 1 TO vs - 2     ' make main box area
  PRINT "#";
  FOR i = 1 TO hs - 2
    PRINT ".";
  NEXT i
  PRINT "#"
NEXT y

FOR i = 1 TO hs         ' make last line of the box
  PRINT "#";
NEXT i
PRINT