Announcement

Collapse
No announcement yet.

Consol modanity

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Consol modanity

    after CLS, how do I open the monitor in 25 rows by 80 columns mode?
    Because if I start the program, it opens a small window, insufficient for me.

  • #2
    CON.SCREEN <SET>

    Syntax
    CON.SCREEN = RowValue&, ColValue&

    Legacy Syntax
    CONSOLE SET SCREEN RowValue&, ColValue&
    I don't know that it will fill the monitor, it likely depends on font size.
    Rod
    I want not 'not', not Knot, not Knott, not Nott, not knot, not naught, not nought, but aught.

    Comment


    • #3
      Paolo,

      I quit using console programs for this reason.
      There is code all over the place on the forum.
      If one works all the time I'd also like to see it.
      High DPI settings and other issues.
      Example: 3840 x 2160 with scale and layout of 200%

      Google:
      Code:
      site:powerbasic.com console size
      How long is an idea?

      Comment


      • #4
        how do I open the monitor in 25 rows by 80 columns mode?
        Do you want a Console Window 25 x 80 or do you want to use the whole screen (aka 'Monitor') with giant characters?
        This code will resize the Console Window and associated screen buffers..
        Code:
        #Compile Exe        ' PBCC60
        #Dim All
        #Console On
        #Break On
        '------------------/
         
        Function PBMain () As Long
          ? "This is the default screen for:" Exe.Namex$
          Con.Print Using$("Screen Size # Rows by # Columns", Con.Screen.Row, Con.Screen.Col)
          
          ? "Any Key To CLS" : WaitKey$
          
          Con.Cls
         
          ? "Any Key To Reset size" : WaitKey$
         
          Con.Screen = 25, 80
          Con.Print Using$("Screen Size # Rows by # Columns", Con.Screen.Row, Con.Screen.Col)
         
          ? "Done"
         
          If Con.Handle Then
            ? "Any key to exit"
            WaitKey$
          End If
        End Function
        '------------------/PBMain
        Rgds, Dave

        Comment


        • #5
          Paolo,

          Are you using Windows 10 on a High Resolution screen? If so you can get a VERY small console window if the option 'Use legacy console' is selected.

          See these Windows Ten Forum instructions on how to set / unset.
          Rgds, Dave

          Comment

          Working...
          X