Jump to content

Search the Community

Showing results for tags 'TurboForth'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Atari Systems
    • Atari 2600
    • Atari 5200
    • Atari 7800
    • Atari Lynx
    • Atari Jaguar
    • Dedicated Systems
    • Atari 8-Bit Computers
    • Atari ST/TT/Falcon Computers
  • Gaming General
    • Classic Gaming General
    • Classic Computing
    • Modern Gaming
    • Prototypes
    • Arcade and Pinball
    • Emulation
    • Hardware
    • Gaming Publications and Websites
    • International
  • Marketplace
  • Community
  • Game Programming
  • Site
  • Classic Gaming News
  • The Club of Clubs's Discussion
  • I Hate Sauron's Topics
  • 1088 XEL/XLD Owners and Builders's Topics
  • Atari BBS Gurus's Community Chat
  • Atari BBS Gurus's BBS Callers
  • Atari BBS Gurus's BBS SysOps
  • Atari BBS Gurus's Resources
  • Atari Lynx Programmer Club's CC65
  • Atari Lynx Programmer Club's ASM
  • Atari Lynx Programmer Club's Lynx Programming
  • Atari Lynx Programmer Club's Music/Sound
  • Atari Lynx Programmer Club's Graphics
  • The Official AtariAge Shitpost Club's Shitty meme repository
  • The Official AtariAge Shitpost Club's Read this before you enter too deep
  • Tesla's Vehicles
  • Tesla's Solar
  • Tesla's PowerWall
  • Tesla's General
  • Harmony/Melody's General
  • ZeroPage Homebrew's Discussion
  • Furry Club's Chat/RP
  • PSPMinis.com's General PSP Minis Discussion and Questions
  • PSPMinis.com's Reviews

Blogs

There are no results to display.

There are no results to display.

Calendars

  • AtariAge Calendar
  • The Club of Clubs's Events
  • Atari BBS Gurus's Calendar
  • ZeroPage Homebrew's Schedule

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website


Facebook


Twitter


Instagram


YouTube


eBay


GitHub


Custom Status


Location


Interests


Currently Playing


Playing Next

