这个问题,我要问百度知道知道不知道知道就知道不知道就不知道不要知道说不知道不知道说知道到头来知道变成不知道不知道还是不知道天知道地知道百度知道知道若要问我知道不知道知道不知道也不知道。
晕了吧你!null - Watch more free videos
Supporting MAC is my way to support Linux
这个问题,我要问百度知道知道不知道知道就知道不知道就不知道不要知道说不知道不知道说知道到头来知道变成不知道不知道还是不知道天知道地知道百度知道知道若要问我知道不知道知道不知道也不知道。
晕了吧你!at 16:41 0 comments
labels: life
at 19:43 0 comments
labels: php
makewatermark();
function makewatermark()
{
///////////////
// php imagemagick test harness
//
// create a watermarked image
///////////////
//xoffset of the watermark
//yoffset of the watermark
//the original image to be watermarked
$rawimage = NewMagickWand();
MagickReadImage( $rawimage, 'cyclops.gif' );
MagickWriteImage($rawimage, 'new_image.jpg' );
$originalimage='new_image.jpg';
//the watermark to apply
$watermarkimage = "sphinx.gif";
//top end opacity number (totally transparent)
$opacity0 = @MagickGetQuantumRange();
//bootom opacity (totally visible)
$opacity100 = 0;
//desired opacity percentage
// THIS IS THE ONE TO SET
$opacitypercent = 50;
//gather the actual opacity number
$opacity = $opacity0 - ($opacity0 * $opacitypercent/100 ) ;
//validate the opacity number
if ($opacity > $opacity0){
$opacity = $opacity0;
}elseif ($opacity <0){
$opacity = 0;
}
//initialize the wands
$sourceWand = NewMagickWand();
$compositeWand = NewMagickWand();
//read in the images
@MagickReadImage($compositeWand, $watermarkimage);
@MagickReadImage($sourceWand, $originalimage);
//setting the image index
MagickSetImageIndex($compositeWand, 0);
MagickSetImageType($compositeWand, MW_TrueColorMatteType);
//seting the opacity level
MagickEvaluateImage($compositeWand, MW_SubtractEvaluateOperator, $opacity, MW_OpacityChannel) ;
//combining the images
@MagickCompositeImage($sourceWand, $compositeWand, MW_ScreenCompositeOp, 0, 0);
//print out the image
MagickWriteImage( $sourceWand, 'new_image.jpg' );
//header("Content-Type: image/jpeg");
//MagickEchoImageBlob($sourceWand);
}
?>
at 03:14 1 comments
labels: php
Your website should look professional, be available all the time, and
be written to SELL so that you get some business out of it!
We can help you do it the right way - the way that gets results!
Below are some website development costs.
Initial Consultation - FREE!
* You can show us what you want, and we will suggest ways to do it
properly.
o How to take great pictures.
o How to write text that sells.
o How to save money in domain hosting and name registration.
o Then, you can decide whether you want us to help you.
o If you don't know anything about the Internet or marketing, we
will explain things in layman's terms, not in "tecky" terms!
Contact us.
Prices are approximate because of many variables. How
fast do you need it? How much development needs to be done? Who is going to
supply the text and photos? Don't forget that promotion of your website is as
important as having a website. In our opinion, there is little use for a
website that no one visits. We want to see your website succeed as much as
you do! Having visitors coming to your website in a buying mood - that is
what we want to happen for your website.
Website development costs:
Basic Package - $380
* 1 page, approximately 300 words
(Note: you provide the text)
* Your contact information
* 1 email link, 6 links within website, 6 links outside of website
* Your logo (provided by you in .jpg or .gif format)*
* 2 photos (provided by you in .jpg format)**
* Free tracker installed on website.
Contact us.
Bronze Package - $790
* 2 - 5 pages, approximately 300 words per page
.
(Note: you provide the text)
* Your full contact information
.
* Up to 5 email links, 12 links within website, 12 links outside of
website
.
* Your logo (provided by you in .jpg or .gif format) on all pages*
.
* Up to 10 photos (provided by you in .jpg format)**.
* Free tracker installed on website.
Contact us.
Promotion Package - $999
* For those who presently have a website, but it is not drawing
traffic. You need qualified visitors - ones that are in a buying mood
for your product or service.
* People searching on the web are looking for your product or service.
Have your website show at the top of the search engine results pile!
* Analysis of present log files, if any.
* Website pages optimized for search engines and directories
(including Meta Tags, Image Tags, and keyword "loading" of up to 6
pages).
* Locating suitable reciprocal linking websites - minimum 15
but we suggest 30.
(including finding appropriate websites, sending requests and answering
emails, and putting links with descriptions on site).
Example
* Hand submitting to top 10 free major search engines and
directories
(Google, Yahoo, MSN, HotBot, Lycos, Canada, etc. - package does not include
submission to search engines that charge for listings)***
Contact us.
Hosting
* Basic hosting starts at $12/month. We used to recommend a
cheaper hosting service, for about $5/month, but we found that they were
unreliable - a fair number of times the website would not be viewable.
You want 99% reliability, with fast connections, full backup in case of
power failure, daily backup of data, and other critical items.
Read more about hosting.
Maintenance/Promotion - $90/month
* Your website will be professionally watched over.
* Continuous promotion - resubmission to search engines if needed.
* We will answer your questions about or respond to link requests.
* You can have changes done easily.
Click here for more
* Your website will look fresh - put your press releases on, etc.
* We will answer requests for reciprocal links, if appropriate.
* We will be available to answer your questions.
* Up to 1.5 hours per month, not compounding.
* Note: price may vary with complexity of website.
Website Link-Building
* Reciprocal linking will increase your website
visitor numbers from other websites.
* Reciprocal linking will raise your profile
on the major search engines.
* Having other websites linked to yours will
benefit your traffic for years.
* 30 other websites linked to your site -
approximately $450 (depends on certain criteria).
Hourly rate
for website development costs:
* $60/hour (USD)
* Basically, we charge for our time. We have the
proper tools and experience to get your job done quickly and
professionally. We are a home-based business with low overheads. We
constantly keep up on the latest methods of promotion, as well as
purchasing tools (programs) that help us do our job faster and more
effectively - to your benefit. We have been in the website development
business since 2000. Call us
today. Toll free in North America 1- 866-726-0788.
* How do our prices compare to other
companies?
Master level Web Development costs from $75-120/hr.
Custom Graphics costs $65-$75/hr.
On-Site Digital Photography costs $80+/hr.
Maintenance Contracts are negotiated for around $55-$75/hr.
Web Design Consulting costs $100-$300/hr.
Some companies cost $95 - $120/hr. across the board.
Setting up a Link Directory - we charge about $12/link. Here's
the competition's rate (taken from this web page:
http://www.simplywebhosting.com/websitemanagement.shtml
Advertising and Marketing Services
Price
Custom reciprocal link directory with 100
targeted reciprocal links $3000 per directory
Additional reciprocal links added to an
existing reciprocal link directory $20 per link
at 21:08 0 comments
labels: Blogged
at 13:54 0 comments
labels: linux
1. File selection: to select which file you want to plot
##############################
Public i As Integer
Sub FileSelect()
' File dialog to select files
'==============================
Dim fd As filedialog
Set fd = Application.filedialog(msoFileDialogFilePicker)
'Declare a variable to contain the path
'of each selected item. Even though the path is aString,
'the variable must be a Variant because For Each...Next
'routines only work with Variants and Objects.
Dim vrtSelectedItem As Variant
ActiveSheet.Cells.Clear
With fd
If .Show = -1 Then
i = 1
For Each vrtSelectedItem In .SelectedItems
Cells(i, 1).Value = vrtSelectedItem
i = i + 1
Next vrtSelectedItem
Else 'The user pressed Cancel.
End If
End With
'Set the object variable to Nothing.
Set fd = Nothing
' Sort the file list as Ascending, otherwise it will be sorted by selecting sequence
'==================================
ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("A1"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Sheet1").Sort
.SetRange Range("A:A")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
2. Main module: to re-arrange the data, format them then plot it.
##############################
Sub Main()
' Initialization
'=================
Dim LastCell As String
Dim wb_1 As Object
Dim ws_3 As Worksheet
Dim ws_plot As Worksheet
Dim FileName As String
Dim R_last As Integer
Set wb_1 = ActiveWorkbook
Set ws_3 = wb_1.Sheets(3)
Set ws_plot = wb_1.Sheets(2)
wb_1.Sheets(1).Activate
' Call the files inserted in worksheet(1), and variable i is public var, declared in module 2.
'=================================
Dim j As Integer
j = 1
R_last = 1
For j = 1 To i - 1
FileName = wb_1.Sheets(1).Cells(j, 1).Value
Call doloop(FileName, R_last, wb_1, ws_3, ws_plot)
Next j
' Delete some useless rows for plotting
'=========================================
Dim k, R_plot As Integer
For k = 2 To R_last
If Left(Cells(k, 1).Value, 1) = ":" Then
Range(Cells(k, 1), Cells(k + 3, 1)).EntireRow.Select
Selection.Delete Shift:=xlUp
R_plot = k - 1
End If
Next k
' Plot the chart
'=================
Dim xyRange, ErrAmount As String
xyRange = "A3:A" & R_plot & "," & "C3:C" & R_plot
ErrAmount = "=" & ws_plot.Name & "!N4:" & "N" & R_plot
ws_plot.Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Range(xyRange), PlotBy:=xlColumns
ActiveChart.ChartType = xlLine
With ActiveChart.SeriesCollection(1)
.ErrorBar Direction:=xlY, Include:=xlBoth, Type:=xlCustom, Amount:=ErrAmount, MinusValues:=ErrAmount
End With
End Sub
Function doloop(FileName As String, ByRef R_last As Integer, ByRef wb_1 As Object, ByRef ws_3 As Worksheet, ByRef ws_plot As Worksheet)
Dim wb As Object
Dim PosC, R_Str, C_Str As String
Dim R, C As Integer
' Open the text file and copy contents
'=======================================
Workbooks.OpenText FileName:=FileName, Origin:=936, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, Tab:=True
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Select
LastCell = Selection.Address(RowAbsolute:=True, ReferenceStyle:=xlR1C1)
PosC = InStrRev(LastCell, "C")
R_Str = Right(Left(LastCell, PosC - 1), Len(Left(LastCell, PosC - 1)) - 1)
C_Str = Right(LastCell, Len(LastCell) - PosC)
R = CInt(R_Str) ' total number of rows
C = CInt(C_Str) ' total number of columns
Range(Cells(1, 1), Cells(R, C)).Select
Selection.Copy
Set wb = ActiveSheet.Parent
ws_3.Activate
With ws_3
.Cells(R_last, 1).Activate
.Paste
End With
Application.CutCopyMode = False
wb.Close SaveChanges:=False
R_last = R_last + R
' Move the Standard Deviation part to the right side
'=====================================================
ws_3.Activate
Range(Cells(R_last - R, 1), Cells(R_last - R + R / 2 - 1, C)).Select
Selection.Copy
ws_plot.Activate
With ActiveSheet
.Cells((R_last - R - 1) / 2 + 1, 1).Activate
.Paste
End With
ws_3.Activate
Range(Cells(R_last - R + R / 2, 1), Cells(R_last - 1, C)).Select
Selection.Copy
ws_plot.Activate
With ActiveSheet
.Cells((R_last - R - 1) / 2 + 1, C + 2).Activate
.Paste
End With
End Function
at 12:17 0 comments
labels: excel
at 17:41 0 comments
labels: howto
PackageKit only checks once per the update interval, by default once every day.
It does not check on every desktop login.
You can change this behaviour by changing
/apps/gnome-packagekit/force_
at 21:27 0 comments
stardict主页中文字典
http://stardict.sourceforge.net/Dictionaries_zh_CN.php星际译王的巴比伦词库 http://reciteword.sourceforge.net/stardict/babylon.php
StarDict Lingvo Dictionaries http://reciteword.sourceforge.net/stardict/lingvo.php
金山词霸词库http://reciteword.sourceforge.net/stardict/powerword.php
下载tarball包,用7-zip解压,然后把dict.dz改为dict.gz再用7-zip解压,得到dict文件,然后把dict 和idx这两个文件拷到~/Library/weDict 即1.1.3为/var/mobile/Library/weDict 1.1.3以前为/var/root/Library/weDict/
安装正常后,应该为同名的两个文件 dict和idx,运行后会生成第三个同名文件idxc. 如果没有这个目录,而是在Library下有一个 weDict文件的话,请删除这个文件,重新安装。
推荐手动安装,使用winscp(windows)或 fugu(mac).
5.真人发音如何安装?
下载地址为:http://prdownloads.sourceforge.n … TS.tar.bz2?download
安装路径为 ~/Library/weDict下载后将解压好的 WyabdcRealPeopleTTS目录通过winscp(windows)或fugu(mac)上传到安装目录。
只支持单词发音,不支持词组发音。没有声音的话,请确认手机不是在振动模式。
6. 1.0.2运行不了v0.8?
从目前情况来看,好像是运行不了,我的版本的是1.1.1,没有在102上测 。哪位老大愿意帮忙测一下的话,按以下步骤,把错误信息发给我。
6.1 iphone安装好openssh,weDict 0.8及相应字典。
6.2 putty联接到iphone运行如下命令:cd /Applications/weDict.app
./weDict
6.3 把错误信息发给我laoren@office.weiphone.com
7. 1.1.3查本地单词死机?
不是死机,是因为权限的问题。用ziphone破解的1.1.3后安装的installer的所有者还是root,所以建立的 /var/mobile/Library/weDict的目录仍为 root所有,而weDict用户权限为mobile, 当查询时,因为权限问题,没有办法建立缓存文件,所以很慢。解决办法:chown -R mobile:mobile /var/mobile/Library/weDict
可以用putty联上运行,也可以在iphone上安装mobileTerminal运行。
at 10:48 0 comments
labels: iphone
[global]
usershare owner only = False
workgroup = workgroup
server string = %h server (Samba, Ubuntu)
dns proxy = no
log file = /var/log/samba/log.%m
max log size = 1000
syslog = 0
panic action = /usr/share/samba/panic-action %d
encrypt passwords = no
passdb backend = tdbsam
obey pam restrictions = yes
unix password sync = yes
passwd program = /usr/bin/passwd %u
passwd chat = *Enter\snew\s*\spassword:* %n\n *Retype\snew\s*\spassword:* %n\n *password\supdated\ssuccessfully* .
pam password change = yes
map to guest = bad user
usershare allow guests = yes
security = share
[printers]
comment = All Printers
browseable = no
path = /var/spool/samba
printable = yes
create mask = 0700
[print$]
comment = Printer Drivers
path = /var/lib/samba/printers
[test]
path = /home/cross/test
writeable = yes
; browseable = yes
guest ok = yes
at 17:30 0 comments
at 17:06 0 comments
at 00:07 0 comments