MVLib - Short Writeup - Version 4.0 Example Number 12 - Size and colors of characters |
This example shows how to select and use different character size and color.
The source code to produce these plots is available here and the complete script running the code is available here. |
|||||||
| ||||||||
integer iv(100) character st(100)*2,stringa*30 do i=1,50 iv(i)=i-1 write (st(i),'(i2)') i-1 call nospace(st(i)) end do call mvsetflags('palette di colori',2.0) call mvsetflags('numero di colori',30.0) call plotpalette (0.9,'h',iv,st,31) do i=1,30 call mvsetflags('Size delle Scritte',float(10+i)) call mvsetflags('Colore Titoli',float(i)) write (stringa,'(a,i2,a,i2)') 'Colore ',i,' Size ',10+i call no2space(stringa) call scrivisulplot(stringa,0.5,0.90-0.03*i) end do call displayexample('example12',' ',' ') end |