TIP: Click on subject to list as thread! ANSI
echo: qedit
to: ALL
from: CHRIS SHUFFETT
date: 1998-01-13 23:01:00
subject: TSE 2.8 Bugs

From: Chris Shuffett 
I recently switched PCs and installed TSE v2.80b.  I am running Win 95 and =
my config.sys file reads:
DEVICE=3DC:=5CWINDOWS=5CHIMEM.SYS
DEVICE=3DC:=5CWINDOWS=5CEMM386.EXE NOEMS
SHELL=3DC:=5CCOMMAND.COM C:=5C /P /E:1536
DOS=3DHIGH,UMB
BUFFERS=3D40,0
FILES=3D50
I created a MS-DOS program .pif file in the =5CTSE32 directory and created =
a shortcut for it in the desktop folder.  I invoke the editor from the =
Office toolbar.  I have set my screen resolution at 800 x 600 pixels.  I =
run in a normal window with both font types.  Initial font size is 5 x 12 =
which allows two 80 column editor windows to fit side by side with minimal =
overlap.  Initial size 43 lines, usage window, restore settings on =
startup.
My first problem was that I was getting out of memory errors when I would =
try to invoke the editor multiple times.  The problem was sporadic.  =
Eventually I solved it by changing the initial environment from Auto to =
1536.
My next problem was in running one of my games.  I have created a =
demonstration program to analyze the problem.
forward
proc banner()
forward
proc graphics_demo()
proc main()
    integer mode =3D Query(CurrVideoMode) // Save the video mode
    banner()
    // Save the banner page
    PopWinOpen(1, 1, Query(ScreenCols), Query(ScreenRows), 1, =22=22, 0)
    if mode  _25_lines_
        Set(CurrVideoMode, _25_lines_)
    endif
    graphics_demo() // Display video demonstration
    if mode  _25_lines_
        Set(CurrVideoMode, mode) // Restore video mode
    endif
    PopWinClose() // Restore banner page
    delay(50)
    UpdateDisplay(_ALL_WINDOWS_REFRESH_) // Redraw the screen
end
proc banner() // Create wallpaper and title box
    integer sub1 =3D 1
           ,last_line =3D Query(ScreenRows)
    while not(sub1 > last_line)
        VGotoXY(1, sub1)
        Putstr(Format(=22=22 : 80 : =22=A4=22))
        sub1 =3D sub1 + 1
    endwhile
    sub1 =3D last_line / 2 - 1
    while not(sub1 > last_line / 2 + 4)
        VGotoXY(25, sub1)
        Putstr(Format(=22=22 : 30))
        sub1 =3D sub1 + 1
    endwhile
    VGotoXY(31, last_line / 2 + 1)
    Putstr(=22TSE 2.8 Video Test=22)
    delay(50)
end
proc graphics_demo()
    ClrScr() // Show first and last line
    VGotoXY(1, 1)
    Putstr(=22This is line 1=22)
    VGotoXY(1, 25)
    Putstr(=22This is line 25=22)
    delay(50)
    ClrScr() // All lines should be cleared
    VGotoXY(31, 13)
    Putstr(=22Screen Cleared=22)
    delay(50)
end
The first execution fails to restore the banner page.  The next time fails =
to restore the banner page and to restore 43 line mode.  The next time =
puts line 1 on line 2 and fails to erase line 25.  Then if I change the =
video mode back to 43 lines and try to switch to full screen I get the =
message =22This program must be run in a Window, not in a full screen.  =
Your display does not support the screen size currently set by the =
program.=22  Then if I shell to DOS I can switch to full screen and =
restore the 43 line editor session.  I am able to create other video =
problems by experimenting with the video commands in this way  but I think =
that this description is sufficient for isolating the problems.
The demonstration program performs correctly under TSE 2.0.  From my =
experience, I recommend not maximizing the editor=27s Window and experiment=
ing with the restore settings on startup flag for best customization =
results.
---
---------------
* Origin: apana>>>>>fidonet [sawasdi.apana.org.au] (3:800/846.13)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.