This is an old revision of the document!
5 REM — KONFIGURACIJA BOJA — 6 L$=CHR$(31) :REM BOJA LOGOTIPA 7 Z$=CHR$(5) :REM BOJA Naziva fakulteta 8 R$=CHR$(158) :REM BOJA CRTICA/LINIJA 9 M$=CHR$(153) :REM BOJA STAVKI IZBORNIKA 10 S$=CHR$(154) :REM BOJA SJENE LOGOTIPA 11 W$=CHR$(153) :REM BOJA UNOSA 13 REM —————————————- 15 POKE 53280,0:POKE 53281,0:PRINT CHR$(147);CHR$(14) 20 B$=L$+CHR$(18)+“ ”+CHR$(146):REM LOGO BLOK 30 SJ$=S$+CHR$(18)+“ ”+CHR$(146):REM SJENA BLOK 40 REM — FIDIT LOGOTIP — 50 PRINT TAB(10)B$B$B$SJ$ “ ” B$SJ$ “ ” B$B$SJ$ “ ” B$SJ$ “ ” B$B$B$SJ$ 60 PRINT TAB(10)B$SJ$ “ ” B$SJ$ “ ” B$SJ$ B$SJ$ “ ” B$SJ$ “ ” B$SJ$ 70 PRINT TAB(10)B$B$SJ$ “ ” B$SJ$ “ ” B$SJ$ B$SJ$ “ ” B$SJ$ “ ” B$SJ$ 80 PRINT TAB(10)B$SJ$ “ ” B$SJ$ “ ” B$SJ$ B$SJ$ “ ” B$SJ$ “ ” B$SJ$ 90 PRINT TAB(10)B$SJ$ “ ” B$SJ$ “ ” B$B$SJ$ “ ” B$SJ$ “ ” B$SJ$ 100 REM — NAZIV FAKULTETA — 110 PRINT:PRINT Z$TAB(9)“Fakultet informatike i” 120 PRINT TAB(9)“digitalnih tehnologija”:PRINT 130 REM — IZBORNIK — 140 PRINT R$“—————————————-” 150 PRINT M$“ 1. Prijediplomski studij” 160 PRINT “ 2. Diplomski studij” 170 PRINT “ 3. Doktorski studij”:PRINT 180 PRINT R$“—————————————-” 190 PRINT:PRINT W$;:INPUT “Vas izbor (1-3)”;IZ 200 IF IZ<1 OR IZ>3 THEN 190 210 ON IZ GOSUB 300, 400, 500 220 GOTO 15 300 PRINT CHR$(147):POKE 646,7:PRINT “Prijediplomski studij”:GOTO 600 400 PRINT CHR$(147):POKE 646,3:PRINT “Diplomski studij”:GOTO 600 500 PRINT CHR$(147):POKE 646,5:PRINT “Doktorski studij”:GOTO 600 600 PRINT:PRINT W$“Pritisni Enter za nazad”:INPUT A$:RETURN