Windows.c 830 B

12345678910111213141516171819202122232425262728293031323334353637
  1. // An example of using windows in TIGCC
  2. // Compile for all calcs
  3. #define USE_TI89
  4. #define USE_TI92PLUS
  5. #define USE_V200
  6. #define MIN_AMS 100
  7. #include <kbd.h>
  8. #include <wingraph.h>
  9. void _main(void)
  10. {
  11. WINDOW w1,w2,w3;
  12. WinOpen(&w1,&(WIN_RECT){20,20,80,50},WF_SAVE_SCR|WF_TTY);
  13. WinBackground(&w1,A_NORMAL);
  14. WinAttr(&w1,A_REVERSE);
  15. WinFont(&w1,F_8x10);
  16. WinActivate(&w1);
  17. WinClr(&w1);
  18. WinStr(&w1,"Hello world!");
  19. WinOpen(&w2,&(WIN_RECT){3,60,67,87},WF_SAVE_SCR|WF_ROUNDEDBORDER|WF_TITLE,"ROUNDED WORLD");
  20. WinFont(&w2,F_4x6);
  21. WinActivate(&w2);
  22. WinStrXY(&w2,4,4,"Again hello!");
  23. WinOpen(&w3,&(WIN_RECT){70,40,150,70},WF_SAVE_SCR);
  24. WinFont(&w3,F_4x6);
  25. WinActivate(&w3);
  26. WinStrXY(&w3,5,8,"Hello (third) world!");
  27. ngetchx();
  28. WinClose(&w3);
  29. ngetchx();
  30. WinClose(&w2);
  31. ngetchx();
  32. WinClose(&w1);
  33. }