För dem som behöver en enkel grundläggande språk utan komplikationer av objekt och ramar , precis Basic från Liberty Basic är det perfekta valet . Språket kan laddas ner utan kostnad och någon bekant med traditionell Basic kan vara igång nästan omedelbart . Trots att språket saknar uttalanden som Print Using och Format , erbjuder det på fliken and Space $ funktioner och dessa är allt som behövs för att rada upp decimaltal . Genom att följa några enkla steg kan du skapa en formaterad inköpslista med bara grundläggande. Saker du behöver
Just Basic version 1.01
Visa fler instruktioner
1
bara öppna Basic och skapa ett nytt projekt . Klicka på " File" och sedan " Ny Basic källfilen. "
2
Använd Print uttalande att skriva titeln och kolumnrubriker enligt följande :
Print " Grocery List " printprint " Ant " , fliken ( 5 ) , " Beskrivning " , fliken ( 30 ) , " Pris "
Print uttalande skickar all text som följer den till fönstret Skriv ut. Tab funktion flyttar markören till den kolumnen på utskriften linjen . Detta gör att du kan placera kolumnrubrikerna direkt över data
3
Formatera den första raden i livsmedelsbutiker objekt enligt följande : .
Print 5 , flik ( 5 ) ; " Äpplen " , fliken ( 30 ) , FormatNum $ ( 1,25 , 4 ) katalog
Detta uttalande placerar kvantitet 5 i den första kolumnen , flikar över till den femte kolumnen och platser ordet " Äpplen " och sedan flikar kolumn 30 för att placera beloppet 1,25 . Den FormatNum $ funktionen lägger inledande blanksteg till varje nummer att anpassa efter decimalkomma
4
Lägg några fler rader av livsmedelsbutiker objekt till listan enligt följande :
tryck 1 , fliken . ( 5 ) , " Milk " , fliken ( 30 ) , FormatNum $ ( 2,29 , 4 ) tryck 1 , flik ( 5 ) , " Pot Roast " , fliken ( 30 ) , FormatNum $ ( 12,95 , 4 ) tryck 1 ; flik ( 5 ) , " Chocolate Bar " , fliken ( 30 ) , FormatNum $ ( 0,59 , 4 )
5
Skriv summan
print flik ( 5 ) , . " , total " , fliken ( 30 ) , . FormatNum $ ( 1,25 + 2,29 12,95 + 0,59 , 4 ) katalog
Denna linje placerar ordet totalt under de enskilda beskrivningarna sedan placerar sammanlagt under siffrorna
6
Definiera FormatNum $ funktionen . Placera koden nedanför Print uttalanden .
Funktion FormatNum $ ( x , i) s $ = Str $ ( x ) l = len ( str $ ( int ( x ) ) ) om l < I thens $ = space $ ( i - L ) + s $ end ifFormatNum $ = s $ end funktion
första raden deklarerar funktionen med x som innehåller mängden och jag med antalet tecken önskas innan decimalkommat < . br >
Linje 2 sparar numret som en teckensträng i variabeln s $ .
Linje 3 räknar antalet siffror för närvarande framför decimalkommat . Om antalet är 12.34 , är heltalet 12 så jag kommer att innehålla värdet 2 .
Linje 3 till 5 använder Space $ funktionen att lägga utrymmen på framsidan av s $ . Om L är 2 och de önskade utrymmen ( i) är 4 , måste vi lägga till två extra utrymmen framför s $ .
Linje 6 returnerar det formaterade numret tillbaka till det anropande programmet .
7
Kör programmet . Klicka på Skift och F5 tillsammans för att se resultatet .
