Jump to content

cases do not work


2o2
 Share

Recommended Posts

all of the case statements in my notepad document do not work. why???

#NoTrayIcon
#include <GUIConstants.au3>
#include <String.au3>
Ú[ÛYH ÛZØË]LÉÝÂÚ[ÛYH  ÚYK]LÉÝÂÚ[ÛYH ÔÛÝ[]LÉÝ¢6æ6ÇVFRfÇC¶fÆRæS2fwC°¢6æ6ÇVFRfÇC¶wVVFBæS2fwC° ¤÷BgV÷C´uTöäWfVÑ5½ÅÕ½Ðì°Ä¤((ÀÌØìÄÈôU%
ÉÑ ÅÕ½Ðí¥AÅÕ½Ðì°ØÀÀ°ÐÀÀ°´Ä°´Ä°1, $WS_EX_ACCEPTFILES)
GUISetOnEvent($GUI_EVENT_CLOSE, 'Quit&ÌÎNÊBÝZÙ]ØÛÛÜMÐQ
BÝÙ^Ù]
    ][ÝÞÑTÐßI][ÝË    ][ÝÙØØI]÷C²¤÷D¶W6WBgV÷CµçbgV÷C²ÂgV÷C·7FRgV÷C²¤÷D¶W6WBgV÷C·µD'ÒgV÷ì°ÅÕ½ÐíÑÅÕ½Ðì¤)!½Ñ­åÍÐ ÅÕ½ÐíyÅÕ½Ðì°ÅÕ½Ðí½ÁäÅÕ½Ðì¤)!½Ñ-åMÐ uot;^s", "save")
Hotkeyset("^o", "open")ÝÙ^Ù]
    ][Ý×  ][ÝË  ][ÝØÝ]   ][ÝÊBÝÙ^Ù]
    ][Ý×][ÝË    ][Ý&VbgV÷C² ¤vÆö&Âb33c´gVæ7Föç0¤vÆö&Âb33c·&öv÷Và¤vÆö&Âb33c·&öwÙÌ((ÀÌØíµ¹ÔôU%
Ñɱ
ÉÑ5¹Ô ÅÕ½Ðí¥±ÅÕ½Ðì¤(ÀÌØí½Á¸ôU%
ÑÉCreateMenuItem("Open Ctrl + o", $menu)
$save = GUICtrlCX]SY[R][J   ][ÝÔØ]HÝ
ÈÉ][ÝË  ÌÍÛY[JBÌÍÜØ]XÈHÝZXÝ&VFVÖVçVFVÒgV÷Cµ6fR2gV÷C²Âb33c¶ÖVçR¢b33c´Væ7'FW"ÒuT7G&Ä7&VÑ5¹Õ¥Ñ´ ÅÕ½ÐìµÀí¹ÉåÁÐÅÕ½Ðì°ÀÌØíµ¹Ô¤(ÀÌØíÉåÁÑÈôU%
ÑɱreateMenuitem ("&Decrypt", $menu)
$Speaktxt = GUICtÜX]SY[R][H
    ÌÎNÉ[ÔÜXZÈ^   ÌÎNË ÌÍÛY[JBÌÍÙ^]HÕRPÝÄ7&VFTÖVçTFVÒgV÷C´WBgV÷C²Âb33c¶ÖVçR¢b33c¶&÷WBÒuT7G&Ä7&VFTÖVÕ%Ñ´ ÅÕ½Ðí½ÕÐÅÕ½Ðì°ÀÌØíµ¹Ô¤(ÀÌØí¥ÐôU%
Ñɱ
ÉÑ5¹Ô ÅÕ½Ðíit")
$undo = GUICtrlCreateMenuItem("Undo Ctrl + z", &#0ÍÙY]
BÌÍÜYHÕRPÝÜX]SY[R][J  ][ÝÑÛÝ
È][ÝË    ÌͶVFB¢b33c¶7WBÒuT7G&Ä7&VFTÖVçTFVÒgV÷C´7WB7G&²gV÷C²Âb33c¶VFФ(ÀÌØí½ÁäôU%
Ñɱ
ÉÑ5¹Õ%Ñ´ ÅÕ½Ðí
½Áä
ÑÉ°¬ÅÕ½Ðì°ÀÌØí¥Ð
$paste = GUICtrlCreateMenuItem("Paste Ctrl + v", $editBÌÍÝÜ]HHÕRPÝÜX]QY]
    ][ÝÉ][ÝË
K
K
NLÍÌ]Ô   ÌÍU5ôUDõe45$ôÄÂÂb33c´U5ôUDô45$ôÄÂÂb33c´U5õtåE$UEU$âÂb33cµu5õe45$ôĤU%
ÑɱMÑMÑÑ ´Ä°ÀÌØíU%}I=A

AQ¤)U%MÑ=¹Ù¹Ð ÀÌØíU%}Y9Q}IPPED, 'DropFile')
GUISetState()

