Search found 648 matches

by Henko
Sun Mar 16, 2025 7:39 pm
Forum: BASIC programs
Topic: Solar System
Replies: 5
Views: 16061
Flag: Netherlands

Re: Solar System

' MOON POS'N: ---------- x(10)=sw2+x(3)+dist(10)*2*COS(pang(10))*dsc 'posn in orbit at pos'n of Earth y(10)=sh2+y(3)+dist(10)*2*SIN(pang(10))*dsc FILL CIRCLE x(10),y(10) SIZE 5*dsc 'at current posn of Earth plus dist from Earth end if ' insert here next i ' insert here REFRESH ON 'now update the sc...
by Henko
Sun Mar 16, 2025 1:10 pm
Forum: BASIC programs
Topic: Solar System
Replies: 5
Views: 16061
Flag: Netherlands

Re: Solar System

Hi Davey,
After copying the source and running it, i got 3 consequtive error messages.
The starting combi /* had to be inserted at the beginning of the file,
In the section “Planets”, there were missing statements “end if” and “next i”.
Adding these made the progam run nicely 8-) .
by Henko
Sat Dec 14, 2024 8:24 am
Forum: BASIC programs
Topic: Bug in pages or in program ?
Replies: 3
Views: 2554
Flag: Netherlands

Re: Bug in pages or in program ?

drown -> drawn :)

Insert “FILL ALPHA 1” between both “FILL” statements in the main program.
by Henko
Fri Dec 13, 2024 2:24 pm
Forum: BASIC programs
Topic: Bug in pages or in program ?
Replies: 3
Views: 2554
Flag: Netherlands

Re: Bug in pages or in program ?

Hi Ton,
After the first call to the function “ButtonBar”, the “FILL ALPHA” parameter remains zero, whence the circles are drown, but without any color strength.
Greets, Henk
by Henko
Wed Oct 02, 2024 1:26 pm
Forum: BASIC programs
Topic: Skip-Bo game (iPad only)
Replies: 0
Views: 9360
Flag: Netherlands

Skip-Bo game (iPad only)

Please read the Skip-Bo manual on internet for the playing rules. To play a card, first touch the card, then touch the target stack where to place the card. A selected card may be returne to its original stack by touching that stack again. IMG_1252.png ' Skip-bo game ' dim stock(163),op(5,13),p_op(5...
by Henko
Fri Sep 20, 2024 7:27 am
Forum: BASIC programs
Topic: WARI game (iPad only)
Replies: 5
Views: 9858
Flag: Netherlands

Re: WARI game (iPad only)

Hi, I reloaded the code from the first post in this tread and run it. The result is what it should be: IMG_1245.png It seems there is no bug in the program. The differences are : my iPad runs iOS 17.1.2 The pixel size of my iPad: 768 x 980 Portrait or landscape does not matter. Perhaps try download ...
by Henko
Mon Sep 16, 2024 8:18 pm
Forum: Other topics
Topic: Dealing with error messages
Replies: 2
Views: 4989
Flag: Netherlands

Re: Dealing with error messages

Hi Geordie, As far as i know, SB has no error trapping like "on error goto.....". In the example mentioned by you the error may be evaded by using something like the following snippet: f$="Data/messages.txt" ! i=0 if not file_exists(f$) then return while data_exist(f$) i+=1 ! file f$ input .mess$(i)...
by Henko
Wed Aug 28, 2024 2:29 pm
Forum: BASIC programs
Topic: A flexible calculation tool (part 2)
Replies: 0
Views: 9258
Flag: Netherlands

A flexible calculation tool (part 2)

Calculations around an annuity loan requires 4 variables: the principal sum “C”, the interest rate “i”, the amount of periods “n”, and the payment per period “PpP”. The usual formula is the one that calculates the “PpP” as a function of the other 3 variables: PpP = i * C / ( 1 - (1+i)^(-n) ). If we ...
by Henko
Mon Aug 26, 2024 10:59 am
Forum: BASIC programs
Topic: A flexible calculation tool (part 1)
Replies: 0
Views: 9099
Flag: Netherlands

A flexible calculation tool (part 1)

After buying a new car with a hybrid drive train, i made a calculation model for such kind of a car. There are many variables that influence the needed power and fuel at the various conditions. In this model each variable is represented by two buttons, the upper button with a description, the lower ...
by Henko
Mon Aug 05, 2024 2:25 pm
Forum: BASIC programs
Topic: Mini keypad
Replies: 0
Views: 12238
Flag: Netherlands

Mini keypad

I use this keypad to enter or change text or numbers into buttons. The keypad may be placed anywhere on the screen and disappears upon touching the enter key. IMG_1231.jpeg graphics init_keypad(100,190,50,1,1,0,1) button "in" text "hit the button" at 200,10 size 300,40 do slowdown if bp("in") then b...