Milovana.com

Code: Select all

Line26:
Under the Sub tab, in the lower right corner update your line range to be minimum #SubWritingTaskMin to maximum #SubWritingTaskMax #DT @Wait(10)
Line 36:
Under the Sub tab, in the lower right corner update your line range to be #SubWritingTaskMin to #SubWritingTaskMax #DT @Wait(10)

------------------------------------------------------------------------------------------------------------------------------------------------------
I updated to the following:

Line 26:
Under the Sub tab, in the lower right corner update your line range to be minimum #Var[ModLinesMin] maximum #Var[ModLinesMax] #DT @Wait(10)
Line36:
Under the Sub tab, in the lower right corner update your maximum line range #SubWritingTaskMax to be #Var[ModLinesMax] #DT @Wait(10)

------------------------------------------------------------------------------------------------------------------------------------------------------
Also, there seems to be a problem inside (TestLines2) because of the calculation.

I could only progress by using this:
(TestLines2)
@Variable[ModLinesMin]!=[#SubWritingTaskMin] @NullResponse @Goto(UpdateMin2)
@Variable[ModLinesMax]!=[#SubWritingTaskMax] @NullResponse @Goto(UpdateMax2)

That would also mean Lines 8,9 are incorrect?

The same issue occurs in P3A.txt

Code: Select all

(10):I am too pathetic to be considdered a man.
Spelling mistake
(10):I am too pathetic to be considered a man.

Code: Select all

@Flag(First_LineWriting) @NullResponse @Goto(TestLines)
This is your first line writing punishment #DT
You will be typing lines until I am happy #DT @SetFlag(First_LineWriting)
(TestLines)
@NullResponse @SetVar[Save]=[0]
@NullResponse @ChangeVar[Save]=[Save]+[60]
@NullResponse @ChangeVar[Save]=[Save]*[#Random(#Var[PMin],#Var[PMax])]
@Variable[#SubWritingTaskMin]!=[ModLinesMin] @NullResponse @Goto(UpdateMin)
@Variable[#SubWritingTaskMax]!=[ModLinesMax] @NullResponse @Goto(UpdateMax)
@NullResponse @SetVar[Counting]=[0]
@NullResponse @CountVar[Counting]
(Return)
Okay #DT
Lets get you started on your writing assignment #DT 
(Task)
@WritingTaskRandom(#WritingAssignment)
@Variable[Counting]>=[Save] @NullResponse @Goto(Complete)
@NullResponse @Goto(Task)

(UpdateMin2)
Liar! #DT #Punish
I expect you to do as told! #DT #MeritsDown
(UpdateMin)
You need to update your minimum line range #SlaveName #DT
Go into settings in the lower right corner #DT
Under the Sub tab, in the lower right corner update your line range to be minimum #Var[ModLinesMin] maximum #Var[ModLinesMax] #DT @Wait(10)
Are you done? #DT
[yes] @NullResponse @Goto(TestLines2)
@DifferentAnswer Just say "yes" when you're done #DT
(UpdateMax2)
Liar! #DT #Punish
I expect you to do as told! #DT #MeritsDown
(UpdateMax)
You need to update your maximum line range #SlaveName #DT
Go into settings in the lower right corner #DT
Under the Sub tab, in the lower right corner update your maximum line range #SubWritingTaskMax to be #Var[ModLinesMax] #DT @Wait(10)
Are you done? #DT
[yes] @NullResponse @Goto(TestLines2)
@DifferentAnswer Just say "yes" when you're done #DT

(Failed Writing Task)
You failed your task #SlaveName #DT
However no worries, we can repeat it all day until you get it right #Grin #DT @Goto(Task)

(TestLines2)
@Variable[ModLinesMin]!=[#SubWritingTaskMin] @NullResponse @Goto(UpdateMin2)
@Variable[ModLinesMax]!=[#SubWritingTaskMax] @NullResponse @Goto(UpdateMax2)
@NullResponse @Goto(Return)

(Complete)
@NullResponse @ChangeVar[Punishment]=[Punishment]-[1]
@End