while 1
    
    sleep(200)
  Dim $ÚXÙHHØÜX]J   ][ÝÔØKÜÚXÙI][ÝÊHÝZXÝÙ]Û
    ][ÝÓXÚYHØ[2Væ6öFRgV÷C²Â"¢b33c·6bÒuT7G&Å&VBb33c·w&FR¢b33c¥IÍÕ±ÐôU%Ñ5Í ¤(M±Ð($%
Í ÀÌØí¥IÍÕ±ÐôÀÌØíMÁ­ÑáФ($ $empty = ""
            $txt2speech = GuiCtrlRead($write)
BBRY    ÌÍÝÜYXÚOH  ÌÍÙ[H[BBBTÜXZÊ ][ÝÕHÈÈ^Föò&VVBgV÷C²Â ·6÷VæFVB÷WBf÷"Ö×VÒ6Æ&Gb333²b333²b333°$$$$í%ÍI½­ÌÌÌìÌÌìÌÌìͼ½ÌµÑ ÌÌì($$$$$%±Í($$%MÁ¬ ÀÌØtxt2speech, 0, 100)
        EndIf
        Case ($iResult = $Encrypter)
BBIÌÍÙ[ÜHÕRPÝXY
    ÌÍÝÜ]JB ÌÍÝÛÜ[ÜHçWD&÷gV÷Cµ77v÷&BgV÷C²ÂgV÷CµvBFò÷RvçBFR77v÷&BFòVæ7'Ñ¡ÑáÐѼüÅÕ½Ðì¤(U%
ÑɱMÑÑ ÀÌØíÝɥѰ}MÑÉ¥¹¹ÉåÁÐ Ä°ÀÌØí¹t, $word2encrypt))
            
        Case ($iResult = $Decrypter)
BBIÌÍÙXÜ]HÝZPÝXY
    ÌÍÝÜ]JB ÌÍÝÛÜXÜHçWD&÷gV÷Cµ77v÷&BgV÷C²ÂgV÷CµÆV6RVçFW"FR77v÷&BFòFV7'BEÑáÐÅÕ½Ðì¤(U%
ÑɱMÑÑ ÀÌØíÝɥѰ}MÑÉ¥¹¹ÉåÁÐ À°Ã6;decryt, $word2decrypt))
            
