nikola-wan
Veteran Member
I've updated my Tektronix 4050 BASIC github repository folder on Battlestar Galactica with my Vipers on Patrol program and data files. I also updated the README to include the vector plot of Vipers on James Willing's "Computer Garage" website that I found in 2000 - that inspired me to digitize the Viper with my 4662 plotter digitizing pen and my 4050 BASIC program to capture the data, followed by my original Vipers program which stored the Viper data as ASCII DATA on tape.
I updated the Vipers program in 2018 after I joined vintage computer federation ([vcfed.org]) and found a 4051 Emulator written in javascript. This emulator didn't support accessing external files - so my 2018 update embedded the Viper vector data as BASIC DATA statements.
Now that I have the R12 Fast Graphics/Graphics Enhancement option ROM - I have updated the program to take advantage of R12 graphics performance as previously posted. I have posted both the latest R12 version and 2018 version plus R12 data file in my repo.
My 2018 BASIC program took over 58 seconds on the 1975 Tektronix 4051 vector graphics computer with 800KHz Motorola 6800 to display. My latest program below only takes 3.6 seconds to display all five Vipers on patrol on that same computer with the vintagetek.org MAXIROM pack which includes the R12 Fast Graphics option ROM!
Here is my new Viper R12 BASIC program listing:
Here is the Viper plot from the Computer Garage website (archive.org) that I used to start this journey and my screenshot from the 4051 javascript emulator with R12 and emulator of my Flash Drive.
And the link to my repo folder on Battlestar Galactica and Tektronix 4051 vector graphics computers:
https://github.com/mmcgraw74/Tektronix-4051-4052-4054-Program-Files/tree/master/Battlestar_Galactica-and_Tektronix_4051
I updated the Vipers program in 2018 after I joined vintage computer federation ([vcfed.org]) and found a 4051 Emulator written in javascript. This emulator didn't support accessing external files - so my 2018 update embedded the Viper vector data as BASIC DATA statements.
Now that I have the R12 Fast Graphics/Graphics Enhancement option ROM - I have updated the program to take advantage of R12 graphics performance as previously posted. I have posted both the latest R12 version and 2018 version plus R12 data file in my repo.
My 2018 BASIC program took over 58 seconds on the 1975 Tektronix 4051 vector graphics computer with 800KHz Motorola 6800 to display. My latest program below only takes 3.6 seconds to display all five Vipers on patrol on that same computer with the vintagetek.org MAXIROM pack which includes the R12 Fast Graphics option ROM!
Here is my new Viper R12 BASIC program listing:
Code:
250 INIT
260 WINDOW 0,130,0,100
270 PRINT " Battlestar Galactica - Vipers on Patrol"
280 FIND@5:3
290 DIM I$(321*3)
300 DATA 1.0,0,0,0.77,-1.5,29,0.54,-2,51, 0.35,-1.0,69,0.27,-4.2,81
310 FOR I=1 to 5
320 REM ignore Scale=S. X0,Y0 is object location
330 READ S,X0,Y0
340 REM G1,G2 is the Viper first vector beginning location
350 READ@5:G1,G2,I$
360 MOVE G1+X0,G2+Y0
370 CALL "RDRAW",I$,1,X0,Y0
380 NEXT I
390 END
Here is the Viper plot from the Computer Garage website (archive.org) that I used to start this journey and my screenshot from the 4051 javascript emulator with R12 and emulator of my Flash Drive.
And the link to my repo folder on Battlestar Galactica and Tektronix 4051 vector graphics computers:
https://github.com/mmcgraw74/Tektronix-4051-4052-4054-Program-Files/tree/master/Battlestar_Galactica-and_Tektronix_4051
Last edited: