A Missing Link program? from MAD magazine...

[Nick99]

Ok, I found paper I wrote a long time ago together with a page from MAD magazine from 1985, I don´t know if it works!

I can´t test it on my TI because I don´t have Missing Link available on my TIPI yet.

I don´t remember much of Missing Link, but my guess is that I "ported" this to Missing Link from the Apple II and Atari code from the magazine back in the days.

 

Here is the little program, if there are someone able to try it and let me know what it do?

 

(BTW, on line 20, the CALL LINK("COLOR",7,1) was on the paper CALL LINK(COLOR,7,1), I don´t know if the one without quotes are right).

 

 

10 A=1.2 :: XC=150 :: YC=110

20 CALL SCREEN(16) :: CALL LINK("CLEAR") :: CALL LINK("COLOR",7,1)

30 READ X,Y,X1,Y1

40 IF X=999 THEN GOTO 90

50 FX=X*A+XC :: FY=199-(Y+YC)

60 LX=X1*A+XC :: LY=199-(Y1+YC)

65 CALL LINK("GETPEN",(FX-FY)-(LX,LY),2,1)

70 CALL LINK("GETPEN",(FX+1,FY)-(LX+1,LY),2,1)

80 GOTO 30

90 CALL LINK("CHSIZE",6,7) :: CALL LINK("PRINT",24,13,"What, Me Worry?")

100 CALL KEY

110 CALL SCREEN(15) :: CALL LINK("CLEAR")

120 CALL LINK("PRINT",12,23,"Copyright 1985 E. C. Publications")

130 CALL LINK("CLEAR")

150 END

 

 

[+Ksarul]

Oh Sparkdrummer, your friends are calling. . .

[HOME AUTOMATION]

Edited October 7, 2018 by HOME AUTOMATION

[Nick99]

30 failed.JPG

 

 

Ok, Thanks!

Well, now I can throw that paper...

[HOME AUTOMATION]

I tried to rework it a little...

But, No luck

so many works in progress???

[Tursi]

Yes, check these posts - we took a stab at it back in 2013:

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2803932-- TI BASIC version

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2803966-- Cartridge version (video)

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2804186-- The Missing Link (XB Extension for Bitmap)

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2804673-- RXB BLOAD version

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2804981-- TI BASIC CALL CHAR version

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2805164-- fbForth version

 

It's all in the same thread.

Edited October 7, 2018 by Tursi

[sparkdrummer]

Ah yes, Alfred E. My hero.

[senior_falcon]

@HOMEAUTOMATION

In post #5 you have line

65 CALL LINK ("GETPEN",(FX-FY)-(LX,LY),2,1)

 

From the Missing Link manual:

CALL LINK("GETPEN",row,column,angle)

Returns the current position of the turtle in the three numeric variables specified

Your line 65 fails for three reasons:

First, (LX,LY) is probably the source of the syntax error

Second, even if it weren't a syntax error, (FX-FY)-(LX,LY) is not a variable. GETPEN has no place to send the row.

Third, 2 and 1 are not variables so again GETPEN has no places to send the column and angle.

Line 70 has similar problems.

Edited October 8, 2018 by senior_falcon

[HOME AUTOMATION]

Hello senior_falcon,

Nice to hear from you.

While looking for the missing link files I came across the the manual for it. I never opened it. My experience is only watching the demo and perhaps dreaming of doing such things from assy. I only replaced line 10 to attempt to accomadate the parameters of line 30. Yes I gave up, at line 65. 100 CALL KEY, seems to be missing parameters as well... a dead give away this was "under development". I had ment to mention my lack of experience with XB or THE MISSING LINK. Long ago I programmed my automation systems in... TI BASIC, making heavy use of NUMERIC and STRING FUNCTIONS... SINGLE DIMENTION ARRAYS and the USER DEFINED FUNCTION. Basic's garbage collection routine caused short lockups more than a few times per minute. This was all to slow, awkward and I ran out of memory immediately. Upgrading to XB would have been expensive inadequate and uncertain. I gave up for years... some twenty years ago I got my hands on a MIMI MEMORY, I started learning ASSEMBLY LANGUAGE and gladly never looked back!

P.S. Thanks for the advice though!

[+Vorticon]

Yes, check these posts - we took a stab at it back in 2013:

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2803932-- TI BASIC version

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2803966-- Cartridge version (video)

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2804186-- The Missing Link (XB Extension for Bitmap)

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2804673-- RXB BLOAD version

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2804981-- TI BASIC CALL CHAR version

 

http://atariage.com/forums/topic/215138-bitmap-mode/?p=2805164-- fbForth version

 

It's all in the same thread.

 

Hey Tursi do you happen to have a VDP pattern file for that image by any chance?

[Tursi]

 

Hey Tursi do you happen to have a VDP pattern file for that image by any chance?

 

Not entirely sure if this is what you meant, but I ran up the Missing Link version and added a 'SAVEP' to the end of it to save off the image.

 

AEN_P.zip

[+Vorticon]

 

Not entirely sure if this is what you meant, but I ran up the Missing Link version and added a 'SAVEP' to the end of it to save off the image.

 

AEN_P.zip

 

Yes that's it. Thanks!