From dc71274f16f7ff65145e034900f582b62453a033 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 14 Oct 2017 11:43:11 +0900 Subject: rename and update ketpic -> ketcindy --- texmf-dist/doc/support/ketcindy/ScriptKeytyped.txt | 134 +++++++++++++++++++++ 1 file changed, 134 insertions(+) create mode 100644 texmf-dist/doc/support/ketcindy/ScriptKeytyped.txt (limited to 'texmf-dist/doc/support/ketcindy/ScriptKeytyped.txt') diff --git a/texmf-dist/doc/support/ketcindy/ScriptKeytyped.txt b/texmf-dist/doc/support/ketcindy/ScriptKeytyped.txt new file mode 100644 index 00000000..b06655d5 --- /dev/null +++ b/texmf-dist/doc/support/ketcindy/ScriptKeytyped.txt @@ -0,0 +1,134 @@ +if(key()=="?" % keydownlist()==[32], + if(!isreal(NumTyped),NumTyped=0); + if(NumTyped==0, + DispStr= + "Figure(1) Parent(2) Parapara(3) Movie(4) Surf(5)"; + ); + if(NumTyped==1, + DispStr= + "Shift+ Title(T) Para(P) AniF(A) Slide(S) Digest(D)"; + ); + if(NumTyped==2, + DispStr="Shift+ Meshlab(M) KeTCindyJS(J)"; + ); + if(NumTyped==3, + DispStr= + "Ch : disp(0) chg(9) N(+,-) add(<) rmv(>)"; + ); + drawtext(mouse().xy,DispStr,size->24); + NumTyped=mod(NumTyped+1,4); +, + NumTyped=0; +); +if(key()=="1",//Mkfigure + Viewtex(); + kc(); +); +if(key()=="2",//Mkparent + Viewparent(); +); +if(key()=="3",//Flipbook(Parapara) + Flipbook(); +); +if(key()=="4",//Texmovie + Texmovie(); + kc(); +); +if(key()=="5",//Surface + Cheader(); + Cmain(); + kcC(); + if(ChNum>0, + Ch=[ChNum]; + , + Ch=[1]; + ); + ChNum=0; +); +if(key()=="T",//Title + Maketitle(); +); +if(key()=="P",//ParaF + Parafolder(); +); +if(key()=="A",//Animatefile + Animatefile(); +); +if(key()=="S",//Slide + Mkslides(); +); +if(key()=="D",//Digest(Summary) + Mkslidesummary(); +); +if(key()=="M",//Meshlab + Mkviewobj(OCNAME,OBJCMD,OCOPTION); +); +if(key()=="J",//KeTCindyJS + Mkketcindyjs(); +); + +if(key()=="0", + Dispchoice(); +); +if(key()=="9", + if(length(Ch)==0, + Ch=[ChNum]; + , + if(!contains(Ch,ChNum), + Ch=append(Ch,ChNum); + ChNum=Ch_(length(Ch)-1); + Ch=remove(Ch,[ChNum]); + Ch=sort(Ch); + ); + ); + Dispchoice(); +); +if(key()=="+", + ChNum=ChNum+1; + Dispchoice(); +); +if(key()=="-", + ChNum=ChNum-1; + Dispchoice(); +); +if(key()=="<", + if(length(select(Ch,#==ChNum))==0, + Ch=append(Ch,ChNum); + Ch=sort(Ch); + ChNum=ChNum+1; + ); + Dispchoice(); +); +if(key()=="^", + if(length(Ch)==0, + Ch=[ChNum]; + , + if(!contains(Ch,ChNum), + Ch=Ch_(1..(length(Ch)-1)); + Ch=append(Ch,ChNum); + Ch=sort(Ch); + ); + ); + ChNum=ChNum+1; + Dispchoice(); +); +if(key()=="~", + if(length(Ch)==0, + Ch=[ChNum]; + , + if(!contains(Ch,ChNum), + Ch=Ch_(1..(length(Ch)-1)); + Ch=append(Ch,ChNum); + Ch=sort(Ch); + ); + ); + ChNum=max(ChNum-1,1); + Dispchoice(); +); +if(key()==">", + if(length(Ch)>0, + ChNum=Ch_(length(Ch)); + Ch=Remove(Ch,[ChNum]); + ); + Dispchoice(); +); -- cgit v1.2.3