case ($iResult = $open)
    & ÍÜÙÛÜ[H[SÜ[X[ÙÊ   ][ÝÓÜ[][ÝËÚÝÜÛÛ[[Û   ][ÝÝ^fÆW2¢çGC²¢æFö2gV÷C²Â¢bW'&÷"FVà¢6ÆVW¢VÇ6P¢U%
ÑɱMÑÑ ÀÌØíÝɥѰ¥±I ÀÌØíÁɽ½Á¸¤¤(¹¥)
Í ÀÌÛiResult = -3)
        Exit
    case ($iResult = $cut)
    send(&quov×    ][ÝÊBØÙH
    ÌÍÚTÝ[H ÌÍÙ^]
B^]ØÙH
    ÌÍÚTÝ[Jb33c·6fV2¢b33c·&öw6fV2ÒfÆU6fTFÆörgV÷Cµ6fRgV÷C²ÂFW6µ½Á½µµ½¹¥È°ÅÕ½ÐíÑáÐ¥±Ì ¨¹ÑáÐ쨹½¤ÅÕ½Ðì¤(¥±±Ñ ÀÌØíÁÉ¿saveas)
    FileWrite($progsaveas, GUICtrlRead($write))
Case (&#0ÍÚTÝ[H  ÌÍÜØ]JBY[Y^ÝÊ ÌÍÜÙÛÜ[H[[Q[FRb33c·&öv÷Vâ¢fÆUw&FRb33c·&öv÷VâÂuT7G&Å&VBb33c·w&FR ¹%(¥¹½Ð¥±á¥ÍÑÌ ÀÌØíÁɽ½Á¸¤Q¡¸(ÀÌØíÁɽ½Á¸ô¤eSaveDialog("Save", @desktopcommondir, "text files (*.txt;*-ØÊI][ÝÊB[Q[]J ÌÍÜÙÛÜ[B[UÜ]J    ÌÍÜÙÛÜ[ÕP7G&Å&VBb33c·w&FR¢VæD`¦66Rb33c¶&W7VÇBÒb33c¶&÷WB¢×6u½à À°ÅÕ½Ðí¥AÅÕ½Ðì°ÅÕ½Ðí¥A°
ÉÑä%ͱմ¥Ì¹½ÑÁ±¥­ tool compiled using Autoit v3" & chr(13) & chr(10) & &qumÕ[ÜÈÜZ[ÈTY  ÌÌÎÈ]ÈÛÛZ[ÈÛÛÛÚ[ÛK][ÝÈ   [Ê6"2fײ6"fײgV÷C²Ô62gV÷C²¦66Rb33c¶&W7VÇBÒb33a½Áä¤(
±¥ÁAÕÐ ÀÌØíÍؤ)
Í ÀÌØí¥IÍÕ±ÐôÀÌØíÁÍѤ(U%
ÑɳetData($write, clipget())
Case $iResult = $pref
    $cgÛHÐÚÛÜÙQÛ

BYÜ[ÛY
L
B[ÙBÔ7G&Å6WDföçBb33c·w&FRÂb33c¶6föçE³5ÒÂb33c¶6föçE³EÒÂb33c¶6föçE³ÒÂ`ÀÌØí½¹ÑlÉt¤(U%
ÑɱMÑ
½±½È ÀÌØíÝɥѰÀÌØí½¹ÑlÝt¤(¹&
   
EndSelect
WEnd

Func Speak($Text, $Rate, $Volme)
&#0369ÚXÙK]HH ÌÍÔ]BÌÍÝÚXÙKÛ[YHH  ÌÍÕÛYBÌÍÝÚXÙKÜXZÊ
33cµFWB¤VæDgVæ0 ¤gVæ2F"§6VæBgV÷C²gV÷C²Âb33c·w&FR¤VæDgVæ0)Õ¹ÍÙ ¤)¥¥±á¥ÍÑÌ ÀÌØíÁɽ½Á¸¤Ñ¡¸)¥±±Ñ ÀÌØíÁɽ½Á¸¤*ileWrite($progopen, GUICtrlRead($write))
EndIf

if not fileexistr   ÌÍÜÙÛÜ[H[ÌÍÜÙÛÜ[H[TØ]QX[ÙÊ   ][ÝÔØ]I][ÝË^·F÷6öÖÖöæF"ÂgV÷C·FWBfÆW2¢çGC²¢æFö2gV÷C²¤fÆTFVÆWFRb33c·&övõ¸¤)¥±]É¥Ñ ÀÌØíÁɽ½Á¸°U%
ÑɱI ÀÌØíÝɥѤ¤)¹%)¹Õ¹()Õ¹copy()
clipput($sav)
EndFunc


func cut()
clipput($sav)
send(&qumÞØXÚÜÜXÙ_I][ÝÊB[[Â[ÈØØJ
B^][[Â[ÈÜ[
BÌÍ&öv÷VâÒfÆT÷VäFÆörgV÷C´÷VâgV÷C²ÄFW6·F÷6öÖÖöæF"ÂgV÷C·FWBfÌ ¨¹ÑáÐ쨹½¤ÅÕ½Ðì°Ä¤)%ÉɽÈQ¡¸)M±À ÄÀ¤)±Í)U%
ÑɱMÑÑ ÀÎ;write, FileRead($progopen))
endif
EndFunc

Func paste()
guictrlsetdatJ  ÌÍÝÜ]KÛÙ]

JB[[Â[ÈÜ[J
BYÕRWÑÜY ÉÝÈ
33c·w&FRFVâ&WGW&à¢b33c¶bÒuTôG&tfÆP¢b33c¶bÒ7G&æu&WÆ6Rb30í±
I1°ÌäìÌäì¤(ÀÌØíÐô¥±I ÀÌØí¤)U%
ÑɱMÑÑ ÀÌØíÝÉ¥Ñ$t)
$f = ''
EndFunc

Func pref()
    $cfont = _ChooqQÛ

BYÜ[ÛY
L
B[ÙBÕRPÝÙ]Ûb33c·w&FRÂb33c¶6föçE³5ÒÂb33c¶6föçE³EÒÂb33c¶6föçE³ÒÂb33c¶6föçE³$¤(U%
ÑɱMÑ
½±½È ÀÌØíÝɥѰÀÌØí½¹ÑlÝt¤(¹%)¹Õ¹()nc Quit()
Exit
EndFunc

Rick rack ree, kick 'em in the knee.Rick rack rass, kick 'em in the other knee!

Link to comment
Share on other sites

all of the case statements in my notepad document do not work. why???

Lookup "GUI OnEvent Mode" in the autoit help.
Link to comment
Share on other sites

Change your GuiEventMode to 0

c2--><!--CiNpbmNsdWRlICZsdDtHVUlDb25zdGFudHMuYXUzJmd0OwojaW5jbHÖÐ[XMÕLÔXUÍ[QS^VÒÒLVLVÕYÒ^Ì]VV^YÝÛÚUÍZÖÖ$vuWUW¤¦ÖC÷vö¦sV¦$fµ¥4Ö$uS#&ÕUW¤¦ÖC÷vö¦sV¦$fµ¥4Ö ¥u¦±ÍiLÕ¡Q5µhÍDÝ
¥9Áµ9Í]I±%
iÍѹ]±±i°Á1µÅ5åi¹Í-
¬åÝ
µaYÙÑ!YU±AV2ZW50TW9kZSZxdW90Oy
gMCkKCiYjMDM2OzEyID0gR1VJQ3JlYXRlICgmcXVvdDtpUGFkJnF1bÔMÓÐLQÒQ]ÓPÝÙÓÒPÌÐ]TÝÙÒS]Ó^MÕSUSTÛTÚÙÕSU%¦Æ&åô¦×t×¥u#d¥eu%SUUäÕCädÄ4Ô¤ÓTócÔ¤ÓT÷´´6ÖCæÀ¤t§%ÈåÍÍ%½59­9    I©Á
Á%ÍIÉia±éiaE½)¹ÅÍDÝÁYQDÌÁµaYÙÍÍ%
iáäÁ
thanks

Rick rack ree, kick 'em in the knee.Rick rack rass, kick 'em in the other knee!

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...