home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / oslib / Hdr / ServiceInt < prev    next >
Encoding:
Text File  |  1994-07-01  |  2.2 KB  |  99 lines
  1. ;AAsm header file for ServiceInternational
  2. ;written by DefMod (Jul  1 1994) on Fri Jul  1 16:18:36 1994
  3.  
  4.         [       :LNOT: :DEF: Get_Types
  5.         GBLS    Get_Types
  6. Get_Types                       SETS    "GET OS:Hdr.Types"
  7.         |
  8. Get_Types                       SETS    ""
  9.         ]
  10.         $Get_Types
  11.  
  12.         [       :LNOT: :DEF: Get_OS
  13.         GBLS    Get_OS
  14. Get_OS                          SETS    "GET OS:Hdr.OS"
  15.         |
  16. Get_OS                          SETS    ""
  17.         ]
  18.         $Get_OS
  19.  
  20.         [       :LNOT: :DEF: ServiceInternational_Hdr
  21.         GBLS    ServiceInternational_Hdr
  22.  
  23. ;Symbols for constants
  24. Error_UnknownAlphabet           *       &640
  25. Error_UnknownCountry            *       &641
  26. Error_UnknownKeyboard           *       &642
  27.  
  28. ;Symbols for SWI's and SWI reason codes
  29. Service_International           *       &43
  30.  
  31. ServiceInternational_CountryNameToCountryNumber *       &0
  32.    ;Entry
  33.    ;  R1 = &43
  34.    ;  R2 = &0
  35.    ;  R3 -> country_name (String)
  36.    ;Exit
  37.    ;  R1 = unclaimed (Bool)
  38.    ;  R4 = country_no (Int)
  39.  
  40. ServiceInternational_AlphabetNameToAlphabetNumber *       &1
  41.    ;Entry
  42.    ;  R1 = &43
  43.    ;  R2 = &1
  44.    ;  R3 -> alphabet_name (String)
  45.    ;Exit
  46.    ;  R1 = unclaimed (Bool)
  47.    ;  R4 = alphabet_no (Int)
  48.  
  49. ServiceInternational_CountryNumberToCountryName *       &2
  50.    ;Entry
  51.    ;  R1 = &43
  52.    ;  R2 = &2
  53.    ;  R3 = country_no (Int)
  54.    ;  R4 = buffer (pointer to String)
  55.    ;  R5 = size (Int)
  56.    ;Exit
  57.    ;  R1 = unclaimed (Bool)
  58.    ;  R5 = used (Int)
  59.  
  60. ServiceInternational_AlphabetNumberToAlphabetName *       &3
  61.    ;Entry
  62.    ;  R1 = &43
  63.    ;  R2 = &3
  64.    ;  R3 = alphabet_no (Int)
  65.    ;  R4 = buffer (pointer to String)
  66.    ;  R5 = size (Int)
  67.    ;Exit
  68.    ;  R1 = unclaimed (Bool)
  69.    ;  R5 = used (Int)
  70.  
  71. ServiceInternational_CountryNumberToAlphabetNumber *       &4
  72.    ;Entry
  73.    ;  R1 = &43
  74.    ;  R2 = &4
  75.    ;  R3 = country_no (Int)
  76.    ;Exit
  77.    ;  R1 = unclaimed (Bool)
  78.    ;  R4 = alphabet_no (Int)
  79.  
  80. ServiceInternational_DefineChars *       &5
  81.    ;Entry
  82.    ;  R1 = &43
  83.    ;  R2 = &5
  84.    ;  R3 = alphabet_no (Int)
  85.    ;  R4 = first (Byte)
  86.    ;  R5 = last (Byte)
  87.    ;Exit
  88.    ;  R1 = unclaimed (Bool)
  89.  
  90. ServiceInternational_NewKeyboard *       &6
  91.    ;Entry
  92.    ;  R1 = &43
  93.    ;  R2 = &6
  94.    ;  R3 = keyboard_no (Int)
  95.    ;  R4 = alphabet_no (Int)
  96.  
  97.         ]
  98.         END
  99.