Found 5 results

  1. I decided to move my explorations into TurboForth Assembler to a different thread (this one) rather than hijacking another thread. My post here (http://www.atariage....ost__p__2415039) alludes to my current project, viz., implementing Tursi's TMS9900-Assembler-coded 14-bit countdown timer (http://www.atariage....ost__p__2021341) using the TMS9901 Programmable Systems Interface and based on Thierry Nouspikel's code ("TMS9901" link at http://www.nouspikel...titechpages.htm). My two Forth words have the same name as Tursi's TMS9900 Assembler code: INIT01 to start the timer and READ01 to get its current value. My TurboForth Assembler code follows: ASM: INIT01 ( --- ) R12 R2 MOV, \ Save return address R12 CLR, \ CRU base of the TMS9901 0 SBO, \ Enter timer mode R1 $3FFF LI, \ Maximum value R12 INCT, \ Address of bit 1 R1 14 LDCR, \ Load value R12 DECT, 0 SBZ, \ Exit clock mode, start decrementer R2 R12 MOV, \ Restore return address ;ASM ASM: READ01 ( --- n ) R12 R2 MOV, \ Save return address R12 CLR, \ CRU base of the TMS9901 0 SBO, \ Enter timer mode SP INCT, \ Make space on stack to leave timer value *SP 15 STCR, \ Read current value (plus mode bit) and put on stack *SP 1 SRL, \ Get rid of mode bit 0 SBZ, \ Exit clock mode, decrementer continues R2 R12 MOV, \ Restore return address ;ASM Both words seem to compile OK. INIT01 appears to work, but I cannot tell for sure because executing READ01 causes a stack underflow, which baffles me. Any ideas as to what is wrong? ...lee
  2. Mark (or anyone)... I cannot find any documentation about using the TurboForth word JOYST except in the TF v1.1 Release Notes: JOYST ( jstick# -- value) modified to invert the returned value, making decoding much simpler. JOYST also resets the screen blanking counter in the console interrupt routine to prevent screen blanking. Unfortunately, this is not very helpful to me. In TI Forth, three values are left on the stack (ASCII, xpos, ypos). I have no idea how to use TF's word. I cannot even get it to respond with a value other than 0 when I use it in a loop in the emulators for joystick #1, i.e., 1 JOYST . I am trying to use the keyboard emulation of joystick #1 (Q,W,E,R,S,D,Z,X,C). ...lee
  3. This experimental apparatus monitors various types of events in your body and brain. Get latest version of Classic99. Choose TurboForth 1.2.1 by Mark Wills. Type, or copy and paste program listing. Enjoy. VARIABLE COL CREATE COLS 30 CHARS ALLOT : >COLS ( value offset -- ) COLS + C! ; : <COLS ( offset -- n ) COLS + [email protected] ; : CHART 1 GMODE 14 SCREEN 4 4 0 COLOR 5 1 0 COLOR DATA 8 $0000 $0400 $0000 $0000 $0000 $0400 $0000 $1F1F 32 DCHAR DATA 8 $0000 $0400 $1F1F $0000 $0000 $1F1F $0000 $0000 34 DCHAR DATA 4 $1F1F $0400 $0000 $0000 36 DCHAR DATA 8 $040E $1F04 $0404 $0C04 $0404 $1C04 $0404 $0C04 40 DCHAR DATA 8 $0404 $1F04 $0400 $0000 $0000 $FF44 $0400 $0000 42 DCHAR DATA 4 $0406 $FF46 $0400 $0000 44 DCHAR 40 0 V! 1 0 41 22 VCHAR 42 736 V! 23 1 43 30 HCHAR 44 767 V! 30 0 DO 30 I >COLS LOOP BEGIN 30 RND COL ! 1 COL @ 1+ 32 22 VCHAR 19 COL @ <COLS 2 >> - COL @ 1+ COL @ <COLS 3 AND 33 + 1 HCHAR 2 RND 0 = IF -1 ELSE 1 THEN COL @ <COLS + 63 AND COL @ >COLS AGAIN ; CHART
  4. All... We have had quite a discussion on the YaHoo! TurboForth forum regarding floating point math and transcendental functions using it. I want to bring some of it over here, particularly because I am having trouble posting there. Rob Van Orden, Willsy and I have been going at the TF code pretty hot and heavy. In a bit, I will post the TF BLOCKS file we have been working on. Right now, a glass of wine and my Love beckon! Feel free to jump in anytime! ...lee
  5. EDIT: NEVERMIND!!! I simply copied the TIFile to the DSk file and that worked. Even though when I open the DSK file called BLOCKS.DSK with the TIFILE BLOCKS copied to it, it shows up as BLOCKS.DSK so it looks like BLOCKS.DSK is a file on BLOCKS.DSK, but when I mount it as DSK1 via TI99DIR and load up TurboForth, it works! When i opened up my original BLOCKS.DSK file to see what was on it (one I created from scratch within forth) i saw anothe BLOCK.DSK file in there so i decided to try this new approach. ____________________________________________________________________ I have a TI file (Thanks Willsy) for Turboforth called BLOCKS. I want to load it on to my nanopeb CF card as a DSK file. Using TI99DIR - I created a blank dsk but everytime i attempt to copy a file to it I get a "Disk is full" error. I've attempted different formats even the 1600 special format for the CF7. I don't recall having this issue in the past (copying files back and forth in TI99DIR. so I'm kind of at a loss. I attempted to use TIImageTool but it cannot open the TIFile or the special formatted DSK file. I can create and use my own black block file using instructions Willsy provided but I'd like to start using forth with his environment since it's full of utils and demos. I'd rather not use it in emulation since I can't seem to get his TIFiles into DSK format and that would mean everything I do would be stuck in emulation. Is there a utility to convert tifiles in to dsk files that will work on the nano?
×
×
  • Create New...