Jump to content
IGNORED

The "funkheld" Question Thread


funkheld

Recommended Posts

While he might be an AI script (lol, bad joke), I think he could be an interactive learner... reading does not help him as much as being told and trying.. this is common to a larger degree than most would realize.

 

The problem isn't his method of learning... it's that a new thread is started every time and that's just bad etiquette, and is getting under the skin of a number of people on AA. This doesn't mean he should stop be admonished or relegated from AA. It does mean all of his threads need to be stuck in a single thread perhaps named like...

 

Learning ML, DLI, VBI interactions in Fast basic FunkHelp

 

I find him quirky in his ways and the wording is something else.. but he is learning something. No problem in everyone helping him out. I was pleased to see people pitching in. It's good to see explanations of why it's done and how. the only way we keep going is to help fresh people into the world of programming the Atari. (fresh does not mean young, but rather new to an area of the Atari)

Edited by _The Doctor__
Link to comment
Share on other sites

Hello, good evening.

With over 70 years you become quirky.

you are still young foxes and still have to learn to deal with quirky people, right?


The VBI makes me a problem in Fastbasic. In ACTION! and Madpascal, I managed to get both of them up and running with the CLI and VBI in one program. Maybe you can do it in Fastbasic sometimes. Whether it's vital, that's not the question but just to make something like that. I do not know the internal structure of fastbasic


.I do not want to do 1 + 1 = 2 with the Atari. but I want to go into depth.


greeting
Edited by funkheld
Link to comment
Share on other sites

Hello funkheld,

 

 

With over 70 years you become quirky.
you are still young foxes and still have to learn to deal with quirky people, right?

 

 

Ok. I'm 51, so age-wise nearer to you than to my children :-) I guess most of the folks here are at or around my age...

 

