Advertisement
Picko

KP_zadanie_zobrazciaru_&_zobraztext

Dec 15th, 2013
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Java 1.38 KB | None | 0 0
  1. /* zobraz text */
  2.         | OUTPUT LOZAT Vyraz CIARKA Vyraz POZAT STR_LITERAL COLOR FARBA BCIARKA
  3.             {
  4.              $$ = (char*)malloc(480+strlen($9)+strlen($7)+strlen($3.kod)+strlen($5.kod));
  5.              sprintf($$,"\taload\t1\n \tnew\tjava/awt/Font\n \tdup\n \tldc\t\"ARIAL\"\n\t getstatic\tjava/awt/Font\tBOLD I\n"
  6.                     "\tsipush\t20\n\t invokespecial\tjava/awt/Font <init>\t(Ljava/lang/String;II)V\n\t invokevirtual\tjava/awt/Graphics\tsetFont\t(Ljava/awt/Font;)V\n"
  7.                     "\taload\t1\n\tgetstatic java/awt/Color %s Ljava/awt/Color;\n\t invokevirtual  java/awt/Graphics setColor (Ljava/awt/Color;)V\n"
  8.                     "\taload\t1\n\t ldc\t\"%s\"\n%s%s\tinvokevirtual java/awt/Graphics drawString (Ljava/lang/String;II)V\n",
  9.                     $9, $7, $3.kod, $5.kod);
  10.              free($9);
  11.              free($7);
  12.              free($3.kod);
  13.              free($5.kod);
  14.             }
  15.  
  16.  
  17.            
  18. /* zobraz ciaru */
  19.         | LINE FROM LOZAT Vyraz CIARKA Vyraz POZAT TO LOZAT Vyraz CIARKA Vyraz POZAT IN FARBA BCIARKA
  20.            
  21.             {
  22.              $$ = (char*)malloc(185+strlen($4.kod)+strlen($6.kod)+strlen($10.kod)+strlen($12.kod)+strlen($15));
  23.                 sprintf($$, "\taload\t1\n\tgetstatic java/awt/Color %s Ljava/awt/Color;\n \tinvokevirtual  java/awt/Graphics setColor (Ljava/awt/Color;)V\n \taload\t1\n %s%s%s%s \tinvokevirtual  java/awt/Graphics drawLine (IIII)V\n",
  24.                 $15, $4.kod, $6.kod, $10.kod, $12.kod);
  25.             free($4.kod);
  26.             free($6.kod);
  27.             free($10.kod);
  28.             free($12.kod);
  29.             free($15);
  30.             }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement