Список проголосовавших за комментарий "Это я писал давно на QPILE, подсвечивал входы в лонг.<br/> <br/> '--- рисует метки для лонга<br/> FUNC Label_long_draw(tcount, pcount,)<br/> <br/> t_label=create_map()<br/> <br/> t_label=set_value(t_label,«TEXT», "")<br/> t_label=set_value(t_label,«IMAGE_PATH», «turtle.bmp»)<br/> t_label=set_value(t_label,«ALIGNMENT», «BOTTOM»)<br/> t_label=set_value(t_label,«YVALUE», GET_VALUE(GET_COLLECTION_ITEM(BARLIST_R, tcount),«LOW»)-20)<br/> t_label=set_value(t_label,«DATE», GET_VALUE(GET_COLLECTION_ITEM(BARLIST_R, tcount),«DATE»))<br/> t_label=set_value(t_label,«TIME», GET_VALUE(GET_COLLECTION_ITEM(BARLIST_R, tcount),«TIME»))<br/> t_label=set_value(t_label,«R», 0)<br/> t_label=set_value(t_label,«G», 0)<br/> t_label=set_value(t_label,«B», 200)<br/> t_label=set_value(t_label,«TRANSPARENCY», 0)<br/> t_label=set_value(t_label,«TRANSPARENT_BACKGROUND», 1)<br/> t_label=set_value(t_label,«FONT_FACE_NAME», «Arial»)<br/> t_label=set_value(t_label,«FONT_HEIGHT», 12)<br/> t_label=set_value(t_label,«HINT», «Бар»&tcount)<br/> id=ADD_LABEL(ID_GRAF, t