I didn't want to offend you with my post. It's just that some of your posts (e.g. http://atariage.com/forums/topic/283680-i-would-like-to-use-please-the-memory-in-the-atari800xl-of-c000-cfff-with-m/ or http://atariage.com/forums/topic/283774-as-i-find-in-fastbasic-a-startaddress-from-a-proc-for-a-vbi/) appear to me that you want us to do your homework. In the former example you should be aware what it means to turn off ROM to use the $C000..$CFFF area before you try to do that. That's why I said, "read documentation". In the latter one you seemingly use assembly language, again with apparently just cursory knowledge. Read docs about 6502 assembly language programming.

 

 

 

The VBI makes me a problem in Fastbasic. In ACTION! and Madpascal, I managed to get both of them up and running with the CLI and VBI in one program. Maybe you can do it in Fastbasic sometimes. Whether it's vital, that's not the question but just to make something like that. I do not know the internal structure of fastbasic
.I do not want to do 1 + 1 = 2 with the Atari. but I want to go into depth.

 

 

So, what are you trying to do? Are you "playing around" with ACTION, MadPascal, and Fastbasic? To decide which one to use for "going into depth"? Or "go into depth" with each of them?

 

 

regards,

chris

 

  • Like 1
Link to comment
Share on other sites

Hi!

 

Hello, good evening.

With over 70 years you become quirky.

you are still young foxes and still have to learn to deal with quirky people, right?

 

The VBI makes me a problem in Fastbasic. In ACTION! and Madpascal, I managed to get both of them up and running with the CLI and VBI in one program. Maybe you can do it in Fastbasic sometimes. Whether it's vital, that's not the question but just to make something like that. I do not know the internal structure of fastbasic

Just post your complete, working, Madpascal or Action source, we can help you port it to Fastbasic.

  • Like 1
Link to comment
Share on other sites

thanks

 

herre ist for ACTION! VSCROL with VBI in graphics(17)

 

now only the VSCROL needs to be called:
for x = 0 to 7
do
z = x
delay (1000)
od

 

these are the routines for VSCROL with VBI.

---------------------------------------

PROC VBLANKD()
vscrol=z
[JMPI OLDVEC]
RETURN
PROC SETVBV(CARD ADDR)
CARD POINTER TEMP
BYTE V
TEMP = $216 + 14
V = RTCLOCK+ 1
WHILE V <> RTCLOCK DO OD
TEMP^ = ADDR
RETURN
OLDVEC = VVBLKD
SETVBV(VBLANKD)
----------------------------------------
module
 
card 
start,
dlistadr,
VVBLKD = $224,
SDLST = $230,
OLDVEC
 
byte  
vscrol=$D405,
RTCLOCK = 20,
z,x,y
 
DEFINE JMPI = "$6C"
 
PROC VBLANKD()
  vscrol=z
  [JMPI OLDVEC]
RETURN
 
PROC SETVBV(CARD ADDR)
  CARD POINTER TEMP
  BYTE V
  TEMP = $216 + 14
  V = RTCLOCK+ 1
 
  WHILE V <> RTCLOCK DO OD
 
  TEMP^ = ADDR
RETURN
 
proc delay(card z)
  card i
 
  for i=0 to z
  do
  od
return 
 
proc main()
card savmsc=$58      
card sdlst=$230
 
graphics(17)
 
OLDVEC = VVBLKD
SETVBV(VBLANKD)
 
start = savmsc
dlistadr=sdlst
  
for z=0 to 79
do
poke(start+z,z)
od
 
poke(dlistadr+3,$66)
poke(dlistadr+6,$26)
poke(dlistadr+7,$26)
 
for x=0 to 7
do
z=x
delay(1000)
od 
 
z=0
 
for x=0 to 7
do
z=7-x
delay(1000)
od 

do
od
return
Edited by funkheld
Link to comment
Share on other sites

Hi!

 

thanks

 

herre ist for ACTION! VSCROL with VBI in graphics(17)

THis is a direct translation of your Action program to FastBasic:

 

VVBLKD = $224
SDLST  = $230
savmsc = $58

'                     LDA $0  STA $D405   JMP $0000
data vblankd() byte = $A9,$00,$8D,$05,$D4,$4C,$00,$00
z = adr(vblankd)+1

PROC SETVBV
  dpoke Adr(vblankd)+6, dpeek(VVBLKD)
  pause 0
  dpoke VVBLKD, Adr(vblankd)
ENDPROC

proc main

  graphics 17

  exec SETVBV

  start = dpeek(savmsc)
  dlistadr = dpeek(SDLST)

  for x=0 to 79
    poke start+x, x
  next

  poke dlistadr+3, $66
  poke dlistadr+6, $26
  poke dlistadr+7, $26

  do

  for x=0 to 7
    poke z, x
    pause 2
  next

  poke z, 0

  for x=0 to 7
    poke z, 7-x
    pause 2
  next

  loop
endproc

Exec main
And I will repeat again, using a VBI for writing the VSCROL register is a bad idea, it complicates the code and makes it slower.

 

Compare with this equivalent program:

SDLST  = $230
savmsc = $58
VSCROL = $D405

'                     LDA $0  STA $D405   JMP $0000
proc main

  graphics 17

  start = dpeek(savmsc)
  dlistadr = dpeek(SDLST)

  for x=0 to 79
    poke start+x, x
  next

  poke dlistadr+3, $66
  poke dlistadr+6, $26
  poke dlistadr+7, $26

  do

  for x=0 to 7
    pause 0 : poke VSCROL, x
    pause 1
  next

  for x=0 to 7
    pause 0 : poke VSCROL, 7-x
    pause 1
  next

  loop
endproc

Exec main
  • Like 2
Link to comment
Share on other sites

hello thank you for your endurance and work. I would like to run something independent in Fastbasic

Your example is small and simple and has a big impact in Fastbasic. Maybe I'm the only one who comes up with such an idea, the Fastbasic so ausure.

In this example, you realize again that the fastbasic is something special.


Thank you.

greeting

Link to comment
Share on other sites

@funkheld, it has been said before, but could you please start ONE single thread, like funkheld's adventures in Atari-land or something and just add your questions to that thread. Just this month (barely half has passed) you started 22 threads!!

 

Edit: I do appreciate thought that you did it on the programming forum and not the main one ;)

Edited by ivop
Link to comment
Share on other sites

he is words order mixed up speaking, he wants cart init disk boot return to action... this how it the language carts, express car, music cart etc, maybe atari writer carts work.. he found whatever.atr doesn't work... he needs to make sure atr format and dos are compatible the he can save and load other modules/programs etc..

Edited by _The Doctor__
Link to comment
Share on other sites

Hi good afternoon.



I would like to please the sentence:

AAAAAAAAAA

Slide 32x pixels to the right and then 32x pixels to the left.


then I want to scroll the sentence over the zoom screen so that it disappears.


I can only 8x pixel hscrol.


gr. 17 no print !!!

text just poke



Thank you.

greeting





[code]

dlist =560
savmsc=$58
vscrol=$d405
hscrol=$d404

gr. 17

ramadr=dpeek(savmsc)

dl=dpeek(dlist)
poke dl+3,$56

for z=0 to 4
poke ramadr+z,0
next z
for z = 5 to 15
Poke ramadr+z,33
next z

for z=0 to 5
for a=0 to 8
pause 5
pause 0
poke hscrol,a
next a

for a=0 to 8
pause 5
pause 0
poke hscrol,8-a
next a
next z

repeat
until key()

end

Edited by funkheld
Link to comment
Share on other sites

> I can only 8x pixel hscrol.

 

To scroll more that eight pixels you have to modify the screen memory start address of the line to scroll in your display list.

 

Like I said before: Please read the documentation.

You said before that you are retired and have much time to ask questions. How about using your time to learn about the system?

Asking questions for every simple thing wastes the time of everyone, and they (me at least) don't have that much time...

 

regards,

chris

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...