Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - badger

Pages: [1] 2 3 ... 10
1
QB64 Discussion / Re: Test this and chat with me
« on: November 10, 2020, 04:59:07 pm »
Hello

I get a black screen that says "[Steve's Mini Messenger]" then my comput will just lock up for a couple of minutes then i get bad file mode in line six.

Badger

2
Programs / Re: Pipe Console Output to QB64 program!
« on: November 03, 2020, 03:54:05 pm »
Hello

Sorry just saw your post. there is what i mean. It does not give me the paging option it just goes to the end of the task and exits.

Badger

Code: QB64: [Select]
  1. DECLARE LIBRARY "pipecom"
  2.     FUNCTION pipecom$ (cmd AS STRING)
  3.  
  4.  
  5. 'F = pipecom("dir *.BAS")
  6. F = pipecom("dir /b /s /p*.BAS") 'if you need just the filenames and not the rest of the output
  7.  
  8.  
  9.  
  10.  

3
Programs / Re: Pipe Console Output to QB64 program!
« on: November 02, 2020, 03:10:19 pm »
Hello

Does not look like you can use /P in there I have been trying that but it just goes to the end of the data and ends. Is that what it is supposed to do

Badger

4
Hey

Why did you just pic numbers in the pb array 20 to 24 to be the numbers drawn.

Badger

5
SpriggsySprigs

i copied your code but get illegal string number conversion on this code. If i rem it out it just does it on the next instance.
 pok = pokeint(exe, _OFFSET(pokval) + l, l)

Badger

6
Hey

Repost the code if you would ok .. want to see if i can pick out the differences

Badger

7
Hello

I did not mean to start a competition rotf but it was fun to watch. I was going to rewrite it using arrays and such on the same principal. If you dont need to peek and poke it is a good idea to not. but i just wanted a little more understanding of what he was doing. both programs are really cute.

Badger

8
QB64 Discussion / Re: hello need to know what this is doing
« on: October 26, 2020, 05:02:08 pm »
Hello

I think i know what the lottery program is doing with the peeks and pokes

he first pokes the value 1 to 50. In address 5000 1 to 59

then generates a random number by x= int(rnd*59)+1
then in the next line he compares the value of x to that value by using peek to make sure there is no zero or duplicates in his number

Correct ????

Badger

9
QB64 Discussion / Re: hello need to know what this is doing
« on: October 26, 2020, 04:50:18 pm »
SpriggsySpriggs


what do these const values mean if i may ask ...

Badger

I dont mean to ask for a lesson but that is what i might be asking LOL



Code: QB64: [Select]
  1.  
  2. CONST PROCESS_VM_READ = &H0010
  3. CONST PROCESS_QUERY_INFORMATION = &H0400
  4. CONST PROCESS_VM_WRITE = &H0020
  5. CONST PROCESS_VM_OPERATION = &H0008
  6. CONST STANDARD_RIGHTS_REQUIRED = &H000F0000
  7. CONST SYNCHRONIZE = &H00100000
  8. CONST PROCESS_ALL_ACCESS = STANDARD_RIGHTS_REQUIRED OR SYNCHRONIZE OR &HFFFF
  9.  
  10. CONST TH32CS_INHERIT = &H80000000
  11. CONST TH32CS_SNAPHEAPLIST = &H00000001
  12. CONST TH32CS_SNAPMODULE = &H00000008
  13. CONST TH32CS_SNAPMODULE32 = &H00000010
  14. CONST TH32CS_SNAPPROCESS = &H00000002
  15. CONST TH32CS_SNAPTHREAD = &H00000004
  16. CONST TH32CS_SNAPALL = TH32CS_SNAPHEAPLIST OR TH32CS_SNAPMODULE OR TH32CS_SNAPPROCESS OR TH32CS_SNAPTHREAD
  17.  

10
QB64 Discussion / Re: hello need to know what this is doing
« on: October 26, 2020, 04:27:59 pm »
Hello

This is the code the first post is from .. looking over it again i know what it does but i need to know how and what the peek and poke statements are doing.

Badger

Code: QB64: [Select]
  1. REM A Powerball drawing program by Martin VandenHurk.
  2. a$ = TIME$
  3. PRINT "Drawing..."
  4. FOR l = 1 TO 59
  5.     POKE 5000 + l, l
  6. FOR l = 1 TO 59
  7.     PRINT PEEK(5000 + l);
  8. PRINT "Now drawing powerball numbers..."
  9. ct = 1
  10. here:
  11. x = INT(RND * 59) + 1
  12. IF PEEK(5000 + x) <> 0 THEN r(ct) = x: POKE 5000 + x, 0: GOTO there
  13. GOTO here
  14. there:
  15.  
  16. ct = ct + 1
  17.  
  18. IF ct = 6 THEN GOTO done ELSE GOTO here
  19. done:
  20. PRINT "Here are your 5 Powerball numbers:"
  21. FOR ct = 1 TO 5
  22.     PRINT r(ct);
  23. PRINT "The red Powerball number is:";
  24. PRINT INT(RND * 35) + 1
  25. PRINT "time started  : "; a$
  26. PRINT "time completed: "; TIME$
  27.  
  28.  
  29.  

11
Hello

I know nothing of peek and poke could some one tell me what this is doing

Badger

Code: QB64: [Select]
  1. FOR il = 1 TO 59
  2.     POKE 5000 + il, il
  3. FOR il = 1 TO 59
  4.     PRINT PEEK(5000 + il);
  5.  

12
QB64 Discussion / Re: QB64 NOT RELIABLE
« on: October 25, 2020, 08:14:27 pm »
Hello

Condemned with out rebuttle. Please allow the wizards here help with your problems before you burst out with the such an angered rant. PLEASE PLEASE EXPLAIN YOUR PROBLEM AND ALLOW THESE PEOPLE TO HELP. You will not go wrong.

Badger

13
Hello

I bought avast for a reason. I usally use there free versions which is enough but i now have a public ip address and i run through a vpn but i wanted the extra coverage that the paid version of avast gives me.

Badger

14
QB64 Discussion / Re: need help for qb64
« on: October 24, 2020, 07:54:53 pm »
Hello

that seems to be the problem i add all the folders and such to avast's exclude list and now i can compile and run programs..

Thanks guys for your quick help

Badger

15
QB64 Discussion / Re: need help for qb64
« on: October 24, 2020, 07:36:02 pm »
Hello

Thanks guys i will do that and see if it makes a difference I will get back to you on that my not be tonight but i will get back to you

Badger

Pages: [1] 2 3 ... 10