home *** CD-ROM | disk | FTP | other *** search
/ CD/PC Actual 15 / CDACTUAL15.iso / cdactual / program / basic / QB4WIN30.ZIP / W30.DEC < prev    next >
Encoding:
Text File  |  1980-01-02  |  2.1 KB  |  45 lines
  1. DECLARE SUB Adapter (a%)
  2. DECLARE SUB CGA ()
  3. DECLARE SUB ChangeAttr (BYVAL attr%)
  4. DECLARE SUB CloseLastW ()
  5. DECLARE SUB closew (BYVAL segment%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  6. DECLARE SUB DebugW ()
  7. DECLARE SUB defborder (x$)
  8. DECLARE SUB Dump2 (BYVAL r%, BYVAL c%, BYVAL attr%, BYVAL border%, BYVAL NLines%, BYVAL NCol%, BYVAL segment%, offset%, BYVAL format%, BYVAL refreshrate%)
  9. DECLARE SUB FillW (BYVAL offset%, BYVAL stringAddress%)
  10. DECLARE SUB GScrollL8 (BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  11. DECLARE SUB haltprintmain (a$, BYVAL attr%, BYVAL r1%, BYVAL c1%, BYVAL r2%, BYVAL c2%, BYVAL r3%, BYVAL c3%)
  12. DECLARE SUB HaltPrintW (a$, BYVAL attr%, BYVAL r%, BYVAL c%)
  13. DECLARE SUB InitW (RR%, CC%)
  14. DECLARE SUB Int10 (ax%, bx%, cx%, dx%)
  15. DECLARE SUB int3
  16. DECLARE SUB KLS
  17. DECLARE SUB Kolor (BYVAL fore%, BYVAL back%)
  18. DECLARE SUB Lokate (BYVAL r%, BYVAL c%)
  19. DECLARE SUB Monochrome ()
  20. DECLARE SUB OpenW (BYVAL border%, BYVAL attr%, BYVAL segment%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  21. DECLARE SUB PrintMain (a$, BYVAL attr%, BYVAL r1%, BYVAL c1%, BYVAL r2%, BYVAL c2%, BYVAL r3%, BYVAL c3%)
  22. DECLARE SUB Printt (a$, BYVAL attr%, BYVAL r%, BYVAL c%)
  23. DECLARE SUB PrintW (a$, BYVAL attr%, BYVAL r%, BYVAL c%)
  24. DECLARE SUB Prnt (a$)
  25. DECLARE SUB PrntH (BYVAL i%)
  26. DECLARE SUB PrntI (BYVAL i%)
  27. DECLARE SUB PrntS (BYVAL i!)
  28. DECLARE SUB PrntUsingS (Mask$, BYVAL i!)
  29. DECLARE SUB PrntW (a$)
  30. DECLARE SUB ReadScreen (a$, BYVAL r%, BYVAL c%)
  31. DECLARE SUB Refresh ()
  32. DECLARE SUB ReturnSegments (cs%, ds%)
  33. DECLARE SUB saveW (BYVAL segment%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  34. DECLARE SUB scrolld (BYVAL attr%, BYVAL lines%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  35. DECLARE SUB scrollL (BYVAL attr%, BYVAL cols%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  36. DECLARE SUB scrollr (BYVAL attr%, BYVAL cols%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  37. DECLARE SUB scrollu (BYVAL attr%, BYVAL lines%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  38. DECLARE SUB SetViewPage (BYVAL p%)
  39. DECLARE SUB SetViewW (BYVAL page%, BYVAL TR%, BYVAL LC%, BYVAL BR%, BYVAL RC%)
  40. DECLARE SUB SwapAttr ()
  41.  
  42. COMMON SHARED RR AS INTEGER, CC AS INTEGER
  43. InitW RR, CC
  44.  
  45.