Skrypt kolorujący kod programu

Stronę tą wyświetlono już: 1139 razy

Warning: Missing argument 2 for fk(), called in /home/obli/domains/obliczeniowo.com.pl/public_html/php_page_scripts/formattingCodeFunctions.php on line 289 and defined in /home/obli/domains/obliczeniowo.com.pl/public_html/php_page_scripts/formattingCodeFunctions.php on line 199

W końcu ruszyłem swoje cztery litery (a w zasadzie dwie moje ręce) i napisałem skrypt, który koloruje składnię kilku języków programowania, takich jak: C++, Libre Office BASIC, PHP oraz html. Samego skryptu nie publikuję bo raz, że trochę nad nim posiedziałem a dwa, że jest on zoptymalizowany pod moją stronę.

Kolorowanie składni kodu napisanego w C++

Poniżej zamieszczam przykładowy kod źródłowy prostego programu, aby pokazać, jak mój skrypt koloruje kod napisany w tym języku:

Listing 1
  1. // Kod programu liczącego liczbę <b>π</b> z zadanym odchyleniem maksymalnym z wykorzystaniem wzoru Leibniz-a
  3. #define _USE_MATH_DEFINES
  5. #include <math.h>
  6. #include <stdlib.h>
  7. #include <iostream>
  9. int main()
  10. {
  11. double pi = 0;
  12. int n = 1;
  13. double prec = 0;
  15. std::cout<<"Maksymalne odchylenie:";
  16. std::cin>>prec;
  18. while(abs(pi - M_PI) > prec){
  19. pi += 4 * (n % 2 == 0? -1.0: 1.0) / (2 * n - 1);
  20. printf("%.12f %.12f %i
  21. ",pi,abs(pi - M_PI),n);
  22. n++;
  23. }
  24. getchar();
  25. getchar();
  26. return 0;
  27. }

Powyższy kod został użyty przeze mnie na stronie Matematyka → Zagadnienia ogólne → Liczba pi i jej wyznaczanie.

Kolorowanie składni programu napisanego w PHP

Poniżej zamieszczam wycinek kodu źródłowego, skryptu który omawiany był na stronie Programowanie → Skrypty PHP → Skrypt klasy tworzącej wykres słupkowy:

Listing 2
  1. <?
  2. // Skrypt do tworzenia wykresów słupkowych
  3. // Strona domowa: http://obliczeniowo.com.pl/?id=165---skrypt-klasy-tworzacej-wykres-slupkowy
  5. header('Content-type: image/png');
  7. class cValue{
  8. public $v;
  9. public $color;
  10. public $color2;
  11. public $color3;
  12. public $name;
  14. public function __construct($v, $color, $color2, $color3, $name){
  15. $this->v = $v;
  16. $this->color = $color;
  17. $this->color2 = $color2;
  18. $this->color3 = $color3;
  19. $this->name = $name;
  20. }
  21. }

Kolorowanie składni Libre Office BASIC

Przykładowy kod funkcji, którą wcześniej umieściłem na stronie Programowanie → OpenOffice BASIC → Generator liczb losowych z kolorowaniem tła komórek:

Listing 3
  1. Function SetColor(k as double, w as double)
  3. Dim document as object
  4. Dim dispatcher as object
  6. document = ThisComponent.CurrentController.Frame
  7. dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
  9. Dim args2(0) as new com.sun.star.beans.PropertyValue
  11. args(0).Name = "BackgroundColor"
  12. args(0).Value = Int(255 * w / k) * 256 * 256 + Int(255 - 255 * w / k) * 256
  13. dispatcher.executeDispatch(document, ".uno:BackgroundColor","",0,args())
  15. End Function
  17. Sub Generator
  19. Dim document as object
  20. Dim dispatcher as object
  22. document = ThisComponent.CurrentController.Frame
  23. dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
  25. Dim args(0) as new com.sun.star.beans.PropertyValue
  26. args(0).Name = "ToPoint"
  27. args(0).Value = "$B$2"
  29. dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args())
  31. Dim i as integer
  32. Dim j as integer
  34. For j = 1 To 10
  35. For i = 1 To 10
  36. Dim str as string
  37. Dim w as double
  39. w = rnd()
  40. str = w
  42. args(0).Name = "StringName"
  43. args(0).Value = str
  45. dispatcher.executeDispatch(document, ".uno:EnterString", "", 0, args())
  47. SetColor(1, w)
  49. dispatcher.ExecuteDispatch(document, ".uno:GoDown", "" , 0 ,Array())
  50. Next i
  51. For i = 1 To 10
  52. dispatcher.ExecuteDispatch(document, ".uno:GoUp", "", 0, Array())
  53. Next i
  54. dispatcher.ExecuteDispatch(document, ".uno:GoRight", "", 0, Array())
  55. Next j
  57. End Sub

Kolorowanie składni html

Ostatni przykład, który zamieściłem już wcześniej na stronie Programowanie → Skrypty PHP → Prosta przeglądarka plików graficznych:

  1. <html>
  2. <head>
  3. <meta http-equiv="Content-Type" content="text/html;
  4. charset=windows-1250">
  5. <title>Przeglądanie zdjęć w katalogu</title>
  6. </head>
  7. <body>
  9. <?
  11. function CreateImArr($directory, $extension){ // Funkcja tworząca tablicę zawierającą ścieżki do plików o rozszerzeniu extension
  12. $kartoteka = opendir($directory);
  13. while($nazwa_pliku = readdir($kartoteka)){
  14. $arr = pathinfo($nazwa_pliku);
  15. if(strtolower($arr["extension"])==$extension){
  16. $pathAndFileName[] = $directory . $nazwa_pliku;
  17. }
  18. }
  19. closedir($kartoteka);
  21. return $pathAndFileName;
  22. }
  24. $tab = CreateImArr("./Kwiaty/","jpg"); // Kwiaty - nazwa katalogu, który będzie przeszukiwany
  26. if(count($tab)):
  28. $left = intval($_POST["Poprzedni"]);
  29. $right = intval($_POST["Następny"]);
  31. $index = $left + $right - 1;
  33. if($index < 0){
  34. $index = 0;
  35. }elseif($index >= count($tab)){
  36. $index = count($tab) - 1;
  37. }
  39. echo("<p style="text-align:center"><img src="" . $tab[$index] . ""></p>");
  41. echo("<FORM action = "browser.php" method = POST>"); // browser.php - nazwa własna pliku tego skryptu
  43. echo("<p stule="text-align:center">");
  45. if($index > 0){
  46. echo("<input type="Submit" value="" . ($index) . "" name="Poprzedni"> - ");
  47. }
  49. echo($index +1);
  51. if($index < count($tab) - 1){
  52. echo(" - <input type="Submit" value="" . ($index + 2) . "" name="Następny">");
  53. }
  55. echo("</p></FORM>");
  56. }
  57. ?>
  58. </body>
  59. </html>
Tematy powiązane

Komentarze