UUE2DBG 2/3

 BBS: Inland Empire Archive
Date: 06-27-92 (16:11)             Number: 1513
From: MARK BUTLER                  Refer#: NONE
  To: ALL                           Recvd: NO  
Subj: UUE2DBG     2/3                Conf: (2) Quik_Bas
 >>> continued from previous message
    ELSE
        SCRFileName$ = FileName$ + ".SCR"
    END IF
 END FUNCTION

 SUB Twister (row%, col%, turn%)
    LOCATE row%, col%
    SELECT CASE turn%
        CASE 1
            PRINT "(|)";
        CASE 2
            PRINT "(/)";
        CASE 3
            PRINT "(-)";
        CASE 4
            PRINT "(\)";
    END SELECT
 END SUB

 --------------------------8< CUT HERE  8<----------------------------

 Well, that's all there is to that. The next message is the uue debug
 script file to recreate uue.arj.


 ---------> MHB :-)

... OFFLINE 1.39 * Time is but the stream I go a-fishing in
............................................................
..................


--- WM v2.03/91-0012
 * Origin: Com-Dat BBS  Hillsboro, OR.  HST (503) 681-0543 (1:105/314)
Outer Court
Echo Basic Postings

Books at Amazon:

Back to BASIC: The History, Corruption, and Future of the Language

Hackers: Heroes of the Computer Revolution (including Tiny BASIC)

Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution

The Advent of the Algorithm: The Idea that Rules the World

Moths in the Machine: The Power and Perils of Programming

Mastering Visual Basic .NET