// File: jkingan[P]ladyheather/heather.cpp
// Function: plot_mark(int)
void plot_mark(int symbol)
{
int x;
int y;
int temp;
char c;

   // draw the plot marker chars at the top of the plot area

   if(symbol < 0) symbol = 1;
   else if(symbol >= MAX_MARKER) symbol = (MAX_MARKER - 1);

   if(symbol < 10) c = ('0' + symbol);
   else            c = ('A' + symbol - 10);

   // draw user set data markers in the plot
   y = PLOT_ROW;
   x = PLOT_COL+plot_column;

   if(symbol == 0) {   // the mouse click marker
      temp = MARKER_COLOR;
if(button_lock && touch_screen) temp = YELLOW;
      dot(x+0, y+5, temp);
      dot(x+1, y+4, temp);    dot(x-1, y+4, temp);
      dot(x+2, y+3, temp);    dot(x-2, y+3, temp);
      dot(x+3, y+2, temp);    dot(x-3, y+2, temp);
      dot(x+4, y+1, temp);    dot(x-4, y+1, temp);
      dot(x+5, y+0, temp);    dot(x-5, y+0, temp);

      y = PLOT_ROW+PLOT_HEIGHT-1;
      dot(x+0, y-5, temp);
      dot(x+1, y-4, temp);    dot(x-1, y-4, temp);
      dot(x+2, y-3, temp);    dot(x-2, y-3, temp);
      dot(x+3, y-2, temp);    dot(x-3, y-2, temp);
      dot(x+4, y-1, temp);    dot(x-4, y-1, temp);
      dot(x+5, y-0, temp);    dot(x-5, y-0, temp);
   }
   else {   // the numeric markers
      #ifdef DIGITAL_CLOCK
         // we can use the vector character code to draw the markers
         x -= VCHAR_SCALE/2;
         if(x < 0) x = 0;
         temp = VCHAR_SCALE;
         if(SCREEN_HEIGHT < MEDIUM_HEIGHT) VCHAR_SCALE = 0;
         else VCHAR_SCALE = 1;
if(plot_adev_data) y += TEXT_HEIGHT;
         vchar(x,y+2, 0, MARKER_COLOR, c);
         VCHAR_SCALE = temp;
      #else
         // use text chars for the markers (may not go exactly where we want in DOS)
         #ifdef WIN_VFX
            graphics_coords = 1;
            x -= TEXT_WIDTH/2;
            if(x < 0) x = 0;
            y += 2;
         #endif
if(plot_adev_data) y += TEXT_HEIGHT;
         sprintf(out, "%c", c);
         vidstr(y,x, MARKER_COLOR, out);
         graphics_coords = 0;
      #endif
   }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x20, %rsp
movl %edi, -0x4(%rbp)
cmpl $0x0, -0x4(%rbp)
jge 0x200aa
movl $0x1, -0x4(%rbp)
jmp 0x200b9
cmpl $0xa, -0x4(%rbp)
jl 0x200b7
movl $0x9, -0x4(%rbp)
jmp 0x200b9
cmpl $0xa, -0x4(%rbp)
jge 0x200ca
movl -0x4(%rbp), %eax
addl $0x30, %eax
movb %al, -0x11(%rbp)
jmp 0x200d6
movl -0x4(%rbp), %eax
addl $0x41, %eax
subl $0xa, %eax
movb %al, -0x11(%rbp)
movl 0x257980(%rip), %eax    # 0x277a5c
movl %eax, -0xc(%rbp)
movl 0x25797b(%rip), %eax    # 0x277a60
addl 0x25a4c1(%rip), %eax    # 0x27a5ac
movl %eax, -0x8(%rbp)
cmpl $0x0, -0x4(%rbp)
jne 0x20329
movl $0xb, -0x10(%rbp)
cmpl $0x0, 0x37f24e(%rip)    # 0x39f354
je 0x20118
cmpb $0x0, 0x25a2ef(%rip)    # 0x27a3fe
je 0x20118
movl $0xe, -0x10(%rbp)
movl -0x8(%rbp), %edi
addl $0x0, %edi
movl -0xc(%rbp), %esi
addl $0x5, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x1, %edi
movl -0xc(%rbp), %esi
addl $0x4, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x1, %edi
movl -0xc(%rbp), %esi
addl $0x4, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x2, %edi
movl -0xc(%rbp), %esi
addl $0x3, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x2, %edi
movl -0xc(%rbp), %esi
addl $0x3, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x3, %edi
movl -0xc(%rbp), %esi
addl $0x2, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x3, %edi
movl -0xc(%rbp), %esi
addl $0x2, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x4, %edi
movl -0xc(%rbp), %esi
addl $0x1, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x4, %edi
movl -0xc(%rbp), %esi
addl $0x1, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x5, %edi
movl -0xc(%rbp), %esi
addl $0x0, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x5, %edi
movl -0xc(%rbp), %esi
addl $0x0, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl 0x257841(%rip), %eax    # 0x277a5c
addl 0x257847(%rip), %eax    # 0x277a68
subl $0x1, %eax
movl %eax, -0xc(%rbp)
movl -0x8(%rbp), %edi
addl $0x0, %edi
movl -0xc(%rbp), %esi
subl $0x5, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x1, %edi
movl -0xc(%rbp), %esi
subl $0x4, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x1, %edi
movl -0xc(%rbp), %esi
subl $0x4, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x2, %edi
movl -0xc(%rbp), %esi
subl $0x3, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x2, %edi
movl -0xc(%rbp), %esi
subl $0x3, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x3, %edi
movl -0xc(%rbp), %esi
subl $0x2, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x3, %edi
movl -0xc(%rbp), %esi
subl $0x2, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x4, %edi
movl -0xc(%rbp), %esi
subl $0x1, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x4, %edi
movl -0xc(%rbp), %esi
subl $0x1, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
addl $0x5, %edi
movl -0xc(%rbp), %esi
subl $0x0, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
movl -0x8(%rbp), %edi
subl $0x5, %edi
movl -0xc(%rbp), %esi
subl $0x0, %esi
movl -0x10(%rbp), %eax
movzbl %al, %edx
callq 0x10d70
jmp 0x203b1
movl 0x2623ed(%rip), %eax    # 0x28271c
movl $0x2, %ecx
cltd
idivl %ecx
movl %eax, %ecx
movl -0x8(%rbp), %eax
subl %ecx, %eax
movl %eax, -0x8(%rbp)
cmpl $0x0, -0x8(%rbp)
jge 0x2034e
movl $0x0, -0x8(%rbp)
movl 0x2623c8(%rip), %eax    # 0x28271c
movl %eax, -0x10(%rbp)
cmpl $0x2c6, 0x257683(%rip)  # imm = 0x2C6
jge 0x2036f
movl $0x0, 0x2623af(%rip)    # 0x28271c
jmp 0x20379
movl $0x1, 0x2623a3(%rip)    # 0x28271c
cmpb $0x0, 0x25a239(%rip)    # 0x27a5b9
je 0x2038e
movl 0x25766c(%rip), %eax    # 0x2779f4
addl -0xc(%rbp), %eax
movl %eax, -0xc(%rbp)
movl -0x8(%rbp), %edi
movl -0xc(%rbp), %esi
addl $0x2, %esi
xorl %edx, %edx
movl $0xb, %ecx
movzbl -0x11(%rbp), %r8d
callq 0x10710
movl -0x10(%rbp), %eax
movl %eax, 0x26236b(%rip)    # 0x28271c
addq $0x20, %rsp
popq %rbp
retq
nopw (%rax,%rax)