|
Post by cryptomen on Mar 8, 2024 4:51:46 GMT -5
This thread will be probably promptly erased but IMHO a big unjustice was made to Richard T. Russel and LBB Liberty Basic Booster. Richard could have been an incredible contributor and improver to Liberty Basic.
Let me give you an example. I have written a long code now and when I tried to compile it on LibertyBasic it stops abruptly saying
"BASIC Compile Halted: Syntax Error"
And, what? Where? Which line?
I switch to LBB and hit the RUN button LB Booster stops at and highlights the line which caused the syntax error.
I made a typo and typed MYREF instead of BYREF but LibertyBasic neither shows the reason of syntax error nor the line this is happening.
Over 50 years from FORTRAN to PASCAL to C++ whatever compiler I used showed the error and the line. So does LBB but not LibertyBasic.
This is one small example. Ofcourse, it is not 100% compatible but Richard was always and promptly provided solutions and work arounds to make your code run under LBB.
Furthermore, LBB has many nice improvements and features.
Richard was a genius and master programmer this community shouldn't have been lost.
|
|
|
Post by Rod on Mar 8, 2024 8:01:07 GMT -5
Richard is an incredible programmer. But both systems are created very differently and solutions Richard may find, may not always port to Liberty. So Liberty is what it is and Booster is what it is. Use Booster if you like it. This forum discusses Liberty, The Booster forum discusses Booster, that's the community decision we have all learned to respect.
|
|
|
Post by Carl Gundel on Mar 8, 2024 9:46:59 GMT -5
Richard is a very smart man, and I'd like to have a beer with him sometime, but he lives out of my reach on the other side of the pond. Having said that, Richard alienated himself from this community. I don't think things would be any different if he were to return. Sparks would fly again. In addition, Richard has made it clear also that he would not try to make his version of LB compatible with what I'm adding to LB5. -Carl
|
|
|
Post by xxgeek on Mar 8, 2024 12:12:15 GMT -5
I was going to stay silent, but can not in good conscience let things stand as stated above.
Rod says This not entirely true. The LB Booster forum has specific boards for Liberty Basic discussion, whereas this forum has no boards for LB Booster, and does not allow, or at the very least, discourages discussion of LB Booster. (I've been warned about discussing LB Booster personally and have refrained from doing so out of, "respect" for everyone, as well as a "desire" to keep my membership here.)
IMHO - It is not right - It is a detriment to all who use Liberty Basic, and those who may in future - Past issues of this nature should not affect new members (like myself) - cryptomen was talking mostly about LB Booster, and it's better capabilities as compared to Liberty Basic, not it's author. - There are more benefits cryptomen didn't mention too, much more.
Basically, if this program can be of use, and members want to use it or discuss it, there should be no barriers, and a new board or 2 for LB Booster would not hurt anyone. Change my mind.
If the "community" decided to disallow discussion of LB Booster, the community made this decision without the entire "community", and has hurt the "community" in doing so.
Just my 2 cents, because I see something very wrong here, and extremely unfair to anyone joining this "community".
This "community" is not doing itself any favors by this decision. Prove me wrong.
|
|
|
Post by Carl Gundel on Mar 8, 2024 12:34:17 GMT -5
I was going to stay silent, but can not in good conscience let things stand as stated above. Rod says This not entirely true. The LB Booster forum has specific boards for Liberty Basic discussion, whereas this forum has no boards for LB Booster, and does not allow, or at the very least, discourages discussion of LB Booster. (I've been warned about discussing LB Booster personally and have refrained from doing so out of, "respect" for everyone, as well as a "desire" to keep my membership here.) IMHO - It is not right - It is a detriment to all who use Liberty Basic, and those who may in future - Past issues of this nature should not affect new members (like myself) - cryptomen was talking mostly about LB Booster, and it's better capabilities as compared to Liberty Basic, not it's author. - There are more benefits cryptomen didn't mention too, much more. Basically, if this program can be of use, and members want to use it or discuss it, there should be no barriers, and a new board or 2 for LB Booster would not hurt anyone. Change my mind. If the "community" decided to disallow discussion of LB Booster, the community made this decision without the entire "community", and has hurt the "community" in doing so. Just my 2 cents, because I see something very wrong here, and extremely unfair to anyone joining this "community". This "community" is not doing itself any favors by this decision. Prove me wrong. I don't think there is a right or wrong that can be proven. Liberty BASIC is not LB Booster. Richard has every right to write his own version of LB if he wants to. For me it comes down to, does inviting LB Booster back into this forum constitute a benefit or does it do harm? In my opinion it was and it continues to be divisive. If my competitor, and Richard definitely considers LB to be his competition and has written very disrespectfully here about Liberty BASIC, wants to post in my forum I consider that to be bad form. I will never post about my software in my competitors forum. That is not okay. If you like LB Booster, use it. Please do not use this community forum to promote it.
|
|
|
Post by xxgeek on Mar 8, 2024 12:36:31 GMT -5
So, it is not a "community" decision after all.
So be it.
|
|
|
Post by Carl Gundel on Mar 8, 2024 12:41:06 GMT -5
This thread will be probably promptly erased but IMHO a big unjustice was made to Richard T. Russel and LBB Liberty Basic Booster. Richard could have been an incredible contributor and improver to Liberty Basic. Years ago I offered to Richard that we could collaborate on the future of Liberty BASIC and LBB. Yes, I really did. As I remember it he didn't even respond to my offer. I utterly reject that any injustice was done to him here in this community, at least by me.
|
|
|
Post by Carl Gundel on Mar 8, 2024 12:44:16 GMT -5
So, it is not a "community" decision after all. So be it. This forum is for the Liberty BASIC community, not the LBB community.
|
|
|
Post by xxgeek on Mar 8, 2024 13:09:08 GMT -5
Yes, understood. Why all the disinformation and deception?
It is YOUR decision, and LB Booster forum DOES discuss more than just LB Booster. The LB Booster forum DOES NOT restrict it's members like this forum does.
Hurt your "community" as you wish. It's your forum not the "community's"
After reading your responses, the "community" seems to be an illusion.
|
|
|
Post by Carl Gundel on Mar 8, 2024 15:07:15 GMT -5
What disinformation and deception are you talking about? Really I don't know what you mean.
|
|
|
Post by cryptomen on Mar 11, 2024 4:25:31 GMT -5
I did not want to create a fight over emotional issues and not to dwell on this topic.
However, I think LBB is a good and interesting product which could have improved LB.
For example, I am now puzzled by a bug on LB 4.5.1 with Random Access files.
One field in the record DNA.RNA$ is not getting written to file. Other record fields seems to be updating but not this field. I tried work arounds. Changed the variable name from DNA.RNA$ to RNA$, changed it's position from the bottom to the top. Reduced it's size from 76 to 50 and added a FILLER$ 26 but nothing helped. Both GET and GETTRIM can not read back this field which was PUT properly.
At this point, I took out the LBB Booster and run the same code and voila LBB is working properly.
When I saw this, I loose confidence on the rest of fields of the records. Could some of these be also missing or updating incorrectly?
This is a 1426 byte record file for building statistical data for credit card usage patterns to be built using 28 million transaction from an IBM sample data on 2000 people for building a fraud detection model.
If nothing else LBB is a great tool for bug detection like this and I think it can help the community in a big way when they start scratching their heads when something so obvious and simple starts acting funny.
|
|
|
Post by Rod on Mar 11, 2024 5:45:26 GMT -5
Thanks, cryptomen. I understand where you are coming from. I said at the start resolving bugs in LBB is not going to lead to solutions in Liberty. We have to live with that, they are completely different systems built on different platforms each with their own issues and own development cycles.
This forum will stay focused on Liberty BASIC. The actual reason for this is that it has proved successful, we have a forum for Just BASIC and Run BASIC all focused on each products unique needs. That will continue. It isn't Carls decision it is the decision of the community members who volunteer to moderate and manage this forum. Some of those members participate in the LBB forum, no one has an issue with that. Staying focused also takes the heated and divisive comparison debates off line.
It would have been nice to try and resolve the Liberty bug. Can we see one line of data? say an ASC list of the 1426 bytes and their FIELD structure?
|
|
|
Post by cryptomen on Mar 11, 2024 6:24:15 GMT -5
SUB OPENDNA
OPEN "DNA.RND" FOR RANDOM AS #dna LEN=1426 FIELD #dna,_ 30 AS DNA.Name$,_ 2 AS DNA.CurrentAge,_ 2 AS DNA.RetirementAge,_ 4 AS DNA.BirthYear,_ 2 AS DNA.BirthMonth,_ 1 AS DNA.Gender$,_ 30 AS DNA.Address$,_ 10 AS DNA.Apartment$,_ 20 AS DNA.City$,_ 2 AS DNA.State$,_ 5 AS DNA.Zipcode$,_ 6 AS DNA.Latitude,_ 6 AS DNA.Longitude,_ 8 AS DNA.PerCapitaIncomeZipcode,_ 8 AS DNA.YearlyIncomePerson,_ 8 AS DNA.TotalDebt,_ 3 AS DNA.FICOScore,_ 2 AS DNA.NumCreditCards,_ 12 AS DNA.LastTxDateTime$,_ 5 AS DNA.LastTxZIP$,_ 10 AS DNA.LastTxAmt,_ 4 AS DNA.LastMCC,_ 5 AS DNA.NoForn,_ 4 AS DNA.MinForn,_ 6 AS DNA.MaxForn,_ 8 AS DNA.TotForn,_ 5 AS DNA.NoHotel,_ 4 AS DNA.MinHotel,_ 6 AS DNA.MaxHotel,_ 8 AS DNA.TotHotel,_ 5 AS DNA.NoFuel,_ 3 AS DNA.MinFuel,_ 4 AS DNA.MaxFuel,_ 8 AS DNA.TotFuel,_ 5 AS DNA.NoRentaCar,_ 4 AS DNA.MinRentaCar,_ 6 AS DNA.MaxRentaCar,_ 8 AS DNA.TotRentaCar,_ 5 AS DNA.NoOnline,_ 4 AS DNA.MinOnline,_ 6 AS DNA.MaxOnline,_ 8 AS DNA.TotOnline,_ 5 AS DNA.NoMarket,_ 4 AS DNA.MinMarket,_ 6 AS DNA.MaxMarket,_ 8 AS DNA.TotMarket,_ 5 AS DNA.NoCloth,_ 4 AS DNA.MinCloth,_ 6 AS DNA.MaxCloth,_ 8 AS DNA.TotCloth,_ 5 AS DNA.NoPharmacy,_ 4 AS DNA.MinPharmacy,_ 6 AS DNA.MaxPharmacy,_ 8 AS DNA.TotPharmacy,_ 5 AS DNA.NoCash,_ 4 AS DNA.MinCash,_ 6 AS DNA.MaxCash,_ 8 AS DNA.TotCash,_ 5 AS DNA.NoUtility,_ 4 AS DNA.MinUtility,_ 6 AS DNA.MaxUtility,_ 8 AS DNA.TotUtility,_ 5 AS DNA.NoAirline,_ 4 AS DNA.MinAirline,_ 6 AS DNA.MaxAirline,_ 8 AS DNA.TotAirline,_ 5 AS DNA.NoTelecom,_ 4 AS DNA.MinTelecom,_ 6 AS DNA.MaxTelecom,_ 8 AS DNA.TotTelecom,_ 5 AS DNA.NoBar,_ 4 AS DNA.MinBar,_ 6 AS DNA.MaxBar,_ 8 AS DNA.TotBar,_ 5 AS DNA.NoRest,_ 4 AS DNA.MinRest,_ 6 AS DNA.MaxRest,_ 8 AS DNA.TotRest,_ 5 AS DNA.NoRisky,_ 4 AS DNA.MinRisky,_ 6 AS DNA.MaxRisky,_ 8 AS DNA.TotRisky,_ 5 AS DNA.NoHealth,_ 4 AS DNA.MinHealth,_ 6 AS DNA.MaxHealth,_ 8 AS DNA.TotHealth,_ 5 AS DNA.NoElectronic,_ 4 AS DNA.MinElectronic,_ 6 AS DNA.MaxElectronic,_ 8 AS DNA.TotElectronic,_ 5 AS DNA.NoFastfood,_ 4 AS DNA.MinFastfood,_ 6 AS DNA.MaxFastfood,_ 8 AS DNA.TotFastfood,_ 5 AS DNA.NoTaxi,_ 4 AS DNA.MinTaxi,_ 6 AS DNA.MaxTaxi,_ 8 AS DNA.TotTaxi,_ 5 AS DNA.NoCarRepair,_ 4 AS DNA.MinCarRepair,_ 6 AS DNA.MaxRepair,_ 8 AS DNA.TotCarRepair,_ 5 AS DNA.NoTickets,_ 4 AS DNA.MinTickets,_ 6 AS DNA.MaxTickets,_ 8 AS DNA.TotTickets,_ 5 AS DNA.NoTrain,_ 4 AS DNA.MinTrain,_ 6 AS DNA.MaxTrain,_ 8 AS DNA.TotTrain,_ 5 AS DNA.NoEdu,_ 4 AS DNA.MinEdu,_ 6 AS DNA.MaxEdu,_ 8 AS DNA.TotEdu,_ 5 AS DNA.NoDirect,_ 4 AS DNA.MinDirect,_ 6 AS DNA.MaxDirect,_ 8 AS DNA.TotDirect,_ 5 AS DNA.NoGames,_ 4 AS DNA.MinGames,_ 6 AS DNA.MaxGames,_ 8 AS DNA.TotGames,_ 5 AS DNA.NoPost,_ 4 AS DNA.MinPost,_ 6 AS DNA.MaxPost,_ 8 AS DNA.TotPost,_ 5 AS DNA.NoGambling,_ 4 AS DNA.MinGambling,_ 6 AS DNA.MaxGambling,_ 8 AS DNA.TotGambling,_ 5 AS DNA.No50km,_ 4 AS DNA.Min50km,_ 6 AS DNA.Max50km,_ 8 AS DNA.Tot50km,_ 5 AS DNA.No100km,_ 4 AS DNA.Min100km,_ 6 AS DNA.Max100km,_ 8 AS DNA.Tot100km,_ 5 AS DNA.No150km,_ 4 AS DNA.Min150km,_ 6 AS DNA.Max150km,_ 8 AS DNA.Tot150km,_ 5 AS DNA.No250km,_ 4 AS DNA.Min250km,_ 6 AS DNA.Max250km,_ 8 AS DNA.Tot250km,_ 5 AS DNA.No500km,_ 4 AS DNA.Min500km,_ 6 AS DNA.Max500km,_ 8 AS DNA.Tot500km,_ 5 AS DNA.No1000km,_ 4 AS DNA.Min1000km,_ 6 AS DNA.Max1000km,_ 8 AS DNA.Tot1000km,_ 5 AS DNA.No2000km,_ 4 AS DNA.Min2000km,_ 6 AS DNA.Max2000km,_ 8 AS DNA.Tot2000km,_ 5 AS DNA.No3000km,_ 4 AS DNA.Min3000km,_ 6 AS DNA.Max3000km,_ 8 AS DNA.Tot3000km,_ 5 AS DNA.No5000km,_ 4 AS DNA.Min5000km,_ 6 AS DNA.Max5000km,_ 8 AS DNA.Tot5000km,_ 5 AS DNA.NoFar,_ 4 AS DNA.MinFar,_ 6 AS DNA.MaxFar,_ 8 AS DNA.TotFar,_ 5 AS DNA.NoOther,_ 4 AS DNA.MinOther,_ 6 AS DNA.MaxOther,_ 8 AS DNA.TotOther,_ 5 AS DNA.NoClassy,_ 4 AS DNA.MinClassy,_ 6 AS DNA.MaxClassy,_ 8 AS DNA.TotClassy,_ 5 AS DNA.NoBusiness,_ 4 AS DNA.MinBusiness,_ 6 AS DNA.MaxBusiness,_ 8 AS DNA.TotBusiness,_ 5 AS DNA.NoConstruction,_ 4 AS DNA.MinConstruction,_ 6 AS DNA.MaxConstruction,_ 8 AS DNA.TotConstruction,_ 5 AS DNA.NoInsurance,_ 4 AS DNA.MinInsurance,_ 6 AS DNA.MaxInsurance,_ 8 AS DNA.TotInsurance,_ 5 AS DNA.NoGov,_ 4 AS DNA.MinGov,_ 6 AS DNA.MaxGov,_ 8 AS DNA.TotGov,_ 5 AS DNA.NoTransport,_ 4 AS DNA.MinTransport,_ 6 AS DNA.MaxTransport,_ 8 AS DNA.TotTransport,_ 5 AS DNA.NoJewellery,_ 4 AS DNA.MinJewellery,_ 6 AS DNA.MaxJewellery,_ 8 AS DNA.TotJewellery,_ 5 AS DNA.NoLifeStyle,_ 4 AS DNA.MinLifeStyle,_ 6 AS DNA.MaxLifeStyle,_ 8 AS DNA.TotLifeStyle,_ 5 AS DNA.NoVehicle,_ 4 AS DNA.MinVehicle,_ 6 AS DNA.MaxVehicle,_ 8 AS DNA.TotVehicle,_ 5 AS DNA.NoGames,_ 4 AS DNA.MinGames,_ 6 AS DNA.MaxGames,_ 8 AS DNA.TotGames,_ 5 AS DNA.NoDigital,_ 4 AS DNA.MinDigital,_ 6 AS DNA.MaxDigital,_ 8 AS DNA.TotDigital,_ 5 AS DNA.NoSports,_ 4 AS DNA.MinSports,_ 6 AS DNA.MaxSports,_ 8 AS DNA.TotSports,_ 5 AS DNA.NoRealEstate,_ 4 AS DNA.MinRealEstate,_ 6 AS DNA.MaxRealEstate,_ 8 AS DNA.TotRealEstate,_ 76 AS DNA.RNA$
END SUB
|
|
|
Post by Rod on Mar 11, 2024 6:35:57 GMT -5
I will try and see if I can replicate the bug with that field structure. Playing with the help file example I can replicate the problem if the variable names differ. But I will play with your RAF.
OPEN "members.dat" FOR RANDOM AS #1 LEN=256 FIELD #1,_ ' set up the fields for file opened as #1 90 AS Name$,_ ' 1st 90 bytes contains Name$, string 110 AS Add.ress$,_ ' 2nd 110 bytes contains Address$, string 50 AS Rank$,_ ' 3rd 50 bytes contains Rank$, string 6 AS IDnumber ' 4th 6 bytes contains IDnumber, numeric
Name$ = "John Q. Public" Address$ = chr$(30);"456 Maple Street, Anytown, USA" Rank$ = "Expert Programmer" IDnumber = 99 PUT #1, 3
GET #1,3
Print Name$ 'would produce "John Q. Public " Print Add.ress$ 'would produce "456 Maple Street, Anytown, USA " Print Rank$ 'would produce "Expert Programmer " print IDnumber 'would produce "99"
wait
|
|
|
Post by Rod on Mar 11, 2024 7:54:08 GMT -5
On a simplistic basis there is no obvious bug. So, the RAF content? I did interject a variety of control characters and such into the DNA.RNA$ string but it did not replicate the fault, the string just hosted the strange character. You obviously can't share the data but I would look at the string you are putting into DNA.RNA$ and examine the ASC values to see they correspond with what you expect.
Other than that we need to look at variable naming and content as it is saved and pulled. Print the contents as you PUT and GET. Perhaps you have done that.
OPEN "DNA.RND" FOR RANDOM AS #dna LEN=1426 FIELD #dna,_ 30 AS DNA.Name$,_ 2 AS DNA.CurrentAge,_ 2 AS DNA.RetirementAge,_ 4 AS DNA.BirthYear,_ 2 AS DNA.BirthMonth,_ 1 AS DNA.Gender$,_ 30 AS DNA.Address$,_ 10 AS DNA.Apartment$,_ 20 AS DNA.City$,_ 2 AS DNA.State$,_ 5 AS DNA.Zipcode$,_ 6 AS DNA.Latitude,_ 6 AS DNA.Longitude,_ 8 AS DNA.PerCapitaIncomeZipcode,_ 8 AS DNA.YearlyIncomePerson,_ 8 AS DNA.TotalDebt,_ 3 AS DNA.FICOScore,_ 2 AS DNA.NumCreditCards,_ 12 AS DNA.LastTxDateTime$,_ 5 AS DNA.LastTxZIP$,_ 10 AS DNA.LastTxAmt,_ 4 AS DNA.LastMCC,_ 5 AS DNA.NoForn,_ 4 AS DNA.MinForn,_ 6 AS DNA.MaxForn,_ 8 AS DNA.TotForn,_ 5 AS DNA.NoHotel,_ 4 AS DNA.MinHotel,_ 6 AS DNA.MaxHotel,_ 8 AS DNA.TotHotel,_ 5 AS DNA.NoFuel,_ 3 AS DNA.MinFuel,_ 4 AS DNA.MaxFuel,_ 8 AS DNA.TotFuel,_ 5 AS DNA.NoRentaCar,_ 4 AS DNA.MinRentaCar,_ 6 AS DNA.MaxRentaCar,_ 8 AS DNA.TotRentaCar,_ 5 AS DNA.NoOnline,_ 4 AS DNA.MinOnline,_ 6 AS DNA.MaxOnline,_ 8 AS DNA.TotOnline,_ 5 AS DNA.NoMarket,_ 4 AS DNA.MinMarket,_ 6 AS DNA.MaxMarket,_ 8 AS DNA.TotMarket,_ 5 AS DNA.NoCloth,_ 4 AS DNA.MinCloth,_ 6 AS DNA.MaxCloth,_ 8 AS DNA.TotCloth,_ 5 AS DNA.NoPharmacy,_ 4 AS DNA.MinPharmacy,_ 6 AS DNA.MaxPharmacy,_ 8 AS DNA.TotPharmacy,_ 5 AS DNA.NoCash,_ 4 AS DNA.MinCash,_ 6 AS DNA.MaxCash,_ 8 AS DNA.TotCash,_ 5 AS DNA.NoUtility,_ 4 AS DNA.MinUtility,_ 6 AS DNA.MaxUtility,_ 8 AS DNA.TotUtility,_ 5 AS DNA.NoAirline,_ 4 AS DNA.MinAirline,_ 6 AS DNA.MaxAirline,_ 8 AS DNA.TotAirline,_ 5 AS DNA.NoTelecom,_ 4 AS DNA.MinTelecom,_ 6 AS DNA.MaxTelecom,_ 8 AS DNA.TotTelecom,_ 5 AS DNA.NoBar,_ 4 AS DNA.MinBar,_ 6 AS DNA.MaxBar,_ 8 AS DNA.TotBar,_ 5 AS DNA.NoRest,_ 4 AS DNA.MinRest,_ 6 AS DNA.MaxRest,_ 8 AS DNA.TotRest,_ 5 AS DNA.NoRisky,_ 4 AS DNA.MinRisky,_ 6 AS DNA.MaxRisky,_ 8 AS DNA.TotRisky,_ 5 AS DNA.NoHealth,_ 4 AS DNA.MinHealth,_ 6 AS DNA.MaxHealth,_ 8 AS DNA.TotHealth,_ 5 AS DNA.NoElectronic,_ 4 AS DNA.MinElectronic,_ 6 AS DNA.MaxElectronic,_ 8 AS DNA.TotElectronic,_ 5 AS DNA.NoFastfood,_ 4 AS DNA.MinFastfood,_ 6 AS DNA.MaxFastfood,_ 8 AS DNA.TotFastfood,_ 5 AS DNA.NoTaxi,_ 4 AS DNA.MinTaxi,_ 6 AS DNA.MaxTaxi,_ 8 AS DNA.TotTaxi,_ 5 AS DNA.NoCarRepair,_ 4 AS DNA.MinCarRepair,_ 6 AS DNA.MaxRepair,_ 8 AS DNA.TotCarRepair,_ 5 AS DNA.NoTickets,_ 4 AS DNA.MinTickets,_ 6 AS DNA.MaxTickets,_ 8 AS DNA.TotTickets,_ 5 AS DNA.NoTrain,_ 4 AS DNA.MinTrain,_ 6 AS DNA.MaxTrain,_ 8 AS DNA.TotTrain,_ 5 AS DNA.NoEdu,_ 4 AS DNA.MinEdu,_ 6 AS DNA.MaxEdu,_ 8 AS DNA.TotEdu,_ 5 AS DNA.NoDirect,_ 4 AS DNA.MinDirect,_ 6 AS DNA.MaxDirect,_ 8 AS DNA.TotDirect,_ 5 AS DNA.NoGames,_ 4 AS DNA.MinGames,_ 6 AS DNA.MaxGames,_ 8 AS DNA.TotGames,_ 5 AS DNA.NoPost,_ 4 AS DNA.MinPost,_ 6 AS DNA.MaxPost,_ 8 AS DNA.TotPost,_ 5 AS DNA.NoGambling,_ 4 AS DNA.MinGambling,_ 6 AS DNA.MaxGambling,_ 8 AS DNA.TotGambling,_ 5 AS DNA.No50km,_ 4 AS DNA.Min50km,_ 6 AS DNA.Max50km,_ 8 AS DNA.Tot50km,_ 5 AS DNA.No100km,_ 4 AS DNA.Min100km,_ 6 AS DNA.Max100km,_ 8 AS DNA.Tot100km,_ 5 AS DNA.No150km,_ 4 AS DNA.Min150km,_ 6 AS DNA.Max150km,_ 8 AS DNA.Tot150km,_ 5 AS DNA.No250km,_ 4 AS DNA.Min250km,_ 6 AS DNA.Max250km,_ 8 AS DNA.Tot250km,_ 5 AS DNA.No500km,_ 4 AS DNA.Min500km,_ 6 AS DNA.Max500km,_ 8 AS DNA.Tot500km,_ 5 AS DNA.No1000km,_ 4 AS DNA.Min1000km,_ 6 AS DNA.Max1000km,_ 8 AS DNA.Tot1000km,_ 5 AS DNA.No2000km,_ 4 AS DNA.Min2000km,_ 6 AS DNA.Max2000km,_ 8 AS DNA.Tot2000km,_ 5 AS DNA.No3000km,_ 4 AS DNA.Min3000km,_ 6 AS DNA.Max3000km,_ 8 AS DNA.Tot3000km,_ 5 AS DNA.No5000km,_ 4 AS DNA.Min5000km,_ 6 AS DNA.Max5000km,_ 8 AS DNA.Tot5000km,_ 5 AS DNA.NoFar,_ 4 AS DNA.MinFar,_ 6 AS DNA.MaxFar,_ 8 AS DNA.TotFar,_ 5 AS DNA.NoOther,_ 4 AS DNA.MinOther,_ 6 AS DNA.MaxOther,_ 8 AS DNA.TotOther,_ 5 AS DNA.NoClassy,_ 4 AS DNA.MinClassy,_ 6 AS DNA.MaxClassy,_ 8 AS DNA.TotClassy,_ 5 AS DNA.NoBusiness,_ 4 AS DNA.MinBusiness,_ 6 AS DNA.MaxBusiness,_ 8 AS DNA.TotBusiness,_ 5 AS DNA.NoConstruction,_ 4 AS DNA.MinConstruction,_ 6 AS DNA.MaxConstruction,_ 8 AS DNA.TotConstruction,_ 5 AS DNA.NoInsurance,_ 4 AS DNA.MinInsurance,_ 6 AS DNA.MaxInsurance,_ 8 AS DNA.TotInsurance,_ 5 AS DNA.NoGov,_ 4 AS DNA.MinGov,_ 6 AS DNA.MaxGov,_ 8 AS DNA.TotGov,_ 5 AS DNA.NoTransport,_ 4 AS DNA.MinTransport,_ 6 AS DNA.MaxTransport,_ 8 AS DNA.TotTransport,_ 5 AS DNA.NoJewellery,_ 4 AS DNA.MinJewellery,_ 6 AS DNA.MaxJewellery,_ 8 AS DNA.TotJewellery,_ 5 AS DNA.NoLifeStyle,_ 4 AS DNA.MinLifeStyle,_ 6 AS DNA.MaxLifeStyle,_ 8 AS DNA.TotLifeStyle,_ 5 AS DNA.NoVehicle,_ 4 AS DNA.MinVehicle,_ 6 AS DNA.MaxVehicle,_ 8 AS DNA.TotVehicle,_ 5 AS DNA.NoGames,_ 4 AS DNA.MinGames,_ 6 AS DNA.MaxGames,_ 8 AS DNA.TotGames,_ 5 AS DNA.NoDigital,_ 4 AS DNA.MinDigital,_ 6 AS DNA.MaxDigital,_ 8 AS DNA.TotDigital,_ 5 AS DNA.NoSports,_ 4 AS DNA.MinSports,_ 6 AS DNA.MaxSports,_ 8 AS DNA.TotSports,_ 5 AS DNA.NoRealEstate,_ 4 AS DNA.MinRealEstate,_ 6 AS DNA.MaxRealEstate,_ 8 AS DNA.TotRealEstate,_ 76 AS DNA.RNA$
DNA.Name$="9" DNA.CurrentAge=9 DNA.RetirementAge= 9 DNA.BirthYear= 9 DNA.BirthMonth= 9 DNA.Gender$= "9" DNA.Address$= "9" DNA.Apartment$= "9" DNA.City$= "9" DNA.State$= "9" DNA.Zipcode$= "9" DNA.Latitude= 9 DNA.Longitude= 9 DNA.PerCapitaIncomeZipcode= 9 DNA.YearlyIncomePerson= 9 DNA.TotalDebt= 9 DNA.FICOScore= 9 DNA.NumCreditCards= 9 DNA.LastTxDateTime$= "9" DNA.LastTxZIP$= "9" DNA.LastTxAmt= 9 DNA.LastMCC= 9 DNA.NoForn= 9 DNA.MinForn= 9 DNA.MaxForn= 9 DNA.TotForn= 9 DNA.NoHotel= 9 DNA.MinHotel= 9 DNA.MaxHotel= 9 DNA.TotHotel= 9 DNA.NoFuel= 9 DNA.MinFuel= 9 DNA.MaxFuel= 9 DNA.TotFuel= 9 DNA.NoRentaCar= 9 DNA.MinRentaCar= 9 DNA.MaxRentaCar= 9 DNA.TotRentaCar= 9 DNA.NoOnline= 9 DNA.MinOnline= 9 DNA.MaxOnline= 9 DNA.TotOnline= 9 DNA.NoMarket= 9 DNA.MinMarket= 9 DNA.MaxMarket= 9 DNA.TotMarket= 9 DNA.NoCloth= 9 DNA.MinCloth= 9 DNA.MaxCloth= 9 DNA.TotCloth= 9 DNA.NoPharmacy= 9 DNA.MinPharmacy= 9 DNA.MaxPharmacy= 9 DNA.TotPharmacy= 9 DNA.NoCash= 9 DNA.MinCash= 9 DNA.MaxCash= 9 DNA.TotCash= 9 DNA.NoUtility= 9 DNA.MinUtility= 9 DNA.MaxUtility= 9 DNA.TotUtility= 9 DNA.NoAirline= 9 DNA.MinAirline= 9 DNA.MaxAirline= 9 DNA.TotAirline= 9 DNA.NoTelecom= 9 DNA.MinTelecom= 9 DNA.MaxTelecom= 9 DNA.TotTelecom= 9 DNA.NoBar= 9 DNA.MinBar= 9 DNA.MaxBar= 9 DNA.TotBar= 9 DNA.NoRest= 9 DNA.MinRest= 9 DNA.MaxRest= 9 DNA.TotRest= 9 DNA.NoRisky= 9 DNA.MinRisky= 9 DNA.MaxRisky= 9 DNA.TotRisky= 9 DNA.NoHealth= 9 DNA.MinHealth= 9 DNA.MaxHealth= 9 DNA.TotHealth= 9 DNA.NoElectronic= 9 DNA.MinElectronic= 9 DNA.MaxElectronic= 9 DNA.TotElectronic= 9 DNA.NoFastfood= 9 DNA.MinFastfood= 9 DNA.MaxFastfood= 9 DNA.TotFastfood= 9 DNA.NoTaxi= 9 DNA.MinTaxi= 9 DNA.MaxTaxi= 9 DNA.TotTaxi= 9 DNA.NoCarRepair= 9 DNA.MinCarRepair= 9 DNA.MaxRepair= 9 DNA.TotCarRepair= 9 DNA.NoTickets= 9 DNA.MinTickets= 9 DNA.MaxTickets= 9 DNA.TotTickets= 9 DNA.NoTrain= 9 DNA.MinTrain= 9 DNA.MaxTrain= 9 DNA.TotTrain= 9 DNA.NoEdu= 9 DNA.MinEdu= 9 DNA.MaxEdu= 9 DNA.TotEdu= 9 DNA.NoDirect= 9 DNA.MinDirect= 9 DNA.MaxDirect= 9 DNA.TotDirect= 9 DNA.NoGames= 9 DNA.MinGames= 9 DNA.MaxGames= 9 DNA.TotGames= 9 DNA.NoPost= 9 DNA.MinPost= 9 DNA.MaxPost= 9 DNA.TotPost= 9 DNA.NoGambling= 9 DNA.MinGambling= 9 DNA.MaxGambling= 9 DNA.TotGambling= 9 DNA.No50km= 9 DNA.Min50km= 9 DNA.Max50km= 9 DNA.Tot50km= 9 DNA.No100km= 9 DNA.Min100km= 9 DNA.Max100km= 9 DNA.Tot100km= 9 DNA.No150km= 9 DNA.Min150km= 9 DNA.Max150km= 9 DNA.Tot150km= 9 DNA.No250km= 9 DNA.Min250km= 9 DNA.Max250km= 9 DNA.Tot250km= 9 DNA.No500km= 9 DNA.Min500km= 9 DNA.Max500km= 9 DNA.Tot500km= 9 DNA.No1000km= 9 DNA.Min1000km= 9 DNA.Max1000km= 9 DNA.Tot1000km= 9 DNA.No2000km= 9 DNA.Min2000km= 9 DNA.Max2000km= 9 DNA.Tot2000km= 9 DNA.No3000km= 9 DNA.Min3000km= 9 DNA.Max3000km= 9 DNA.Tot3000km= 9 DNA.No5000km= 9 DNA.Min5000km= 9 DNA.Max5000km= 9 DNA.Tot5000km= 9 DNA.NoFar= 9 DNA.MinFar= 9 DNA.MaxFar= 9 DNA.TotFar= 9 DNA.NoOther= 9 DNA.MinOther= 9 DNA.MaxOther= 9 DNA.TotOther= 9 DNA.NoClassy= 9 DNA.MinClassy= 9 DNA.MaxClassy= 9 DNA.TotClassy= 9 DNA.NoBusiness= 9 DNA.MinBusiness= 9 DNA.MaxBusiness= 9 DNA.TotBusiness= 9 DNA.NoConstruction= 9 DNA.MinConstruction= 9 DNA.MaxConstruction= 9 DNA.TotConstruction= 9 DNA.NoInsurance= 9 DNA.MinInsurance= 9 DNA.MaxInsurance= 9 DNA.TotInsurance= 9 DNA.NoGov= 9 DNA.MinGov= 9 DNA.MaxGov= 9 DNA.TotGov= 9 DNA.NoTransport= 9 DNA.MinTransport= 9 DNA.MaxTransport= 9 DNA.TotTransport= 9 DNA.NoJewellery= 9 DNA.MinJewellery= 9 DNA.MaxJewellery= 9 DNA.TotJewellery= 9 DNA.NoLifeStyle= 9 DNA.MinLifeStyle= 9 DNA.MaxLifeStyle= 9 DNA.TotLifeStyle= 9 DNA.NoVehicle= 9 DNA.MinVehicle= 9 DNA.MaxVehicle= 9 DNA.TotVehicle= 9 DNA.NoGames= 9 DNA.MinGames= 9 DNA.MaxGames= 9 DNA.TotGames= 9 DNA.NoDigital= 9 DNA.MinDigital= 9 DNA.MaxDigital= 9 DNA.TotDigital= 9 DNA.NoSports= 9 DNA.MinSports= 9 DNA.MaxSports= 9 DNA.TotSports= 9 DNA.NoRealEstate= 9 DNA.MinRealEstate= 9 DNA.MaxRealEstate= 9 DNA.TotRealEstate= 9 DNA.RNA$= "Hellow"+space$(69)+"1"
PUT #dna,1 DNA.RNA$= "Hellow"+space$(69)+"2" PUT #dna,2 DNA.RNA$= "Hellow"+space$(69)+"3" PUT #dna,3
GET #dna,1 print DNA.RNA$ GET #dna,2 print DNA.RNA$ GET #dna,3 print DNA.RNA$ wait
|
|