Bubble sort, μέθοδος ταξινόμησης

Πολλές φορές στα προγράμματά μας, έχουμε δεδομένα σε πίνακα και θέλουμε να τα ταξινομήσουμε (π.χ. περιέχουν ονόματα που τα θέλουμε με σειρά αλφαβητική). Ο παρακάτω κώδικας είναι ο ποιο απλός και ονομάζεται "ταξινόμηση της φυσαλίδας". Η δομή που χρησιμοποιώ παρακάτω, είναι "μη δομημένου"  προγραμματισμού, για να ταιριάζει σ' όλες τις εκδόσεις Basic των 8bit υπολογιστών μας.

100 LET swap=0
110 FOR i=2 TO length(A)
120 IF A[i-1] > A[i] THEN 

    LET temp=A[i-1]: 

    LET A[i-1]=A[i]:

    LET A[i]=TEMP: 

    LET swap=1
130 NEXT i
140 IF swap = 1 THEN GOTO 100

Οπου Α τ' όνομα του πίνακα που θέλουμε να ταξινομήσουμε και length(A) το μέγεθος του. Αν θέλουμε φθίνουσα ταξινόμηση (δηλαδή το μεγαλύτερο στη πρώτη θέση), αλλάζουμε τη φορά της ανίσωσης στη γραμμή 120.