Index: /lang/MortScript/misc/TwitterAwayInputer.mscr
===================================================================
--- /lang/MortScript/misc/TwitterAwayInputer.mscr (revision 16815)
+++ /lang/MortScript/misc/TwitterAwayInputer.mscr (revision 16815)
@@ -0,0 +1,103 @@
+##
+# TwitterAwayInputer.mscr
+# 
+# �e�X�g�‹�:w-zero3(����AMortScript4.01b12
+# 
+# @author     sasezaki<sasezaki @ gmail.com>
+# @license    MIT���C�Z���X�Ȃ�
+# @version    0.3
+
+##config    �e����TART##
+
+    # ��⃊�X�g
+    # �J���}�������b�Z�[�W�����������
+    messageList = "@test, @aaa, ������, ���₷�� �A����͂��񂱂�����"
+
+    # TwitterAway�̃p�X
+    twitterAwayPath = "\miniSD���\Program Files\TwitterAway\TwitterAway.exe"
+    # TwitterAway�N�����̑҂�����
+    waitedSecTwitterAwayExe = "60"
+
+    #���̃X�N���v�g�̉��̐ݒ�    Prompt = "���b�Z�[�W���Ă��������B"
+    TimeOut = "60"
+    DefaultMessage = ""
+
+##config    �e����ND##
+
+##const setting START##
+
+    #TwitterAway�̉���
+    TWITTER_AWAY_WINDOW = "TwitterAway"
+    #���̃X�N���v�g��
+    THIS_MSCR = SystemPath("ScriptName") & SystemPath("ScriptExt")
+
+##const setting END##
+
+##��s����##################################################
+
+    split(messageList, ",", 1, messageArray)
+
+    #messageList�ȊO�̂������߂ɂ‚�����
+    CALL count
+    CALL array_unshift
+    IF (Length(ClipText()) > 0)
+        messageArray[1] = ClipText()
+    ELSE
+        messageArray[1] = ""
+    EndIF
+    messageArray[2] = ""
+
+    #���b�Z�[�W�I��   selectedMessageKey = Choice("TwitterAway_Inputer", Prompt, DefaultMessage, TimeOut, messageArray)
+        IF(selectedMessageKey = 0)
+            KillScript(THIS_MSCR)
+        EndIF
+    setClipText(messageArray[selectedMessageKey])
+
+    #TwitterAway���N�����ĂȂ���������B
+    IF(ProcExists("TwitterAway.exe") = 0)
+        Run(twitterAwayPath)
+        WaitForActive(TWITTER_AWAY_WINDOW, waitedSecTwitterAwayExe)
+        IF(WndExists(TWITTER_AWAY_WINDOW) = 0)
+            KillScript(THIS_MSCR)
+        EndIF
+    EndIF
+
+    #TwitterAway�Ƀy�[�X�g
+    Show(TWITTER_AWAY_WINDOW)
+    If (Screen("landscape"))
+        MouseClick(TWITTER_AWAY_WINDOW,100,350)
+    ELSE
+        MouseClick(TWITTER_AWAY_WINDOW,100,510)
+    EndIF
+    SendCtrlKey(TWITTER_AWAY_WINDOW,"v")
+
+##--------------------------------------
+
+#�z��v�f���𐔂���
+Sub count
+ num = "0"
+ ForEach var in array ( messageArray )
+    num = num + 1
+ EndForEach
+ indexCounts = num
+EndSub
+
+Sub array_unshift
+ 
+ unshiftNum = 2
+
+ repeatNum = unshiftNum + indexCounts
+
+ num = 0
+ ForEach var in array ( messageArray )
+    num = num + 1
+    messageCopyArray[num] = var
+ EndForEach
+
+ arrayNum = 1  
+ Repeat(indexCounts)
+    messageArray[unshiftNum + arrayNum] = messageCopyArray[arrayNum] 
+    arrayNum = arrayNum + 1
+ EndRepeat
+
+EndSub
Index: /lang/MortScript/misc/WZERO3_LastPhotoUpload.mscr
===================================================================
--- /lang/MortScript/misc/WZERO3_LastPhotoUpload.mscr (revision 16815)
+++ /lang/MortScript/misc/WZERO3_LastPhotoUpload.mscr (revision 16815)
@@ -0,0 +1,41 @@
+##
+# LastPhotoUpload.mscr
+# 
+# �e�X�g�‹�:w-zero3(����AMortScript4.01b12
+# 
+# @author     sasezaki<sasezaki @ gmail.com>
+# @license    MIT���C�Z���X�Ȃ�# @version    0.1(20070515)
+
+#config �e����   #�ۑ��摜�t�H���_�E�g���q���   #DCIM_JPGS = "\\*.jpg"
+    DCIM_JPGS = "\miniSD���\DCIM\*.jpg"
+
+    #SimpleUPloader�ւ̃p�X�L�q
+    SIMPLEUPLOADER = "\Program Files\SimpleUploader\SimpleUploader.exe"
+
+    #���̃X�N���v�g��
+    THIS_MSCR = SystemPath("ScriptName") & SystemPath("ScriptExt")
+
+######################
+
+    #.jpg�t�@�C�������������
+    mkTime = 0
+    ForEach jpg in files (DCIM_JPGS)
+        If( FileCreateTime(jpg) > mkTime )
+            mkTime = FileCreateTime(jpg)
+            targetJpg = jpg
+        EndIf
+    EndForEach
+
+    Run(SIMPLEUPLOADER, targetJpg)
+
+    #�ڑ����F
+    #
+    #WaitForActive("SimpleUploader�ݒ� 10)
+    SendLeftSoft
+    #����upload�X�^�[�g�����܂������Ȃ����Ƃ������̂Ŏ����ŃA�b�v�͓�����������   WaitForActive("�f�B���N�g���ꗗ", 10)
+    #Sleep(100)
+    SendLeftSoft
+    #�t�@�C���̓e�L�X�g�t�@�C���������̂�    Sleep(50)
+    SendRight
+    SendCR
+    Exit