· Text 585 · w6 · inlagg
Är det någon som vet om det finns något program förr 800-serien
som innehåller någon sorteringsrutin ???
ELLER Hur löser jag problemet med att talet 38 anses vara
större än 379999999 ??
Retro Preservation Workspace
Monitorn
Browse archived Monitorn möten and the ABC80 mailing list, with full-text and text-number search.
Sorteringsprogram
24 posts in thread
-
-
· Text 586 · w6 · kommentarFörtydligande: Så här vill jag ha raderna sorterade: XXX ; VÄRDE%(INDEX%)' 'STRÄNG¤(INDEX%) Sorteringen av 'VÄRDET' funkar förstås perfekt. Problemet är att jag inte får 'STRÄNG¤(INDEX%)' att hänga med vid utskriften EFTER ny sortering... Möjligen är jag alldelses för trött för att fatta (jag har fått det att fungera förut...) Klockan är 02.55. Är det ngn som vet VAR det finns en fungerande rutin ??
-
· Text 587 · w6 · kommentarGör om allt till en sträng och sortera den. Hur mycket skall du sortera? Räcker det med en quicksort i minnet eller behöver du en disksortering? I mitt program NEWFILES på ABC800/UTILTIY finns det minnesortering, men jag vet inte om det finns någon disk- sortering i programbanken. Ev kan jag skicka in en sådan, om jag hittar en här hemma.
-
· Text 588 · w6 · kommentarJag skall kika på NEWFILES. Jag började med att sortera varje sträng för sig... Det var då resultatet blev: 39 3855 etcetera... Om det vore så att jag skulle rita på disk så skulle jag köra med ISAM. Då blir det ju bra. Men nu skall jag bara sortera upp till 20 variabler, och det skall gå fort... Men jag skall kolla NEWFILES !!
-
· Text 589 · w6 · kommentarOm det skall gå snabbt bör du försöka skaffa en quicksort-rutin. Jag skall få en som är på tio rader och är kanonsnabb. mvh TMG
-
· Text 594 · w6 · kommentarDen är jag också högst intresserad av!
-
· Text 595 · w6 · kommentarKul att höra att Du skall få en snabb rutin på högst 10 rader. Den skulle vara kul att kika på... Sortering är ju egentligen relativt enkelt att åstadkomma. Jag skall försöka göra ett typ 'seriesystem' där det tex. ser ut så här: Plats Poäng Namn Klubb 1 31 John Doe Spårvägen BTK 2 29 Erik Svensson Tumba GOIF 3 27 Kalle Anka Ankeborgs BTK Etcetera. Det skall förstås vara valbart hur många poster det skall finnas med. Det är viktigt att det går snabbt att upp- datera. När en spelare kommer fram och berättar att han tagit två nya poäng så skall den nya placeringen fram sekundsnabbt. Och detta funkar ju fram till Text-strängen... Men sen blir det pannkaka.
-
· Text 597 · w6 · kommentarOm jag förstått det rätt så testar du på textsträngen om tex A¤(n)>A¤(n+1) X¤=A¤(n):A¤(n)=A¤(n+1):A¤(n+1)=X¤ (vilkor) (byt plats på dem) Och sedan när textdelen är sorterad försöker du sortera upp taldelen, det är i så fall dömt att misslyckas men det finns en mycket enkel lösning och det är att sortera upp de båda delarna samtidigt: IF A¤(n)>A¤(n+1) X¤=A¤(n):A¤(n)=A¤(n+1):A¤(n+1)=X¤:X=A(n): A(n)=A(n+1):A(n+1)=X
-
· Text 598 · w6 · kommentarNåja, den är inte helt tillägnad Mig så det skall väl gå. Det roliga är att han som jag skall få den av har hittat den i nån tidning eller nåt i den stilen. Den var skriven i Pascal och det gick att bara skriva av den till ABC800 basic, funktioner som anropar sig själva. Det är inte alla basicar som klarar detta!!! heja ABC800 Återkommer när jag 'roffat' åt mig den mvh TMG
-
· Text 599 · w6 · kommentarNumera så har jag fått snurr på programmet. Hoppas att inte alla vissnar över antalet inlägg i mötet... Ja Patric! Det är i alla fall mycket intressant att kika på snutten, särskilt som den har lite 'turbo' (?) över sig. Fö så hittade jag 'SORTERA.BAS' i ABC80s bibliotek. Det var ett program som jämförde olika sorteringssätt...
-
· Text 600 · w8 · kommentarJo, det är möjligt, men det har inte funnit något egentligt behov att använda den gamla programvaran och dessutom kan knappast någon annna än undertecknad dra igång den och jag vill nog glömma bort den. LUX-NET:et hängde sig då och då och man fick åka hit och dra igång det med jämna mellanrum. Det har aldrig hänt med DS90:en även om den dyker ibland så kommer den upp igen utan ingripande.
-
-
· Text 601 · w6 · kommentarAnvänder rutinen rekursion kräver den alltså mängder med stack. Undrar hur det går med mycket data.
-
· Text 602 · w6 · kommentarEftersom jag gissar att alla inte förstår vad Benny menar med "stack" så skall jag försöka förklara det: Stacken är en del av minnet och är organiserad som en vanlig stack, t ex en vedstack. Man lägger på saker och tig på stacken och tar bort uppifrån. När man använder recursiva rutiner (rutiner anropar sig själv, enkelt utryckt) så används detta minnesområde som kallas för stack. (ej att förväxla med dataföreningen Stacken). Detta gör att minnet kan ta slut helt enkelt, om stacken blir hör hög.
-
· Text 603 · w6 · kommentarDet finns visst en systemvariabel som kallas Runtime stackpointer. Pekar den på hur långt ner stacken har vuxit vid varje givet tillfälle under programkörningen ?
-
· Text 605 · w6 · kommentarJa, så är det så vitt jag förstår. I Bit för Bit kan man se att det finns tre olika stackpekare (sid 61 och 62) för olika ändamål. Dessa skall användas vid CONTINUE, RESUME och i direktmode. På liknande sätt är det nog i BASIC I.
-
-
· Text 604 · w6 · kommentarJag för min del brukar tömma mina stackar nerifrån, men smaken är som baken... Matts
-
· Text 606 · w6 · kommentarNja, det beror på från vilket håll man ser det. Om man lägger till i en ände och tar bort i den andra så är det en kö. Jmf en system- bolagskö t ex. En stack fyller man på i *en* ända och tar bort i samma ända, sen beror det ju på relativitsteorin från vilket håll man ser stacken!
-
· Text 609 · w6 · kommentarDet beror på hur man ser s(t)a(c)ken, i en Z80 visar man normalt minnes- kartan med lägre adresser (från 0) i den nedre delen, medan man i t ex 6502 visar den "upp och ner".
-
-
· Text 607 · w6 · kommentarEftersom jag kommenterade ett inlägg av en ABC80 innehavare så insåg jag inte att jag var i BASIC II mötet så att säga, därav referensen till BASIC I!
-
-
· Text 603 · w8 · kommentarNej, det MÅSTE vara LUX-NET OCH 802:or. Fast man kan sätta in ett optionsprom för en 802:a i en 806:a så går det! Kravet i det fallet är MEM: som tar lite minne. Från början körde vi CAT-NET men sedan vidarutvecklade vi till LUX-NET och den versionen gick inte alls längre att köra på CAT-NET. Kanske finns den gamla CAT-NET versionen kvar på disketter...
-
-
-
-
· Text 592 · w8 · kommentarDet skall inte smälla vid första läsningen utan "smälla" när man stänger luckan om man byglat rätt Hälsningar Göran
-
· Text 593 · w8 · kommentarVaddå? Kontinuerlig headload? Även när driven står stilla? TELL ME MORE! MVH Martin
-
-
-
· Text 600 · w6 · kommentarOm du vet att du har talsträngar så kan du använda funktionen COMP%, som jämför två talsträngar (ASCII-aritmetik) och ger ett likadant resultat som funktionen SGN(tal).
-
-
-
· Text 587 · w8 · kommentarJa det går om båda winchestrarna är lika (eller att man 'klassa ner' den bättre till likvärdig den andra. OBS byte av prom på kontrolerkortet är ett måste. Och du kan nog bara erhålla 16 MB/max per disk. (1 fysisk = 1 logisk)
-
-