setbaud 1,9600,8,n,1 setp 0x7f02,0x01 mode_reco call set_language setrts on sett 10 wait tf_sign movd "^L Small-G-D-C V0.9c (Modul 2) *GDC09c.DW2* by J. Hoerhager AOPE/l/n",s7,0 out s7,0,c4 error_main: setp 0x7f02,0x01 mode_reco main_1: sett 50 main: setl 10,1 setrts on wait rx_sign,ans_sign,tf_sign case ans_sign,test_rx_sign loop_out_b: setl 10,2 readb s2,0,3 jz get_from_mess wrs s2,0,220 jnz error_write_out call copy_to_buffer wrchar ^J jmp loop_out_b get_from_mess: readb s7,0,0 jz main_1 out s7,0,c4 jmp loop_out_b error_write_out: movd "ERROR on printing data to serialport 2/n",s7,0 writeb s7,0,0 sendsig ans_sign,c0 setc 0,10 wait_again: sett 10 wait tf_sign case ans_sign,test1_tf_sign readb s7,0,0 jz wait_again out s7,0,c4 sendsig ans_sign,c0 jmp wait_again test1_tf_sign: case tf_sign,wait_again sett 10 decc 0 jnz wait_again wrs s2,0,220 jnz error_write_out call copy_to_buffer wrchar ^J jmp main_1 test_rx_sign: case rx_sign,test_tf_sign rds s7,0 out s7,0,c4 jmp main_1 test_tf_sign: case tf_sign,main call test_language jmp loop_out_b copy_to_buffer: compd "copy buffer2",s2,0 jnz store_buffer movd " ERROR on Small-GDC no possibility to copy the buffer!/n",s2,0 wrs s2,0,80 store_buffer: ret test_lan_end: ret test_language: comps s10,30,s10,33,2 jz test_lan_end set_language: movs s10,30,s10,33,2 compd "0 ",s10,30 jz gb_load_mess compd "1 ",s10,30 jz de_load_mess compd "2 ",s10,30 jz fr_load_mess compd "3 ",s10,30 jz se_load_mess compd "4 ",s10,30 jz be_load_mess compd "5 ",s10,30 jz ct_load_mess compd "6 ",s10,30 jz dk_load_mess compd "7 ",s10,30 jz es_load_mess compd "8 ",s10,30 jz fi_load_mess compd "9 ",s10,30 jz it_load_mess compd "10 ",s10,30 jz nl_load_mess compd "11 ",s10,30 jz no_load_mess compd "12 ",s10,30 jz pt_load_mess jmp gb_load_mess se_load_mess: call set_comm_smdr jmp def_mess ret be_load_mess: call set_comm_smdr jmp def_mess ret ct_load_mess: call set_comm_smdr jmp def_mess ret dk_load_mess: call set_comm_smdr jmp def_mess ret es_load_mess: call set_comm_smdr jmp def_mess ret fi_load_mess: call set_comm_smdr jmp def_mess ret it_load_mess: call set_comm_smdr movd " A??? CA ",0x8f00,160 movd " A?? CA ",0x8f00,176 movd "|UTENTE ",0x8f00,192 movd "|| TIPO",0x8f00,208 movd " ????? A???? CA ",0x8d00,96 movd " A???? CA ",0x8d00,112 movd "|UTENTE LINEA ",0x8d00,0 movd "|| TIPO| DAT",0x8d00,24 jmp def_mess ret nl_load_mess: call set_comm_smdr jmp def_mess ret no_load_mess: call set_comm_smdr jmp def_mess ret pt_load_mess: call set_comm_smdr jmp def_mess ret gb_load_mess: call set_comm_smdr movd " A??? RO ",0x8f00,160 movd " A?? RO ",0x8f00,176 movd "| USER ",0x8f00,192 movd "|| TYPE",0x8f00,208 movd " ????? A???? RO ",0x8d00,96 movd " A???? RO ",0x8d00,112 movd "| USER ",0x8d00,0 movd "| INIT.CHARG.TYPE",0x8d00,24 def_mess: movd "PB",0x9300,249 movd " ",0x9300,240 movd "EUR",0x9300,243 movd " ",0x9300,246 movd "0071 ",0x9c00,40 movd "00355 ",0x9c00,50 movd "check-out ",0x9400,0 movd " check-in ",0x9400,20 movd " EXT . TOTAL",0x9c00,0 movd " FULL TOTAL ",0x9c00,20 movd "Detailed bill for ",0x9000,0 movd "Subscriber: ",0x9000,32 movd "Dialled number: ",0x9000,64 movd "Duration of communication: ",0x9000,96 movd "Cost of communication: ",0x9000,128 movd "msg_32006 ",0x9000,160 movd " incl. VAT (20%) ",0x9000,192 movd "Thanks for your visit! ",0x9000,224 movd " for the rooms: /n",0x9100,0 movd " END OF LIST! /n",0x9100,32 movd " for barphone(s) calls:/n",0x9100,64 movd " for phone booth(s):):/n",0x9100,96 movd " for employee: /n",0x9100,128 movd " Paid calls /n",0x9100,160 movd " No calls! /n",0x9100,192 movd " ",0x9100,224 movd " ",0x9200,0 movd " ",0x9200,32 movd " ",0x9200,64 movd " ",0x9200,96 movd " ",0x9200,128 movd " ",0x9200,160 movd " ",0x9200,192 movd " ",0x9200,224 call msg_wait movd " ",0x9300,0 movd "No number assigned to code : ",0x9300,48 movd "No calls recorded for subscriber : ",0x9300,96 movd " List of paid calls : /n",0x9300,144 movd " deleted for the room ! /n",0x9300,192 movd " Deleted for the barphone(s)! /n",0x9400,48 movd " deleted for phone booth(s) sets!/n",0x9400,96 movd " deleted for employee's calls!/n",0x9400,144 movd " Subscriber not found in EXT-DBS!/n",0x9400,192 movd " FATAL ERROR EXT-DBS is full!/n",0x9500,0 movd " Subscriber inserted as 'ROOM-EXTENSION'!/n",0x9500,48 movd " Subscriber inserted as 'ADMIN-EXTENSION'!/n",0x9500,96 movd " FATAL ERROR FREE_POOL_BUFFER FULL!!!/n",0x9500,144 movd " ",0x9500,192 movd " ",0x9600,0 movd " ",0x9600,48 movd " ",0x9600,96 movd " ",0x9600,144 movd " ",0x9600,192 call msg_wait movd " List of calls not yet paid until: /n",0x9700,0 movd " Total of room calls not yet paid /n",0x9700,64 movd "from: to: /n",0x9700,128 movd " Total of paid room calls /n",0x9700,192 movd " List of calls for all room sets without billing!/n",0x9800,0 movd " List of barphone(s) calls without billing!/n",0x9800,64 movd " List of phone booth(s) calls without billing!/n",0x9800,128 movd " List of employee's calls without billing!/n",0x9800,192 movd " List of calls for subscriber: without billing!/n",0x9900,0 movd " List of calls for subscriber: with billing!/n",0x9900,64 movd " Daily report for barphone(s) calls with billing!/n",0x9900,128 movd " No ADMINISTRATION-SUBSCREIBER defined!!!/n",0x9900,192 movd " No BARPHONE defined!!!/n",0x9d00,0 movd " ",0x9d00,64 movd " ",0x9d00,128 movd " ",0x9d00,192 call msg_wait movd "| Room number | check-out in | Status |/n",0x9a00,0 movd "|USER LINE HOUR SERVIC DIALLED NUBER |/n",0x9a00,80 movd "|| TYPE| DATE | DURATION | ADD.| GBP |/n",0x9a00,160 movd " Monthly report of employee's calls with billing!/n",0x9b00,0 movd " Daily report of employee's calls with billing!/n",0x9b00,80 movd " Manual report of employee's calls with billing!/n",0x9b00,160 call mess_changed ret fr_load_mess: call set_comm_smdr movd " A??? CH ",0x8f00,160 movd " A?? CH ",0x8f00,176 movd "|USAGER ",0x8f00,192 movd "|| TYPE",0x8f00,208 movd " ????? A???? CH ",0x8d00,96 movd " A???? CH ",0x8d00,112 movd "| USAGER ",0x8d00,0 movd "|INIT. TAXE. TYPE",0x8d00,24 movd "PC",0x9300,249 movd " ",0x9300,240 movd "EUR",0x9300,243 movd " ",0x9300,246 movd "0656 ",0x9c00,40 movd "0328 ",0x9c00,50 movd "départ ",0x9400,0 movd " arrivée ",0x9400,20 movd " EXT . TOTAL",0x9c00,0 movd " TOTAL GENERAL ",0x9c00,20 movd "Facture détaillée de ",0x9000,0 movd "Abonné: ",0x9000,32 movd "Numéro cpmposé: ",0x9000,64 movd "Durée de communication: ",0x9000,96 movd "Coût de communication: ",0x9000,128 movd "msg_32006 ",0x9000,160 movd " inclus. TVA (20%) ",0x9000,192 movd "Danke fuer Ihren Besuch! ",0x9000,224 movd " pour les chambres: /n",0x9100,0 movd " FIN DE LISTE! /n",0x9100,32 movd " pour le bar: /n",0x9100,64 movd " pour les cabine(s): /n",0x9100,96 movd " pour les employé: /n",0x9100,128 movd " Appels payés /n",0x9100,160 movd " Pas d'appels ! /n",0x9100,192 movd " ",0x9100,224 movd " ",0x9200,0 movd " ",0x9200,32 movd " ",0x9200,64 movd " ",0x9200,96 movd " ",0x9200,128 movd " ",0x9200,160 movd " ",0x9200,192 movd " ",0x9200,224 call msg_wait movd " ",0x9300,0 movd "No number assigned to code : ",0x9300,48 movd "No calls recorded for subscriber : ",0x9300,96 movd " Liste des appels payés : /n",0x9300,144 movd " Effacés pour les chambres ! /n",0x9300,192 movd " Effacés pour le bar ! /n",0x9400,48 movd " Effacés pour les postes cabine(s)!/n",0x9400,96 movd " Effacés pour les employé !/n",0x9400,144 movd " Subscriber not found in EXT-DBS!/n",0x9400,192 movd " FATAL ERROR EXT-DBS is full!/n",0x9500,0 movd " Subscriber inserted as 'ROOM-EXTENSION'!/n",0x9500,48 movd " Subscriber inserted as 'ADMIN-EXTENSION'!/n",0x9500,96 movd " FATAL ERROR FREE_POOL_BUFFER FULL!!!/n",0x9500,144 movd " ",0x9500,192 movd " ",0x9600,0 movd " ",0x9600,48 movd " ",0x9600,96 movd " ",0x9600,144 movd " ",0x9600,192 call msg_wait movd " Liste des appels non réglés jusqu'au: /n",0x9700,0 movd " Total des appels chambres non payés FF /n",0x9700,64 movd " du: au: /n",0x9700,128 movd " Total des appels chambres payés FF /n",0x9700,192 movd " Liste des appels pour tous les postes sans facture!/n",0x9800,0 movd " Liste des appels depuis le bar sans facture!/n",0x9800,64 movd " Liste des appels cabine(s) sans facture!/n",0x9800,128 movd " Liste des appels des employés sans facture!/n",0x9800,192 movd " Liste des appels de abonné sans facture!/n",0x9900,0 movd " Liste des appels de abonné: facture!/n",0x9900,64 movd " Relevé journalier des appels depuis le bar facture!/n",0x9900,128 movd " Kein ADMINISTRATIONS-TEILNEHMER definiert!!!/n",0x9900,192 movd " Kein BAR-Telefon definiert!!!/n",0x9d00,0 movd " ",0x9d00,64 movd " ",0x9d00,128 movd " ",0x9d00,192 call msg_wait movd "|Numéro de chambre| départ arrivée | Statut |/n",0x9a00,0 movd "|USAGER LIGNE HEURE SERVIC NUMERO CORRESPONDANT |/n",0x9a00,80 movd "|| TYPE| DATE | DUREE | COMP.| FRF |/n",0x9a00,160 movd " Relevé mensuel des appels des employés facture!/n",0x9b00,0 movd " Relevé journalier des appels des employés facture!/n",0x9b00,80 movd " Relevé mensuel des appels des employés facture!/n",0x9b00,160 call mess_changed ret de_load_mess: call set_comm_smdr movd " A??? ZI ",0x8f00,160 movd " A?? ZI ",0x8f00,176 movd "|TLN.-NR ",0x8f00,192 movd "|| TYP ",0x8f00,208 movd " ????? A???? ZI ",0x8d00,96 movd " A???? ZI ",0x8d00,112 movd "| TLN.-NR ",0x8d00,0 movd "|| TYP ",0x8d00,24 movd "GZ",0x9300,249 movd "ATS",0x9300,240 movd "EUR",0x9300,243 movd " ",0x9300,246 movd "13760 ",0x9c00,40 movd "06880 ",0x9c00,50 movd "check-out ",0x9400,0 movd " check-in ",0x9400,20 movd " TLN . SUMME",0x9c00,0 movd " GESAMTSUMME ",0x9c00,20 movd "Einzelgespraechsrechnung von ",0x9000,0 movd "Teilnehmer: ",0x9000,32 movd "Gewaehlte Rufnummer: ",0x9000,64 movd "Gespraechsdauer: ",0x9000,96 movd "Gespraechskosten: ",0x9000,128 movd "msg_32006 ",0x9000,160 movd " inklusive MWST (20%) ",0x9000,192 movd "Danke fuer Ihren Besuch! ",0x9000,224 movd " fuer Zimmertelefone:/n",0x9100,0 movd " ENDE DER LISTE!/n",0x9100,32 movd " fuer Bartelefon(e):/n",0x9100,64 movd " fuer Telefonzelle(n):/n",0x9100,96 movd " fuer Betriebsteilnehmer:/n",0x9100,128 movd " Abgerechnete Gebuehren /n",0x9100,160 movd " Keine Gespraeche!/n",0x9100,192 movd " ",0x9100,224 movd " ",0x9200,0 movd " ",0x9200,32 movd " ",0x9200,64 movd " ",0x9200,96 movd " ",0x9200,128 movd " ",0x9200,160 movd " ",0x9200,192 movd " ",0x9200,224 call msg_wait movd " ",0x9300,0 movd "Keine Rufnummer zugeordnet zu Code: ",0x9300,48 movd "Keine Gespraeche eingetragen fuer Teilnehmer: ",0x9300,96 movd " Liste abgerechneter Gebuehren:/n",0x9300,144 movd " fuer Zimmertelefon(e) geloescht!/n",0x9300,192 movd " fuer Bartelefon(e) geloescht!/n",0x9400,48 movd " fuer Telefonzelle(n) geloescht!/n",0x9400,96 movd " fuer Betriebsteilnehmer geloescht!/n",0x9400,144 movd " Teilnehmer in EXT-DBS nicht gefunden!/n",0x9400,192 movd " ACHTUNG!! FEHLER!! EXT-DBS ist voll!/n",0x9500,0 movd " Teilnehmer als 'ROOM-EXTENSION' eingetragen!/n",0x9500,48 movd " Teilnehmer als ADMIN-EXTENSION' eingtragen!/n",0x9500,96 movd " FATAL ERROR FREE_POOL_BUFFER FULL!!!/n",0x9500,144 movd " ",0x9500,192 movd " ",0x9600,0 movd " ",0x9600,48 movd " ",0x9600,96 movd " ",0x9600,144 movd " ",0x9600,192 call msg_wait movd " Liste offener Gebuehren bis: /n",0x9700,0 movd " Summe offener Gebuehren ATS /n",0x9700,64 movd " vom: bis: /n",0x9700,128 movd " Summe abgerechneter Gebuehren ATS /n",0x9700,192 movd " Gebuehrenliste aller Zimmertelefone ohne Abrechnung!/n",0x9800,0 movd " Gebuehrenliste Bartelefon(e) ohne Abrechnung!/n",0x9800,64 movd " Gebuehrenliste Telefonzelle(n) ohne Abrechnung!/n",0x9800,128 movd " Gebuehrenliste aller Betriebsteilnehmer ohne Abrechnung!/n",0x9800,192 movd " Gebuehrenliste fuer Teilnehmer: ohne Abrechnung!/n",0x9900,0 movd " Gebuehrenliste fuer Teilnehmer: und Abrechnung!/n",0x9900,64 movd " Taeglicher Gebuehrenausdruck f. Bartelefon(e) und Abrechnung!/n",0x9900,128 movd " Kein ADMINISTRATIONS-TEILNEHMER definiert!!!/n",0x9900,192 movd " Kein BAR-Telefon definiert!!!/n",0x9d00,0 movd " ",0x9d00,64 movd " ",0x9d00,128 movd " ",0x9d00,192 call msg_wait movd "| Zimmernummer | Checkout - in | Status |/n",0x9a00,0 movd "|TLN.Nr LTG.Nr UHRZEIT DIENST ZIEL-NR. |/n",0x9a00,80 movd "|| TYP | DATUM | DAUER | ZUS.| ATS |/n",0x9a00,160 movd " Monatlicher Gebuehrenausdruck f. Betriebsteilnehmer und Abrechnung!/n",0x9b00,0 movd " Taeglicher Gebuehrenausdruck f. Betriebsteilnehmer und Abrechnung!/n",0x9b00,80 movd " Manueller Gebuehrenausdruck f. Betriebsteilnehmer und Abrechnung!/n",0x9b00,160 call mess_changed ret mess_changed: movd " Message file changed to filenumber: /n",s7,100 movs s10,30,s7,138,2 out s7,100,c4 ret set_comm_smdr: movd " A??? --> ",0x8f00,0 movd " A??? T-> ",0x8f00,32 movd " A??? -D> ",0x8f00,64 movd " A??? CS? ",0x8f00,96 movd " A?? --> ",0x8f00,16 movd " A?? T-> ",0x8f00,48 movd " A?? -D> ",0x8f00,80 movd " A?? CS? ",0x8f00,112 movd " A??? <-- ",0x8e00,0 movd " A??? <-T ",0x8e00,32 movd " A??? ",0x8e00,160 movd " ????? A???? |->",0x8e00,176 movd " ????? A???? CS?",0x8e00,192 movd " A???? --> ",0x8e00,208 movd " A???? |-> ",0x8e00,224 movd " A???? CS? ",0x8e00,240 movd " ????? A???? <--",0x8e00,96 movd " ????? A???? <-|",0x8e00,112 movd " A???? --> ",0x8e00,128 movd " A???? <-| ",0x8e00,144 movd " ????? A???? ",0x8f00,224 movd " A???? ",0x8f00,240 ret msg_wait: sett 1 wait tf_sign ret zzz: end