Τετάρτη 5 Ιουλίου 2023

Version 12, Revision 32

 1. Remove bug at Stack Stack(a) where Stack( not trated as function but as array (which didn't exist). See example ranking in info.gsb (now works fine).

2. Update info.gsb for (1) and for two modules:

2.1 Module Pyth (now adjust Pythagorian Tree better for any screen ratio scale.x/scale.y).

2.2 Module machinecode2 correct a typo at first label (M200 to M2000).

The yellow marked line now run as expected,


module showme {
flush  // stack tems now are 9, for current stack
dim a(10)
a(4)=stack:=1,2,3,4 // place at a(4) as stack object
stack stack(a(4)) // get a copy of stack object of a(4)
stack // display stack items
flush
print a(4) // display stack items from a(4)
stack a(4) // place stack items from a(4) to current stack - not a copy
print len(a(4))=0 // empty stack object
clear // clear variables fro this point
flush
dim a(10)
a(4)="1 2 3 4"   // now a(4) has a string value in a format which statement stack can handle
stack a(4), "NN"  // get 2 numbers from a string value
stack
print stack.size
print len(a(4))
flush
dim a$(10)
a$(4)=stack$(1,2,"hello",4) // make a string for numbers/strings for statement stack
stack a$(4) // all
stack
print stack.size=4
print len(a$(4))
flush
}
showme


Δεν υπάρχουν σχόλια:

Δημοσίευση σχολίου

You can feel free to write any suggestion, or idea on the subject.